Excel文档级别的自定义 - 添加工作表

Question

12 浏览2023年4月1日

匿名的 2023年4月1日

0 Comments

这个工作簿有三个工作表 - Sheet1、Sheet2和Sheet3。我怎样添加另一个工作表，让用户添加数据并保存数据？我知道可以使用Sheet1.Copy或者ThisWorkbook.Sheets.Add来添加，但是我无法访问我添加的新工作表。全局变量仍然只有三个工作表（Sheet1、Sheet2和Sheet3），尽管在深层次上工作表的数量是4，就像ThisWorkbook.Sheets.Count给了我一个值为4一样。\n如果无法动态添加新的工作表，是否有一种方法可以在设计时添加工作表，使它们都像Sheet1、2和3一样工作？

0

1 答案

匿名的 · Answer 1 · 2023-05-01T07:19:43+00:00

问题：Excel文档级别自定义 - 添加工作表

原因：在Excel中，有时需要通过代码的方式添加工作表。这可能是因为用户需要自动添加工作表，或者在特定条件下需要执行某些操作时添加工作表。

解决方法：可以使用VBA代码添加工作表。可以通过以下代码添加工作表：


Sub AddSheet()
    Sheets.Add
End Sub

此外，还可以通过以下代码访问所有工作表，包括用户添加的工作表和通过代码添加的工作表：


Sub LoopThroughSheets()
    Dim ws As Worksheet
    For Each ws In ThisWorkbook.Sheets
        '执行操作
    Next ws
End Sub

通过以上方法，可以实现在Excel文档中添加工作表，并对添加的工作表进行操作。