記事キャッチ画像
 (41) セル内容のコピーと貼り付け! 

 1. セルの コピー 、 移動貼り付け 

 2. 形式を選択して、貼り付け 


  「広告」  
 


 (41) セル内容のコピーと貼り付け! 


Excel メニューバーの [ヘルプ] - [更新プログラムのチェック] にて、適用されていないアップデートがあれば行ってください。 

Excel 2016 for Mac 環境での説明となりますので、 Mac版 Excel 2011 では( VBA が利用できますが )同じ結果にならない場合があるかもしれません。

現状、 VBE 内で日本語を記述すると(貼り付けのみ可能な場合あり)乱れたり、保存時にクラッシュすることが多いため、 VBAコード は「未変換の英数字のみ」で記述してください。(テキストエディタからの貼り付けは可能)

今回は、コードのみの説明(一部は復習)となります!


 1. セルの コピー 、 移動 、 貼り付け 


Range("A1").Copy
Range("B2:C3").Select
ActiveSheet.Paste
Range("A1").Copy
ActiveSheet.Paste
Range("B2:C3")

Range("A1").Copy Range("B2:C3")

Application.CutCopyMode = False
上記3パターンは、同一結果となる「コピー&ペースト(貼り付け)」を表す。
セル(範囲)の全内容のコピー
は Rangeオブジェクトの Copy メソッド、(同)移動は Cut メソッド、(同)貼り付けPaste メソッド を用いる。
Copy 、 Cut 、 Paste メソッドの引数を省略した場合、クリップボード経由となる。

なお、 Cut メソッドの書式は Copy メソッドと同様のため、上記3パターンの CopyCut に置き換えればよい。
Copy 、 Cut は Range オブジェクトのメソッドで、 Paste は Worksheet オブジェクトのメソッドとなる。

Application.CutCopyMode に False を設定すると、コピー元のセル範囲の外枠が点滅した状態を解除できる。
False に変更するまでは、「コピー(移動)元のセル範囲」を別のセル範囲にも(繰り返し)貼付け可能だ。


 2. 形式を選択して、貼り付け 


Range("A1").Copy
Range("B3:D4").PasteSpecial xlPasteValues
Range("E3:E4").PasteSpecial xlPasteFormulas Range("F3:F4").PasteSpecial xlPasteFormats
Range("G3:G4").PasteSpecial Transpose:=True
Application.CutCopyMode = False
「形式を選択して、貼り付け」は、 Rangeオブジェクト(Cellsプロパティ)の PasteSpecial メソッドを用いる。
この場合の Rangeオブジェクトには、「貼り付け先のセル範囲」を指定する。

メソッドの形式は、以下のとおり。
Range.PasteSpecial 貼り付け対象, 演算, 空白セル, 行列入れ替え
名前付き引数は、順に Paste Operation SkipBlanks Transpose となる。

SkipBlanks 空白セルを無視しない(False、規定値)、空白セルを無視する(True
Transpose  行列を入れ替えない(False、規定値)、行列を入れ替える(True

貼り付け対象 定数説明
xlPasteAll (既定)全て
xlPasteAllExceptBorders罫線を除くすべて
xlPasteValues
xlPasteFormulas数式
xlPasteFormats書式
xlPasteValuesAndNumberFormats値と数値の書式
xlPasteFormulasAndNumberFormats数式と数値の書式
xlPasteCommentsコメント
xlPasteValidation入力規則
xlPasteColumnWidths列幅
xlPasteAllUsingSourceThemeコピー元のテーマを使用してすべて貼り付け
xlPasteAllMergingConditionalFormatsすべての結合されている条件付き書式

演算 定数説明
xlPasteSpecialOperationNone (既定)演算をしない
xlPasteSpecialOperationAdd加算
xlPasteSpecialOperationSubtract減算
xlPasteSpecialOperationMultiply乗算
xlPasteSpecialOperationDivide除算


セル参照やセル操作の説明は、もう少しで終わりです
退屈かもしれませんが、説明はどこかでしないといけませんので、あと少し我慢してくださいね。


お疲れ様でした!


現状、 VBE 内で日本語を記述すると(貼り付けのみ可能な場合あり)乱れたり、保存時にクラッシュすることが多いため、 VBAコード は「未変換の英数字のみ」で記述してください。(テキストエディタからの貼り付けは可能)





最後まで読んでいただき、ありがとうございます。
ぜひ、右側の「人気ブログランキング」投票に ご協力ください。
また、お越しくださいませ。
// アタル

  「広告」