如何在VBA中命名工作表时添​​加字符串？

Question

我能做到这一点与下面的线宏，

Worksheets.Add(after:=Worksheets(current)).Name = Format(Date, "ddmmyy") + " deciles" 

但类似的线路没有在不同的宏观

Worksheets.Add.Name = "Performance classification" + Format(Date, "ddmmyy") 

我收到运行时错误1004工作 - 应用定义或对象定义的错误。

Answer 1

尝试

Worksheets.Add.Name = "Perform class " & Format(Date, "ddmmyy") 

如果使用“性能分级”的名字将是太长，> 31个字符。

该表达式适用于和不使用父项。

Answer 2

尝试：Worksheets.Add().Name = "Performance classification" + Format(Date, "ddmmyy")

在该工程的代码行，Worksheets.Add是你调用创建并返回一个新的工作表的方法。然后你调用Name属性并将其设置为新值。 VBA需要你使用的Add方法括号来表示你所关心的返回值（新的工作表对象）