添加到许多工作表

Posted 2023-03-27

【中文标题】添加到许多工作表

【英文标题】：Adding to many worksheets

【发布时间】：2021-12-02 21:38:23

【问题描述】：

我想在 Excel 中添加一个工作表，并在 Access 中进行编程。在下面的代码行之后，我又得到了 9 个工作表（Statusbericht0、Tabel2、Tabel3、Tabel4、Tabel5、Tabel6、Tabel7、Tabel8、Tabel9、Tabel10）。

xlWB.Worksheets.Add.name = "Statusbericht0"

但重要的是，我在此代码行之前添加了一些工作表。

【问题讨论】：

您必须显示整个代码，否则无法说出错误所在。

【参考方案1】：

您必须在命名之前创建工作表。为了命名它，您需要掌握它。像这样：

Dim NewSheet As Worksheet
Set NewSheet = xlWB.Worksheets.Add
NewSheet.Name = "My new sheet"

【讨论】：

xlWB.Worksheets.Add.name 作为Add 返回工作表对象 (docs.microsoft.com/en-us/office/vba/api/excel.worksheets.add)