セルの選択/コピー/貼り付け/切り取り/挿入/削除/クリアする [ExcelのVBA]
選択
セルを選択します。
' A1のセルを選択 Range("A1").Select ' A1からA3のセルを選択 Range("A1:A3").Select ' A1とB2のセルを選択 Range("A1,B2").Select
コピー
セルをコピーします。
' A1のセルをコピー Range("A1").Copy ' A1からA3のセルをコピー Range("A1:A3").Copy ' A1とB2のセルをコピー Range("A1,B2").Copy
貼り付け
A1のセルをコピーしてC3のセルに貼り付けます。
Private Sub CommandButton1_Click() ' A1をコピー Range("A1").Copy ' C3を選択 Range("C3").Select ' アクティブシートのC3に貼り付ける ActiveSheet.Paste ' (以下の方法でも貼り付け可能) 'Sheet1.Paste 'Worksheets(1).Paste End Sub
切り取り
A1のセルを切り取りC3のセルに貼り付けます。
Private Sub CommandButton1_Click() ' A1を切り取り Range("A1").Cut ' C3を選択 Range("C3").Select ' アクティブシートのC3に貼り付ける ActiveSheet.Paste End Sub
挿入
セルを挿入して右方向、下方向へシフトする
Private Sub CommandButton1_Click() Range("A1").Value = "り" Range("A2").Value = "ん" Range("A3").Value = "ご" Range("B1").Value = "メ" Range("B2").Value = "ロ" Range("B3").Value = "ン" Range("C1").Value = "み" Range("C2").Value = "か" Range("C3").Value = "ん" ' B2にセルを挿入して右方向へシフトする Range("B2").Insert xlShiftToRight ' C3にセルを挿入して下方向へシフトする Range("C2").Insert xlShiftDown End Sub
[結果]
削除
セルを削除して左方向、上方向へシフトする
Private Sub CommandButton1_Click() Range("A1").Value = "り" Range("A2").Value = "ん" Range("A3").Value = "ご" Range("B1").Value = "メ" Range("B2").Value = "ロ" Range("B3").Value = "ン" Range("C1").Value = "み" Range("C2").Value = "か" Range("C3").Value = "ん" ' B2のセルを削除して左方向へシフトする Range("B2").Delete xlShiftToLeft ' C3のセルを削除して上方向へシフトする Range("C2").Delete xlShiftUp End Sub
[結果]
クリア
セルの値/式、書式、全てをクリアします。
Private Sub CommandButton1_Click() ' 値/式のクリア Range("B2").ClearContents ' 書式のクリア Range("C2").ClearFormats ' 全てのクリア Range("D2").Clear End Sub
[初期状態]
[結果]
VBAの固有操作
[セルの操作]
セルの値/計算式を設定する
セルのフォントを設定する
セルの背景色/網掛けを設定する
セルの文字配置を設定する
セルの表示形式を設定する
セルに罫線を設定する
セルの選択/コピー/貼り付け/切り取り/削除/クリア
セルの結合/結合の解除をする
セルにコメントを追加/削除する
シートの保護とセルのロック解除をする
セルの値をソートする
[テーブル/グラフ/ピボットテーブル]
テーブルの作成/操作
グラフの作成/操作
ピボットテーブルの作成/操作
[ワークシート]
シートの追加/移動/コピー/削除/表示/印刷
ワークシートのイベント
[ワークブック]
ブックを開く/追加/上書き/名前保存/PDFの作成
ワークブックのイベント
[その他]
その他の操作まとめ
エクセル講座のクイックリンク
スポンサーリンク
関連記事
公開日:2015年07月19日 最終更新日:2015年07月23日
記事NO:01217