处理带空格的工作表名称

Question

我可以设置一个没有空格的工作表名称，并在没有问题的情况下对其进行操作。但是，我用空格尝试的所有东西都不起作用。

Dim myBook As Workbook
Dim myWorksheet As Worksheet
Set myBook = ActiveWorkbook
Set myWorksheet = myBook.Sheets("my worksheet name")

我试过单独设置单引号。

Answer 1

您发布的代码应该可以正常工作，前提是有问题的工作簿是活动工作簿，并且有一个名为“我的工作表名称”的工作表，没有任何前导或尾随空格。

尝试按如下方式检查工作表名称：

For Each myWorksheet In myBook.Sheets
    Debug.Print """" & myWorksheet.Name & """"
Next myWorksheet

这将名称括在引号中，以便您可以轻松查看名称是否包含前导或尾随空格。

Answer 2

尝试在单引号之间使用工作表名称，如下所示：

Set myWorksheet = myBook.Sheets("'my worksheet name'")