第13回.セルのコピペ方法を知る(CopyとPaste、さらに)
エクセルVBAでは、セルをコピーして他のセルに貼付けることが頻繁にあります。
セルをコピーして貼り付け、
セルをコピーして値貼り付け、
セルをコピーして書式貼り付け、
等々です。
これらを必要に応じて、使い分ける必要があります。
実際に、マクロの記録をして確認しましょう。
セルをコピーして貼り付け
・A2セルに貼付け
・ESCでコピー状態を解除

.Copy ・・・ コピー
.Paste ・・・ 貼り付け
Application.CutCopyMode = False ・・・ コピー状態の解除
多くの場合セルのSelectは不要です。
しかし、貼り付け先(Paste)のセルは選択しておく必要があります。
従って、

セルをコピーして値貼り付け
・A2セルに値貼付け
・ESCでコピー状態を解除

※画像の都合で、改行位置を変更しています。
.Copy ・・・ コピー
.PasteSpecial ・・・ 形式を選択して貼り付け
Paste:=xlPasteValues ・・・ 値
前述のように、多くの場合セルのSelectは不要です。
形式を選択して貼り付け(PasteSpecial)では、貼り付け先のセルは選択しておく必要がありません。
Operation:=xlNone
SkipBlanks:=False
Transpose:=False
この3つは、指定しない(指定を省略した)場合は、この指定と同じになりますので省略できます。
従って、

セルをコピーして書式貼り付け
・A2セルに書式貼付け
・ESCでコピー状態を解除

※画像の都合で、改行位置を変更しています。
.Copy ・・・ コピー
.PasteSpecial ・・・ 形式を選択して貼り付け
Paste:=xlPasteFormats ・・・ 書式
前述のように、多くの場合セルのSelectは不要です。
形式を選択して貼り付け(PasteSpecial)では、貼り付け先のセルは選択しておく必要がありません。
Operation:=xlNone
SkipBlanks:=False
Transpose:=False
この3つは、指定しない(指定を省略した)場合は、この指定と同じになりますので省略できます。
従って、

PasteSpecial(値貼り付け、書式貼り付け等)の細かい指定
ショートカットはコピー後に、Ctrl + ALT + V

Operation ・・・ 演算
SkipBlanks ・・・ 空白セルを無視する
Transpose ・・・ 行列を入れ替える
必要に応じて、マクロ記録を使って指定方法を調べれば良いです。
もっと簡単なコピペ方法はないものか
ちょっと面倒・・・ですよね。
最もよく使う、
セルをコピーして値貼り付け
順に紹介します。
もっと効率的な「セルをコピーして貼り付け」
Ctrlキーを押したままで、選択セルの境界をドラッグしてコピーできますよね。

セルの境界にカーソルを当てて、

この操作をマクロの記録をすると、

つまり、貼り付け先を一緒に指定していることになります。
セルを単純にコピーするなら、この書き方の方が簡単なのは言うまでもありません。
そして、
セル選択は省略できますし、
Destination:=
も省略できますので、

ただし、できればDestination:=は書いた方が見やすいかもしれませんね。
複数セルの範囲の場合は、
コピー元は正しくセル範囲を指定しますが、
コピー先は、先頭セルだけ指定すれば良いです、
これは、シート上で手作業でやる場合と同じです。
マクロならではの「値のコピー」

Range("A1").Valueでセルの値を取得し、Range("C3").Valueに設定しています。
これは、複数セルの範囲でもできます。

※画像の都合で改行しています。
.Value
を省略できません。
セル(Range、Cells)にプロパティ(Value)を書かなければ、.Valueが省略されたことになると書きましたが、
この場合だけ(他にも省略できない場合はありますが)は、.Valueを省略できないので書き忘れないようにして下さい。
また、=の左辺(貼り付け先)と右辺(コピー元)は同じ大きさ(同じ行数列数)のセル範囲を指定する必要があります。
左辺が右辺より小さい場合は部分的にコピーされ、左辺が右辺より大きい場合は不足している部分が#N/Aとなります。
「セルのコピペ方法を知る」のまとめ
マクロVBAでは、最後に紹介した2つの書き方を覚えれば良いでしょう。
「形式を選択して貼り付け」は、必要な時にマクロの記録でいつでも調べられます。
セルのコピペ方法をまとめると、
※貼り付け先は先頭セルを指定。
※貼り付け先とコピー元は同じ大きさのセル範囲を指定
ExcelマクロVBA入門等の対応ページ
第41回.セルのコピー&値の貼り付け(PasteSpecial)
第42回.セルをコピーするとは
同じテーマ「マクロVBA再入門」の記事
第10回.ワークシートの関数を使う(WorksheetFunction)
第11回.分からない事はエクセルに聞く(マクロの記録)
第12回.エクセルの言葉を理解する(オブジェクト、プロパティ、メソッド)
第13回.セルのコピペ方法を知る(CopyとPaste、さらに)
第14回.セルの書式を設定する(NumberFormatLocal,Font,Borders,Interior)
第15回.手作業で出来なければマクロは書けない
第16回.エクセルの機能を上手に使う
第17回.セルにブック・シートを指定する(Workbooks,Worksheets,With,Set)
第18回.シートをコピー・挿入・削除する(Worksheets,Copy,Add,Delete)
第19回.ブックを開く・閉じる・保存する(Workbooks,Open,Close,Save,SaveAs)
第20回.全てのシートに同じ事をする(For~Worksheets.Count)
新着記事NEW ・・・新着記事一覧を見る
シート関数のCOUNTIFS,SUMIFS,MAXIFSと同じ処理|Power Query(M言語)入門(2023-02-28)
新旧マスタの差異比較|Power Query(M言語)入門(2023-02-28)
有効な最新単価の取得|Power Query(M言語)入門(2023-02-26)
有効な最新単価の取得|Power Query(M言語)入門(2023-02-21)
グルーブ内の最小・最大|Power Query(M言語)入門(2023-02-17)
2つのテーブルのマージ|Power Query(M言語)入門(2023-02-15)
「売上」が数値の行のみ取り込む|Power Query(M言語)入門(2023-02-13)
A列のヘッダー名を変更する|Power Query(M言語)入門(2023-02-11)
CSVのA列が日付の行だけを取り込む|Power Query(M言語)入門(2023-02-10)
列数不定のCSVの取り込み|Power Query(M言語)入門(2023-02-09)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得(End,Rows.Count)|VBA入門
2.RangeとCellsの使い方|VBA入門
3.変数宣言のDimとデータ型|VBA入門
4.繰り返し処理(For Next)|VBA入門
5.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
6.マクロって何?VBAって何?|VBA入門
7.並べ替え(Sort)|VBA入門
8.エクセルVBAでのシート指定方法|VBA技術解説
9.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
10.ブックを閉じる・保存(Close,Save,SaveAs)|VBA入門
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。