ｖｂａ ｖｌｏｏｋｕｐについて

質問

VBAで範囲検索をしたくて、
vlookuを使おうと思ったのですが

１０００～２０００
２００１～３０００
３００１～４０００
４００１～５０００
５００１～６０００
６００１～７０００
７００１～８０００
８００１～９０００
９００１～１００００

このような表から

１２３７

を検索しようとすると失敗してしまいました(・・;)

wskyu.Range("D24") = Application.WorksheetFunction.VLookup(kihon, .Range("D:H"), 5, True)

このコードでエラーは起きず、

kihonに１２３７が入っています

１０００
２００１

↑がＤ列です

Ｈ列は

３０９
３５９
４０６
５６９
６３０
６８０
７００
７０３
９０４

こんな感じです

思い通りにいけば１２３７を検索するので当てはまるのは１列目で
３０９が表示される予定だったのですが

実際やってみると６３０が表示されました、、、

なぜなのでしょうか
そもそもVLOOKUPでこのような検索方法はできないのでしょうか？

補足として

最初はSELECT CASEを使い

１０００～２０００の間にあれば
３０９を表示

という風にしていたので

表などが間違っているのではないようです

しかしそれだとコードがとても長くなってしまうので
VLOOKUPにしようと思いました

どうかよろしくお願いします！！

回答No.3

noname#203218

＞上の方法でできると教えていただいたのですが、、、

結果が違っているのですから、人のせいにしないでご自身で理解する事が大事なのでは・・・

補足

その質問を見ていただければわかるのですがそこでは写真までついていてうまくいっていたんですよ(・・;)
コードは全く同じなのになぜかな～と思いまして、、、

回答No.2

noname#203218

書かれてるコードのでは、抽出したいデータがH1にある場合、D1に検索用１２３７が存在しないと検索結果は得られません。

VLOOKUP関数を勘違いされてるようですね。

VLOOKUPの解説
VLOOKUP 関数を使用すると、セル範囲の最初の列を検索し、その範囲の同じ行にある任意のセルから値を返すことができます。

検索したいセル範囲の指定、抽出したい列が、検索セル範囲の何番目の列なのか。これが重要ですよね。
見なおせば簡単だと思いますので、頑張って下さい。

補足

昔の自分の
「ＶＢＡ　検索」
という質問で

上の方法でできると教えていただいたのですが、、、

回答No.1

FEX2053

あの・・・

１０００　３０９
２０００　３５９
３０００　４０６

という表で

=VLOOKUP(1237,A1:B3,2)

ってやると

３０９

が出てきますよ。
３５９を出したいなら

０　　　　３０９
１０００　３５９
２０００　４０６

とやらなくちゃ

補足

出したいのは３０９ですが、、、
何故でないのでしょうか
コードはあってますよね？？