excel - 每当添加工作表时执行代码

Question

我有一个表单中的列表框，在初始化时用当前工作表的所有名称填充该列表框。我使用这样的代码：

For Each wCs In ActiveWorkbook.Worksheets
    If Not Right(wCs.Name, 10) = "Eng_Labels" Then
        ListBox3.AddItem wCs.Name
    End If
Next wCs

（Eng_Labels是我们用于计算的工作表，所以我们不想显示它。）

当用户添加工作表时，有没有办法让这个代码或类似的东西运行？是否有我可以将其绑定到的工作表添加类型的事件？

score 5 · Accepted Answer

将您的详细信息添加到工作簿的NewSheet事件中：

在此处输入图像描述

每次创建新工作表时都会执行此操作。

score 3 · Accepted Answer

是的，在工作簿的 VBA 中，Workbook_NewSheet每次将新工作表添加到工作簿时，您都可以使用 Excel 执行的事件

2 回答 2