OfficeType
  1. ホーム
  2. Excel VBA
  3. セル
  4. 複数セルに一括でデータを入力しよう

VBA～複数セルに一括でデータを入力しよう～Excel

VBAで複数セルに一括でデータを入力する方法を解説します。

範囲に一括入力

範囲を指定したい時はRange("範囲の左上のセル:範囲の右下のセル")で指定できます。

下のコードを実行するとセルA1からセルC3の範囲にエクセルという文字列が一括入力されます。 

Sub test1()

Range("A1:C3") = "エクセル"

End Sub

image-01

非連続セルに一括入力

非連続セルを選択したい場合はRange("一つ目のセル番地,二つ目のセル番地").Selectで選択できます。カンマで区切ることでさらに複数のセルを選択できます。

下のコードを実行するとセルA1とセルC1にエクセルという文字列が一括入力されます。 

Sub test2()

Range("A1,C1") = "エクセル"

End Sub

image-02

離れた範囲に一括入力

非連続セルを選択したい場合はRange("一つ目の範囲の左上のセル:一つ目の範囲の右下のセル,二つ目の範囲の左上のセル:二つ目の範囲の右下のセル").Selectで選択できます。カンマで区切ることでさらに複数の範囲を選択できます。

下のコードを実行するとセルA1からセルB3の範囲と、セルD1からセルE3の範囲にエクセルという文字列が一括入力されます。 

Sub test3()

Range("A1:B3,D1:E3") = "エクセル"

End Sub

image-03