1. Home » 
2. Excel講座の総目次 » 
3. Excel VBA入門：目次 » 
4. セルのコピーと移動

セルのコピーと移動:Excel VBA入門

セルのコピー

• Copy メソッド：範囲を指定の範囲またはクリップボードにコピーします。
• セル範囲A1:A4をD1へコピーする
  

  Sub copy_1() 　　Range("A1:A4").Copy Range("D1") End Sub

  
  
• 挿入モードでD2セルへコピーする(Insertメソッド)
  コピー先のD2:D4セルの値は下方向へシフトする
  

  Sub copy_2() 　　Range("A1:A4").Copy 　　Range("D2").Insert shift:=xlShiftDown End Sub

  
  
• コピー先のD2:D4セルの値は右方向へシフトする
  

  Sub copy_3() 　　Range("A1:A4").Copy 　　Range("D2").Insert shift:=xlShifttoRight End Sub

  
  
• 別のシートへコピーする
  

  Sub copy_4() 　　Worksheets("Sheet1").Range("A1:A4").Copy _ 　　Destination:=Worksheets("Sheet2").Range("D1") End Sub

• セル範囲A1:A4をD1へ値だけをコピーする
  

  Sub copy_5() 　　Range("A1:A4").Copy 　　Range("D1").PasteSpecial Paste:=xlValues End Sub

  
  

セルの移動　　　topへ

• Cutメソッド：指定されたオブジェクトを切り取り、クリップボードに保存または貼り付けます。
• セル範囲A1:A4をD1へ移動する
  

  Sub cut_1() 　　Range("A1:A4").Cut Range("D1") End Sub

• 別のシートへ移動する
  Sheet1のA1:A4をSheet2のD1へ移動する
  

  Sub cut_2() 　　Worksheets("Sheet1").Range("A1:A4").Cut _ 　　Destination:=Worksheets("Sheet2").Range("D1") End Sub

• セル範囲A1:A4をD2へ挿入モードで移動する
  

  Sub cut_3() 　　Range("A1:A4").Cut 　　Range("D2").Insert shift:=xlShiftDown End Sub

データ型　　　topへ

• 表記	意味	型宣言文字	データ範囲	Byte数
  Byte	バイト型		0〜255	1
  Boolean	ブール型		TrueまたはFalse	2
  Integer	整数型	%	-32,768　〜　32,767	2
  Long	長整数型	&	-2,147,483,648 〜 2,147,483,647	4
  Currency	通貨型	@	-922,337,203,685,477.5808〜 　922,337,203,685,477.5807	8
  Single	単精度浮動小数点型	!	-3.402823E38〜-1.401298E-45(負の値) 1.401298E-45〜3.402823E38(正の値)	4
  Double	倍精度浮動小数点型	#	-1.79769313486232E308〜-4.94065645841247E-324(負の値) 4.94065645841247E-324〜1.79769313486232E308(正の値)	8
  Date	日付型		西暦1900年1月1日〜西暦9999年12月31日	8
  String	固定長文字列型	$	0〜約64KB	1L+2L
  	可変長文字列型		0〜2GB	10+L
  Variant	バリアント型		数値(Double) 文字列(可変長文字列)	16 22+L
  Object	オブジェクト型		オブジェクトを参照する	4
  Decimal	10進			14

スポンサードリンク

PageViewCounter
　
　Since2006/2/27