Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

55793 / 76732

←次へ　｜　前へ→


	【25706】Re:参照先Bookを開かないでVlookup

kobasan - 05/6/11(土) 12:14 -


	引用なし

	パスワード

▼じぇっとさん：
>すいません。もう一度質問させて頂きます。
>意味の分からないことを質問していた場合は、ご容赦願います。
>
>できれば、「Application.VLookup」を使用したいのです。
>参照先の他のブック（C:\Book2.xls）は数万KBという大きなサイズのファイルなので、Excel関数の「VLookup」を使用した場合、表示まで（処理）にかなりの時間を要してしまうのです。
>ですので、「Application.VLookup」を使用してVBA内で処理を行えば少しは処理時間も早くなるかなと思ったのですが、もしかしてExcel関数の「VLookup」を使用しても「Application.VLookup」を使用しても、処理時間は全く変わらないのでしょうか？
Application.VLookup　で検討してみましたが、book2をopenする方法しか私にはできませんでした。
セル1つ1つに書き込むなら、関数の「VLookup」を使用を使用したほうが速いと思います。
私にできることは下記の代案です。かなり速いと思います。
Sub test()
　　Range("B1").FormulaR1C1 = "= VLookup(RC[-1],'D:\[book2.xls]Sheet2'!R1C1:R1000C2,2,false)"
　　Range("B1").AutoFill Destination:=Range("B1:B60000"), Type:=xlFillDefault

　　Range("B1:b1000").Value = Range("B1:b6000").Value
End Sub

0 hits

▼

【25700】参照先Bookを開かないでVlookup じぇっと 05/6/11(土) 2:44