Excel VBA質問箱 IV

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

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


13472 / 13646 ツリー ←次へ | 前へ→

【5265】コピーとペーストについて教えてください やす 03/4/30(水) 19:32 質問
【5266】Re:コピーとペーストについて教えてください りん 03/4/30(水) 21:07 回答
【5269】Re:コピーとペーストについて教えてください やす 03/5/1(木) 7:42 お礼

【5265】コピーとペーストについて教えてください
質問  やす  - 03/4/30(水) 19:32 -

引用なし
パスワード
   こんばんは。
VBAを始めたばかりなのでわからないので教えていただきたいです。
同じシートが2枚あるとして
シート1のセルに同じシートからコピーしたセルのデータを貼り付けるとシート2の
同じ条件のセルにも書き込まれるようにするにはどうすればいいのでしょうか?

シート1に貼り付けると同時に書き込まれるようにしたいので
宜しくお願いします

【5266】Re:コピーとペーストについて教えてくださ...
回答  りん E-MAIL  - 03/4/30(水) 21:07 -

引用なし
パスワード
   やす さん、こんばんわ。

>同じシートが2枚あるとして
>シート1のセルに同じシートからコピーしたセルのデータを貼り付けるとシート2の
>同じ条件のセルにも書き込まれるようにするにはどうすればいいのでしょうか?

貼り付け先の条件がわからないので。

Sheet1のA1をSheet1とSheet2のB1にコピーするマクロ
Destinationでペースト位置を直接指定します。

Sub Test()
  With Worksheets("Sheet1").Cells(1, 1)
   .Copy Destination:=Worksheets("Sheet1").Cells(1, 2)
   .Copy Destination:=Worksheets("Sheet2").Cells(1, 2)
  End With
End Sub

こんな感じです。

【5269】Re:コピーとペーストについて教えてくださ...
お礼  やす  - 03/5/1(木) 7:42 -

引用なし
パスワード
   ありがとうございました。
これから早速やってみます

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