2

Excel 2007 を使用しています。2 つの異なるワークシート間でマクロを作成しようとしています。

セルをコピーしてワークシート 2 に貼り付けようとしています。これは非常に単純なことですが、ここに私の問題があります。マクロを実行するたびに、値をワークシート 2 の新しい行にコピーできるようにしたいのです。

例:
データの例: 行見出し: (a1) 月、(b1) 1、(c1) 2、(d2) 3. データ: (a1) 7 月 12 日、(b2) 2、(c2) 5、( d2) 1 データ : (a1) 2012 年 8 月、(b2) 1、(c2) 4、(d2) 2。

コピー先の場所。行見出し : (a1) 月、(b1) 1 の値、(c1) 2 の値、(d2) 3 の値。

以前は VB を使用したことがなく、Excel でフォーラムを使用することに慣れていました。
次のことを試しました: Range("A1:A2").Select Selection.Copy Range("C4").Select ActiveSheet.Paste

あるワークシートから図を書き留めてから別のワークシートに書き込むのではなく、スプレッドシートを自動化しようとしています。

自分の頭の中で物事を複雑にしすぎているのか、それとももっと複雑なのか、よくわかりません..

すべての回答に事前に感謝します。

4

1 に答える 1

0

私はこれで非常に遅れているかもしれませんが、ここでSheet2の最後の行を見つけることができます

Lrow=ThisWorkbook.Sheets("Sheet2").Cells(65536,).end(Xlup).Row

最後の行が見つかったら、以下に示すように、範囲を 1 ずつ増やして、最後の行の次の行に貼り付けることができます。

Range("A1:A2").Select 
Selection.Copy Range("C" & Lrow+1).Select ActiveSheet.Paste

お役に立てれば!

于 2013-04-18T09:04:05.327 に答える