excel - VBA - 变量工作表

Question

我在 Excel 中有一个输入表，用户可以在其中输入许多帐户详细信息。填写表格后，他们按下一个按钮，该按钮使用 VBA 生成输入文件。第一步是生成一个新的工作表，该工作表的名称结合了客户名称和硬编码词。正如您可以想象的那样，此表需要是一个变量，因为此输入表正被多个帐户上的许多人使用。

我用来生成新工作表的代码是:

ActiveWorkbook.Worksheets.Add(after:=Worksheets(Worksheets.Count)).Name = Trim(Sheets("Account Input").Range("B8").Value) & "_ACC"

我现在尝试将其保存为变量，以便可以在整个代码中调用该变量。我尝试过的语法是:

Set WsAcc = Trim(Sheets("Account Input").Range("B8").Value) & "_ACC"

问题是我得到一个运行时错误 424 所需的对象。我已经尝试过没有修剪，但仍然出现错误。运行时 eroor 1004 应用程序定义或对象定义错误。

我知道必须有更好的方法来达到预期的结果，我只是不太确定。

提前致谢。

Answer 1

代替:

Set WsAcc = Trim(Sheets("Account Input").Range("B8").Value) & "_ACC"

和:

Set WsAcc = Sheets(Trim(Sheets("Account Input").Range("B8").Value) & "_ACC")