[[20100108111008]]　『if関数とvlookup関数の組み合わせ』（ken）　ページの最後に飛ぶ

『if関数とvlookup関数の組み合わせ』（ken）

 現在セル「Ｂ5」に数字を入力するとセル「Ｆ2」に
 =IF(ISBLANK(B5),"",VLOOKUP(B5,ｺｰﾄﾞ表1!A:N,13,FALSE))
 でデータが表示されますが、セル「Ｂ3」に番号が入力されたときだけセル「Ｆ2」にメガネと
 表示させたいのですが方法はありますか。

 エクセル2007でwindowsXPを使用しています。

 こんにちは～♪

 >番号が入力されたときだけ
 数値ということでしたら。。。

 =IF(ISNUMBER(B3),"メガネ",IF(ISBLANK(B5),"",VLOOKUP(B5,ｺｰﾄﾞ表1!A:N,13,FALSE)))

 ISNUMBERは、COUNT(B3)でもいいですネ！！。。。

 それから。。

 ISBLANK(B5) は。。。

 B5=""

 でもいいですね。。。

 ご参考にどうぞ。。。

 。。。Ms.Rin～♪♪

ご教授いただきましてありがとうございました。

もう1つ質問で、別のシートにマクロで別のシートに転記しようとして、

Sheets("入力帳票").Range("h5").Formula = "=IF(ISnumber(D16),"ﾒｶﾞﾈ一式",)),"""",if(ISBLANK(D16),VLOOKUP(D21,コード表!A:m,13,FALSE),"""")))"

で入れたところ構文エラーになってしまいました。

たびたびですみません。よろしくお願いいたします。

 "メガネ一式" --> ""メガネ一式"" とする必要があります。
 (ROUGE)

今、

Sheets("入力帳票").Range("h5").Formula = "=IF(ISNUMBER(D16),""ﾒｶﾞﾈ一式"",)),"""",if(isblank(d16),VLOOKUP(D21,コード表!A:m,13,FALSE),"""")))"

でなおしたのですが、また構文エラーになってしまいました。

 マクロで定義した式を、一度セルに戻してみてください。
 エラーになります。
 元々エラーの式をマクロにしても、エラーが帰ってくるのは当たり前ですね。
 1or8

元々エラーの式をマクロにしても、エラーが帰ってくるのは当たり前ですね。

どのように修正すればよいのでしょうか。

 まずはセル上できちんと値の出る式を作ってその式内の「"」を「""」に置き換えてマクロ内で使ってはどうでしょうか？
 (独覚)

ありがとうございました！

以下の構文で出来ました。

Sheets("入力帳票").Range("h5").Formula = "=IF(ISNUMBER(D16),""1ﾒｶﾞﾈ一式"",IF(ISBLANK(D21),"""",VLOOKUP(D21,コード表!A:m,13,FALSE)))"

ですが、セルＤ16にアルファベットが含まれると反映されません。（数字のみは大丈夫でした）

たびたびすみません。よろしくお願いいたします。

 コード表シートのA列にはどの様な値が有るのか。
 D16セルにどの様な値が入った時にはどうなればよいのか。

 実際に例を挙げて説明してみられるのが良いと思います。

 ＞反映されません。
 ってのも、具体的にどうなるのか書いておかれるのが良いでしょう。

 (HANA)

コメント返信：