エクセルVBAで、 シート1からシート2にコピペするのに、シート2の書式やセルの大きさは保ったままペーストしたいです。

Excel | Visual Basic68閲覧

ベストアンサー

0

ThanksImg質問者からのお礼コメント

ありがとうございます!

お礼日時:2021/11/30 9:43

その他の回答(2件)

0

Sheet1.range("E81:BJ170").Copy Sheet2.range("E3:BJ93").PasteSpecial _ これでは 根本的に コピー領域と 貼り付け領域が 違います。 Sheet1.range("E81:BJ171").Copy Sheet2.range("E3:BJ93").PasteSpecial _ に なるかと そこで コピーにしないで、値の代入にすれば いいかと Sheet2.Range("E3:BJ93").Value = Sheet1.Range("E81:BJ171").Value ただ SHEET2側が 結合されていれば コピーはしますが、当然消えるデーターは あります。

0

1セルずつ値をコピーする場合です。 Sub sample() Dim rng As Range For Each rng In Sheet1.Range("E81:BJ170") Sheet2.Range("E3").Offset(rng.Row - Range("E81").Row, rng.Column - Range("E81").Column).Value = rng.Value Next End Sub