VBA 中的“新建”关键字有什么作用？

Question

在 VBA 程序中，我们经常遇到关键字New，通常是在实例化对现有对象实例的对象引用时。但是在某些实例中我们使用关键字 New 而在其他实例中我们不使用例如：

Dim T As Excel.Workbook

Set T = Application.Workbooks(Bk)

在上面的示例 No.1 中，“New” 关键字未被使用

Dim fso As FileSystemObject

Set fso = New FileSystemObject

在上面的示例 2 中，New 关键字 正在 被使用

为什么？请记住，我是 VBA 的新手，但我会尽力理解！

除此之外，在声明对象引用时使用/不使用时我也会感到困惑：

Dim WS As Worksheet

在上面的示例 No.1 中，“New” 关键字未被使用

Dim myClassModule As New cl_ChartEvents

在上面的示例 2 中，New 关键字 正在 被使用

Microsoft 帮助什么也没告诉我...

允许隐式创建对象的关键字。如果在声明对象变量时使用 New，则在第一次引用它时会创建一个新的对象实例，因此您不必使用 Set 语句来分配对象引用。

Gratz2u

亲爱的人们只是深入了解的最后一次除尘

Dim WS as Worksheet

Set WS = Worksheets("Sheet1")

在这里，我们正在创建一个已经存在的对象，以便打开 MS Excel（例如，在“默认模式”下），当然是 Sheet1。 既然它存在并且New 关键字是不可能的，我们怎么能在一行中立即实例化这个对象？

4 @exantas

抱歉，没有足够的代表发布图片:-(

Answer 1

当您对变量进行调暗时，您正在指定它将保存的数据类型。在创建时，其值始终为Nothing，直到您对其进行初始化。 Set T = Application.Workbook(Bk) 将 T 变量初始化为 Application.Workbook 的特定实例，在本例中为“Bk”。

当您Dim fso as FileSystemObject 时，您基本上是在说fso 在某个时候会持有FileSystemObject；但是它的初始值为Nothing，直到您使用Set fso = New FileSystemObject 对其进行初始化。 New 关键字意味着您正在创建一个新对象，而不是像使用 Set T = Application.Workbook(Bk) 那样使用现有对象初始化变量

还要注意Set fso = FileSystemObject 是无效的，因为它不知道您希望分配给它的FileSystemObject 的哪个实例。这就是您使用 New 关键字创建 FileSystemObject 的新实例的原因。

如前所述，Dim WS As Worksheet 只是告诉编译器您希望变量 WS 保存一个 Worksheet 对象。由于没有指定其他内容，因此在 Dim 点，WS 设置为Nothing

Dim myClassModule As New cl_ChartEvents 相当于做：

Dim myClassModule as cl_ChartEvents
Set myClassModule = New cl_ChartEvents

... 除了一行代码而不是两行。这与 Dim WS As Worksheet 的不同之处在于变量被立即初始化，即 myClassModule 设置为 cl_ChartEvents 的新实例而不是 Nothing。

希望这会有所帮助！

Answer 2

您说：“[我们] 通常在实例化对现有对象实例的对象引用时遇到关键字 New”。恰恰相反：当某些东西不存在并且您想创建它时使用“新”，“新”。

如果某些内容已经存在，您可以省略 New 关键字，例如Application 对象、ActiveWorkbook 对象和 VBA 中的其他对象，即您在启动 Excel 时已经打开的所有内容。

Dim ... As New ... 是一个快捷方式

Dim ... As ...
Set ... = New ...

对于您创建新工作表的最后一个问题，由

Dim WS As Worksheet
Set WS = Sheets.Add
WS.Name = "My new worksheet"

您不能使用Dim WS as New Worksheet，因为 Microsoft 阻止您这样做。即使您在该指令中指定New，对象仍然是Nothing。