Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


53901 / 76732 ←次へ | 前へ→

【27637】Re:ワークシート関数のVLOOKUPをそのまま使いたい
回答  かみちゃん  - 05/8/14(日) 12:12 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>(Val(Me.TextBox1.Value), Sheets("Sheet1")

VBAの前にワークシート関数であるVLOOKUP関数はご存知ですよね?
VLOOKUPの第一引数は「検索値」で、Val(Me.TextBox1.Value) としています。
第二引数は、「範囲」で、Sheets("Sheet1").Range("A:B") としています。
この第一引数と第二引数の一番左端の「データの型」というものを合わしておく
必要があります。
これは、人の目には、数字というふうに見えていますが、テキストボックスに入
っている数字は、文字列として扱われるからです。
Val(文字列の数字)
とすることで、「数値」に変換されます。
仮に
Val(Me.TextBox1.Value)
ではなく、
Me.TextBox1.Value
としたまま、VLOOKUPで参照しようとすると、データの型が一致するものがない
限り、#N/A!というエラー値が返ってきます。

もちろん、第二引数の一番左端の列の「データの型」が「数値」ではなく「文字
列」ならば、このような変換は不要ですし、逆に変換してしまうと、同様に
#N/A!というエラー値になります。

>vlookupで引っ張ってきた値(2つ)をuserform2のテキストボックス1と2に
>表示させるのですが、
>その場合、
>userform2.show
>textbox1.text=result1
>textbox2.text=result2
>を
>続ければいいのでしょうか?

それでいいと思います。
0 hits

【27376】ワークシート関数のVLOOKUPをそのまま使いたい toto 05/8/7(日) 16:28 質問
【27377】Re:ワークシート関数のVLOOKUPをそのまま使... かみちゃん 05/8/7(日) 16:36 発言
【27379】Re:ワークシート関数のVLOOKUPをそのまま使... toto 05/8/7(日) 18:07 質問
【27380】Re:ワークシート関数のVLOOKUPをそのまま使... かみちゃん 05/8/7(日) 18:25 回答
【27633】Re:ワークシート関数のVLOOKUPをそのまま使... toto 05/8/14(日) 11:41 質問
【27637】Re:ワークシート関数のVLOOKUPをそのまま使... かみちゃん 05/8/14(日) 12:12 回答
【27640】Re:ワークシート関数のVLOOKUPをそのまま使... toto 05/8/14(日) 13:03 質問
【27642】Re:ワークシート関数のVLOOKUPをそのまま使... かみちゃん 05/8/14(日) 13:29 回答
【27643】Re:ワークシート関数のVLOOKUPをそのまま使... toto 05/8/14(日) 13:50 質問
【27644】Re:ワークシート関数のVLOOKUPをそのまま使... かみちゃん 05/8/14(日) 14:03 発言
【27649】Re:ワークシート関数のVLOOKUPをそのまま使... toto 05/8/14(日) 17:05 お礼
【28890】Re:ワークシート関数のVLOOKUPをそのまま使... はじめ 05/9/17(土) 14:28 質問
【28891】Re:ワークシート関数のVLOOKUPをそのまま使... りん 05/9/17(土) 14:51 発言
【28910】Re:ワークシート関数のVLOOKUPをそのまま使... はじめ 05/9/18(日) 11:18 質問
【28928】Re:ワークシート関数のVLOOKUPをそのまま使... はじめ 05/9/18(日) 13:42 質問
【28936】Re:ワークシート関数のVLOOKUPをそのまま... ponpon 05/9/18(日) 22:58 回答
【28968】Re:ワークシート関数のVLOOKUPをそのまま... はじめ 05/9/19(月) 21:04 お礼

53901 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free