Excel VBA質問箱 IV

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

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


13087 / 13644 ツリー ←次へ | 前へ→

【7078】リンクの更新が終わってから貼り付けたいのですが? 困ったよ〜(*_*) 03/8/21(木) 21:50 質問
【7083】Re:リンクの更新が終わってから貼り付けたい... INA 03/8/22(金) 8:57 発言

【7078】リンクの更新が終わってから貼り付けたい...
質問  困ったよ〜(*_*)  - 03/8/21(木) 21:50 -

引用なし
パスワード
   商品コードとそれに関連したデータがあります。商品は1000種類、関連データは20です。会社では、商品コードを入力すると外部のデータとリンクして商品の関連データを表示する関数を用意してくれているのですが、1000×20のセルに一度に関数を入れるとPCがフリーズしてしまいます。
そこで関数を入力するのは1行だけにして、その行の商品コードを入替え、結果を値貼り付けにしようと考え下記のようにしました。

For data_row = 3 to 1003
Cells(1,"A")=Cells(data_row,"A")
 For data_col 2 to 21
  Cells(data_row,data_col)=Cells(1,data_col)
 Next
Next
ところが、これだと数値を入替えて関数の値が更新される前(更新中関数の入っているセルは#N/Aになります)に、次々と張り替えてしまう為、全てのセルが#N/Aになってしまいます。
リンクが更新されるまで、値の貼り付けを待つまたは値が更新されてから貼り付けを実行するよい方法があるのでしょうか?
ご存知の方がいらっしゃいましたら、未熟な私に教えてください。

【7083】Re:リンクの更新が終わってから貼り付けた...
発言  INA  - 03/8/22(金) 8:57 -

引用なし
パスワード
   良く意味が分からないので、「今悩んでいるやりたいこと」ではなく
「マクロで処理させたい目的」をお教え頂けませんか?
今の案とは別の方法をご提案できるかもしれませんので、
よろしくお願い致します。

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