VBA 变量赋值

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