Question

我正在尝试打开一个已定义变量的工作表。我有一个ID列表，每个ID都有自己的工作表，其中工作表的名称是ID号。我想使用第一个ID值并将其分配给变量，然后使用该变量打开相应的工作表。这是我目前的代码。错误消息是“Object Required”。

    Dim proj As Range
    Dim Project As Range

    Set proj = Sheets("Project List").Range("B9")
    Set Project = proj.Value
    Sheets(Project).Activate

Answer 1

您正在尝试将值放入对象中。您也应该指定工作簿。请尝试改为：

Dim proj As Range
Dim Project As String

Set proj = ActiveWorkbook.Sheets("Project List").Range("B9")
Project = proj.Value
ActiveWorkbook.Sheets(Project).Activate

Answer 2

你只需要将范围转换为字符串，这就是Sheets（）需要的参数

Dim proj As Range

Set proj = Worksheets("Project List").Range("B9")
Sheets(proj.Text).Activate

如何使用其定义的变量打开工作表

2 个答案: