異なるワークシートの情報を集計ワークシートにコピーして集計しようとしています。具体的には、sheet3のセルO3とO4をそれぞれsheet1のセルD3とE3にコピーしようとしています。それから私は上に移動して、セルO3とO4をシート4からシートD4とE4にコピーしてシート1にコピーしたいと思います。ループを使用したマクロのコピー＆ペースト
私はマクロコーディングに全く新しいので、本当に助けていただければ幸いです。私は、ループを使用しなければならないと仮定しています。
P.Sワークシートは、コードに影響を与える企業（たとえば "DataGroup"ではなく "Sheet3"）の名前になりますか？
シートをループする場合は、明示的に参照する必要はありません。Sheets("DataGroup")Sheets(1)を使用すると、各整数で簡単にループすることができます。
あなたには、いくつかのワークシートを含むワークブックを持っており、そのうちの一つがSummary呼び出された場合
Sub Copying()
Dim i As Integer, j As Integer
j = Sheets.Count
For i = 2 To j
Sheets(1).Range("D" & i + 1) = Sheets(i).Range("O3").Value
Sheets(1).Range("E" & i + 1) = Sheets(i).Range("O4").Value
Next i
End Sub
は、このコードはSummaryの列Aに他のワークシートのそれぞれからセルA1の値をコピーします。あなたのニーズに合わせてこれを適応させることができます。
あなたはこれまでに何をしていますか？これをチェックして[リンク]（http://stackoverflow.com/questions/37107574/copy-and-paste-specific-cells-from-one-worksheet-to-another） –
マクロレコーダーの電源を入れてください上記の手順を実行してください。これはあなたにいくつかのコードを提供し、次に[どのように '.Select'を回避するかを読む]（http://stackoverflow.com/questions/10714251/how-to-avoid-using-select-in-excel-vba -macros）を使ってそれを強化し、データを直接操作する方法を学びます。 – BruceWayne
フォーマットをコピーする必要がない場合は、Excelでコピー＆ペーストを使用しないでください。セル/範囲とその値を使用して設定してください。 – Mono