Excel VBA質問箱 IV

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

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


55789 / 76732 ←次へ | 前へ→

【25710】Re:参照先Bookを開かないでVlookup
発言  kobasan  - 05/6/11(土) 14:39 -

引用なし
パスワード
   画面更新を止めて、
AutoFillを1行カットしました。
Sub test()
  Application.ScreenUpdating = False
  Range("B1:b20000").FormulaR1C1 = "= VLookup(RC[-1],'D:\[book2.xls]Sheet2'!R1C1:R2000C2,2,false)"
  Range("B1:b20000") = Range("B1:b20000").Value
End Sub


2万件で5秒くらいです。

0 hits

【25700】参照先Bookを開かないでVlookup じぇっと 05/6/11(土) 2:44 質問
【25702】Re:参照先Bookを開かないでVlookup kobasan 05/6/11(土) 7:48 回答
【25703】Re:参照先Bookを開かないでVlookup kobasan 05/6/11(土) 7:57 発言
【25705】Re:参照先Bookを開かないでVlookup じぇっと 05/6/11(土) 10:19 質問
【25706】Re:参照先Bookを開かないでVlookup kobasan 05/6/11(土) 12:14 回答
【25710】Re:参照先Bookを開かないでVlookup kobasan 05/6/11(土) 14:39 発言
【25722】Re:参照先Bookを開かないでVlookup kobasan 05/6/11(土) 22:09 発言
【25729】Re:参照先Bookを開かないでVlookup ichinose 05/6/12(日) 18:19 発言
【25730】Re:参照先Bookを開かないでVlookup kobasan 05/6/12(日) 21:41 発言
【25731】Re:参照先Bookを開かないでVlookup じぇっと 05/6/12(日) 23:21 お礼

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