VBA セルをコピー&ペースト(貼り付け)する
*このページは excel-mania.com のアーカイブです。(2025年 サイト統合)
セルをコピー&ペースト(貼り付け)する
セルのコピー&ペーストは以下のようなプログラムで実装できます。
' A1 をコピー
Range("A1").Copy
' B1 にペースト(貼り付け)
Range("B1").PasteSpecial
| 貼り付け対象 | 定数 | 値 | 備考 |
|---|---|---|---|
| すべて | xlPasteAll（既定） | -4104 | 規定値 |
| 数式 | xlPasteFormulas | -4123 | |
| 値 | xlPasteValues | -4163 | |
| 書式 | xlPasteFormats | -4122 | |
| コメント | xlPasteComments | -4144 | |
| 入力規則 | xlPasteValidation | 6 | EXCEL2002～ |
| 罫線を除く全て | xlPasteAllExceptBorders | 7 | |
| 列幅 | xlPasteColumnWidths | 8 | EXCEL2002～ |
| 数式と数値の書式 | xlPasteFormulasAndNumberFormats | 11 | EXCEL2002～ |
| 値と数値の書式 | xlPasteValuesAndNumberFormats | 12 | EXCEL2002～ |
サンプルプログラム
セルの値と書式をコピー
Range("A1:A5").Copy
Range("B1:B5").PasteSpecial
セルの値だけをコピー
Range("A1:A5").Copy
Range("B1:B5").PasteSpecial Paste:=xlPasteValues
セルの罫線以外の書式・値をコピー
Range("A1:A5").Copy
Range("B1:B5").PasteSpecial Paste:=xlPasteAllExceptBorders
