ｖｂ０３ - 経済統計練習帳

Sub test()
 
Cells(1, 1).Value = "EXCEL VBA"
For i = 1 To 5
    Cells(i, 1).Value = "EXCEL"
Next
 
buf = Range("A1").Value
 
 
Cells(7, 7).Value = buf + "ccccc"
 
 
 
End Sub