Excel VBA質問箱 IV

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

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


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

629 / 76735

←次へ　｜　前へ→


	【81771】コピペ高速化のコードについて（配列）

やまた - 21/5/8(土) 22:50 -


	引用なし

	パスワード

コピペ高速化のコードについて

３つのシート（”反映作業１”、”反映作業２”、”反映作業３”）があり
”反映作業１”、”反映作業２”から”出力シート”に
”反映作業３”から”予定シート”に転記する際の
VBAコードについて教えていただけると幸いです。

現在、都度、シート間を移動してコピペをするコードのため
処理するのに数分かかってしまいます。

高速化のためにどうすればよいか調べ、配列を使用すれば
高速処理が可能になるだろう思い、配列について調べていたのですが
今の私には難しく、思っている作業を実現するコードが書けません。

お力添えいただけたらと思います。

行いたい作業は以下です。

”反映作業１”のシートのRange("AA157:AD256")をコピーして
”入力シート”のRange("H155")に値の貼り付け
↓
”反映作業１”のシートのRange("AE157:AH256")をコピーして
”入力シート”のRange("N155")に値の貼り付け
↓
”反映作業１”のシートのRange("AI157:AL256")をコピーして
”入力シート”のRange("T155")に値の貼り付け
↓
”反映作業１”のシートのRange("AM157:AP256")をコピーして
”入力シート”のRange("Z155")に値の貼り付け
↓
中略
↓
”反映作業１”のシートのRange("BS157:BV256")をコピーして
”入力シート”のRange("BV155")に値の貼り付け

↓（”反映作業１”から”出力シート”へのコピペは計１２回です）

”反映作業2”のシートのRange("AA157:AD256")をコピーして
”入力シート”のRange("H274")に値の貼り付け
↓
”反映作業2”のシートのRange("AE157:AH256")をコピーして
”入力シート”のRange("N274")に値の貼り付け
↓
”反映作業2”のシートのRange("AI157:AL256")をコピーして
”入力シート”のRange("T274")に値の貼り付け
↓
”反映作業2”のシートのRange("AM157:AP256")をコピーして
”入力シート”のRange("Z274")に値の貼り付け
↓
中略
↓
”反映作業2”のシートのRange("BS157:BV256")をコピーして
”入力シート”のRange("BV274")に値の貼り付け

↓（”反映作業2”から”出力シート”へのコピペは計１２回です）

”反映作業３”のシートのRange("AA157:AX166")から
”予定シート”のRange("B7")に値の貼り付け

あまりも長いので、行いたい作業を中略してしまいましたが
必要な情報でしたらご指摘ください。

どうぞよろしくお願いいたします。

7 hits

▼

【81771】コピペ高速化のコードについて（配列） やまた 21/5/8(土) 22:50