セルを指定するにはRangeオブジェクトを使ってきましたが
Cellsで指定する方法があります。
Cells(行,列).Value = “文字列”
座標で指定します。
イメージとしては左上から始まります。
座標の左上は1,1です。
サンプルソース
Private Sub start()
Cells(1, 1).Value = “この座標は1,1です”
End Sub
Private Sub start()
Cells(1, 1).Value = “この座標は1,1です”
End Sub
ループで回して範囲の座標を書き込みましょう？
サンプル
Private Sub start()
‘Cells(1, 1).Value = “この座標は1,1です”
Private Sub start()
‘Cells(1, 1).Value = “この座標は1,1です”
For i = 1 To 5
For j = 1 To 5
Cells(i, j).Value = “この座標は” & i & “,” & j & “です”
Next
Next
End Sub
実行結果
この座標は1,1です この座標は1,2です この座標は1,3です この座標は1,4です この座標は1,5です
この座標は2,1です この座標は2,2です この座標は2,3です この座標は2,4です この座標は2,5です
この座標は3,1です この座標は3,2です この座標は3,3です この座標は3,4です この座標は3,5です
この座標は4,1です この座標は4,2です この座標は4,3です この座標は4,4です この座標は4,5です
この座標は5,1です この座標は5,2です この座標は5,3です この座標は5,4です この座標は5,5です
この座標は1,1です この座標は1,2です この座標は1,3です この座標は1,4です この座標は1,5です
この座標は2,1です この座標は2,2です この座標は2,3です この座標は2,4です この座標は2,5です
この座標は3,1です この座標は3,2です この座標は3,3です この座標は3,4です この座標は3,5です
この座標は4,1です この座標は4,2です この座標は4,3です この座標は4,4です この座標は4,5です
この座標は5,1です この座標は5,2です この座標は5,3です この座標は5,4です この座標は5,5です