1、給文本、數值、日期等變量賦值,其語句為:
Let 變量 = 數據
其中,“Let” 是可以省略的。
示例:
初始工作表:
運行代碼:
Sub mytest() Dim str As String Let str = "變量賦值" Cells.ClearContents '清除活動表中的所有數據
Range("B2") = str '選擇 B2 單元格,輸入值
End Sub
2、給對象變量(Object型的變量,如單元格)賦值, 其語句為:
Set 變量 = 對象
其中,“Set” 不能省略。
示例
初始表:
運行代碼:
Sub mytest() Static rng As Range Set rng = Range("C3") rng.Value = "對象變量賦值" '選擇 C3 單元格,輸入值
End Sub