' コメントは行頭にカンマ
Sub abc()
' プログラム
End Sub
Function abc(引数 As データ型) As 戻り値のデータ型
' プログラム
abc = 戻り値
End Function
Worksheets("Sheet1").Range("A1").Valule = "abc"
Worksheets("Sheet1").Cells(3, 1).Valule = "abc"
Worksheets("Sheet1").Cells(3, 1).Offset(1,0).Valule = "abc"