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