Excel VBA将variables设置为工作表

我想设置一个Worksheetvariables的Activesheet但我得到一个错误

对象variables或块variables未设置

这是我的语法 – 这样做的适当方式是什么？

 Sub TestIt() Dim ws2 As Worksheet, ws1 As Worksheet ws2 = ActiveWorkbook.ActiveSheet ws1 = "Belgium" Debug.Print ws2 Debug.Print ws1 End Sub 

Answer 1

1-您需要使用Set关键字来分配对象variables。

2-不能直接将表单variables分配给string，但需要通过Worksheets集合进行索引

3-您不能Debug.Print工作表，但只有其名称或一些单元格内

 Sub TestIt() Dim ws2 As Worksheet, ws1 As Worksheet Set ws2 = ActiveWorkbook.ActiveSheet Set ws1 = ThisWorkbook.Worksheets("Belgium") Debug.Print ws2.Name Debug.Print ws1.Cells(1,1).Value End Sub