こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

VBA 初心者

sheet1から、sheet2データを検索して抽出する練習をしているのですがerror"1104"が表示されます、なぜなのか分からないので投稿しました、よろしくお願いします。

sub test()

dim sh1 as worksheets
dim sh2 as worksheets
dim  i  as  integer

set sh1 = thisworkbook.worksheets("sheet1!")
set sh2 = thisworkbook.worksheets("sheet2!")

b = userform1.textbox1
for i = 1 to 10
sh1 .cells(i,2) = b
b = b+1
x = sh1.cells(1,2)

sh1.cells(i,3).value = worksheetfunction.vlookup(x,sh2.range("a1:d500"),2,false)
next i
end sub

投稿日時 - 2011-01-24 21:41:25

QNo.6472392

困ってます

質問者が選んだベストアンサー

検索値が見つからない場合エラーになり動きません。

http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/vba_ws_kansu.html

こちらを参考に修正してください。

投稿日時 - 2011-01-24 22:26:05

お礼

早速の回答ありがとうございます。解決することが出来ました。

投稿日時 - 2011-01-25 20:18:25

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問