セルに値を書き込む

[vb]
ThisWorkbook.Sheets("Sheet1").Cells(1, 1).Value = "恋"
ThisWorkbook.Sheets("Sheet1").Range(ThisWorkbook.Sheets("Sheet1").Cells(3, 3), _
ThisWorkbook.Sheets("Sheet1").Cells(6, 6)).Value = "愛"
[/vb]
Rangeに左上セルと右下セルを指定して、そのValueに値を入れれば、CellsのValueプロパティに値を代入すれば対象のセルに値を書き込める。
その範囲全てのセルに値を書き込むことができる。
サンプルでは(3,3)のセルから(6,6)のセルまでの範囲に『愛』を入れている。