Results of 1 - 1 of about 7933 for VLOOKUP (0.002 sec.)
- [[20120902001610]]
- #score: 3345
- @digest: ff2e6d63a1b78274d92f707ce9d0153d
- @id: 60075
- @mdate: 2012-09-02T05:17:18Z
- @size: 3999
- @type: text/plain
- #keywords: 集!$ (13096), a14 (11463), ト!$ (9611), み", (6185), シフ (6108), ジシ (5611), み" (5419), ト編 (4967), 153 (4803), 休み (3809), 式) (2966), フト (2715), 回処 (2611), レジ (2195), vlookup (1908), xlcelltypeblanks (1762), replacement (1703), countblank (1592), isna (1376), 「休 (1112), selection (953), トボ (903), false (895), 、a1 (801), sample2 (723), テキ (710), enableevents (697), specialcells (691), キス (656), 空白 (633), 今の (616), ダメ (613)
- 『空白の時』（かなこ）
組み合わせられませんか? =IF(ISNA(VLOOKUP(A14,シフト!$I$2:$O$153,6,FALSE)),"",VLOOKUP(A14,シフト!$I$2:$O$153,6,FALSE)) A14が空白の時にA14に休みと表示でけませんか? 教えてもらえませんか? ---- IF をもう一つ使ってあげればよいと思いますけれど、 =IF(A14="","休み",今の式) としてどうでしょうか。 (Mook) ---- =IF(A14="","休み",今の式) この式に=IF(ISNA(VLOOKUP(A14,シフト!$I$2:$O$153,6,FALSE)),"",VLOOKUP(A14,シフト!$I$2:$O$153,6,FALSE)) をどうに組んだらいいのでしょうか?（かなこ） ---- 起きたばかりであたまがぼんやりしてるんだけど・・ この式は、A14以外のところに書いてあるんだよね? で、「休み」と表示したいのは、A14なんだよねぇ・・・・・。 関数式では、別のセルに値を書き込むことはできないのでは? だから、残念だけど、組み込めない・・・・・ (ぶらっと) ---- =IF(A14="","休み",今の式) この式に=IF(ISNA(VLOOKUP(A14,シフト!$I$2:$O$153,6,FALSE)),"",VLOOKUP(A14,シフト!$I$2:$O$153,6,FALSE)) =IF(A14="","休み",IF(ISNA(VLOOKUP(A14,レジシフト編集!$I$2:$O$153,6,FALSE)),"",VLOOKUP(A14,レジシフト編集!$I$2:$O$153,6,FALSE))) 何もおこりません?ダメと言う事なんですか〜ぁ （かなこ） ---- >何もおこりません? う〜ん・・ 上でコメント入れてるけど、この式は、どこに書いてあるのかな? 仮に、A1 に書いてあったとしよう。で、A14が空白だったとしよう。 そうすると、A14 ではなく 式が書いてある A1 に "休み" と入っていない? >ダメと言う事なんですか〜ぁ そうだね。A14 に"休み" と書き込むこと自体が無理。（と、上でコメントしたけど?） (ぶらっと) ---- なので、A14 を、どうこうするのはあきらめて（?） 「A14以外のところ」に =IF(A14="","休み",A14) で、今の式を =IF(ISNA(VLOOKUP(A14以外のところ,シフト!$I$2:$O$153,6,FALSE)),"",VLOOKUP(A14以外のところ,シフト!$I$2:$O$153,6,FALSE)) こうするか、それもいやならVBA。 A14 に何か入れたとき、それが空白ならA14を"休み"にし、A14の値でVLOOKUPするなら。 (例:VLOOKUPが入っているセルが A1 だとして） シートモジュール（シートタブを右クリック、コードの表示を選んででてくるところ）に以下を貼り付け。 Private Sub Worksheet_Change(ByVal Target As Range) Dim ans As Variant If Target.Address(False, False) <> "A14" Then Exit Sub Application.EnableEvents = False If IsEmpty(Range("A14").Value) Then Range("A14").Value = "休み" End If ans = Application.VLookup(Range("A14").Value, Sheets("シフト").Range("I2:O153"), 6, False) If IsError(ans) Then Range("A1").ClearContents '★ 実際のセルに変更 Else Range("A1").Value = ans '★ 実際のセルに変更 End If Application.EnableEvents = True End Sub (ぶらっと) ---- あっ、そういうことだったんですね。 夜遅かったので（いいわけ）、勘違いしていました。 空のセルに表示するってことはできませんから、A14 で素直に「休み」って入れたら ダメでしょうか。 あるいはひと手間ですけれど、選択した範囲の空白に全部休みって入れたいのであれば、 マクロの記録をとったものをちょっと加工しただけですけれど、 Sub Sample() If WorksheetFunction.CountBlank(Selection) = 0 Then Exit Sub Selection.SpecialCells(xlCellTypeBlanks).Select Selection.Replace What:="", Replacement:="休み" End Sub のようなものも出来そうです。 Selection は Range("A14:A20") のようにしておくと、決めた範囲を毎回処理する こともできます。 Sub Sample2() If WorksheetFunction.CountBlank(Range("A14:A20")) = 0 Then Exit Sub Range("A14:A20").SpecialCells(xlCellTypeBlanks).Select Selection.Replace What:="", Replacement:="休み" End Sub (Mook) ---- A14は空白のままだけど、これじゃだめですか（マナ） =IF(A14="",VLOOKUP("休み",シフト!$I$2:$O$153,6,FALSE),今の式) ---- みかけの表示でも良いなら（マナ） 1）どこかに、こっそり、例えばA100に、=IF(A14="","休み","")と入力 2）隠しておきたいなら、文字色を白または行ごと非表示 3）透明なテキストボックスを、A14セルの上に作成 4）テキストボックスに数式を=A100と入力 テキストボックスを間違って削除してしまいそうなのが問題ですが。 シート保護できればいいんだけど。... - https://www.excel.studio-kazu.jp/wiki/kazuwiki/201209/20120902001610.txt - [detail] - similar
PREV
NEXT
Powered by Hyper Estraier 1.4.13, with 97054 documents and 608269 words.
訪問者：