vba - 如何使用 VBA 在 Excel 中禁用添加工作表按钮？

Question

我有一个工作簿，我想禁用选项卡旁边的“添加新工作表”按钮。我搜索并发现以下内容禁用了工作簿上的插入选项，这很棒。

Application.CommandBars("Ply").FindControl(, 945).Enabled = False 
Application.CommandBars("Insert").Controls(4).Enabled = False  

但我还没有找到“添加新工作表”按钮的命令。是否有一个地方列出了所有这些选项或我可以用来识别控件或按钮的工具。

工作簿是共享的，因此在创建时自动删除工作表将不起作用。

Protect Structure 也不起作用并抛出以下错误:

Answer 1

在 ThisWorkbook 代码表中，粘贴以下内容。

Option Explicit

Private Sub Workbook_NewSheet(ByVal Sh As Object)
    Application.DisplayAlerts = False
    Sh.Delete
End Sub

创建的任何新(或复制)工作表都会立即删除。