删除工作表并避免Excel要求用户确认,而是使用自定义信息

我有一个触发一连串事件的button。 其中一个事件是删除工作表 。 在他删除任何东西之前,我popup我的自定义YES / NO信息,要求他确认整个过程。

然后是删除工作表的子事件, Excel要求自己的消息以确认删除工作表。 问题是,如果他在那个时候说“不”,那我的申请就会处于不一致的状态。

我怎样才能绕过Excel要求确认删除表单?

您可以使用以下方法更改Excel的默认显示警报参数:

Application.DisplayAlerts = False 

不要忘记在stream程结束时恢复标准行为:

 Application.DisplayAlerts = True 

用“报告”表格删除所有表格**

 Dim NM As String Dim CTS As Integer Dim CNT2 As Integer Dim CNT3 As Integer CNT3 = 1 CNT2 = 1 CTS = Sheets.Count Do Until CNT2 = CTS + 1 NM = Sheets(CNT3).Name If Name = "Report" Then Range("A1").Select CNT3 = CNT3 + 1 Else Sheets(NM).Select Application.DisplayAlerts = False ActiveWindow.SelectedSheets.Delete Application.DisplayAlerts = True End If CNT2 = CNT2 + 1 Loop