excel - 工作表不起作用

Question

我正在尝试编写一个 excel Visual Basic 宏。

我的问题是这段代码有效：

Dim x As String
x = Worksheets("Abgabe").Cells(20, 3).Value

但这不会：

Dim y As Worksheet
y = Worksheets("Abgabe")

此外，如果我使用 ActiveWorkbook，则代码不起作用。

Dim y As Worksheet
y = ActiveWorkbook.Worksheets("Abgabe")

我收到此错误：

未设置对象变量或 With 块变量

可能是什么问题呢？

Answer 1

暗淡为工作表

y = 工作表（“Abgabe”）

使用这个（你必须使用Set）

Dim y As Worksheet
Set y = Worksheets("Abgabe")

从 MSDN（http://msdn.microsoft.com/en-us/library/aa192490.aspx）：

Set Keyword: In VBA, the Set keyword is necessary to distinguish between 
assignment of an object and assignment of the default property of the object.