SheetsAdd ActiveSheetName = a ApplicationDisplayAlerts = True End Sub 操作步骤1按ALT+F11进入VBA编辑器，双击左上角的thisworkbook，然后将上面的代码粘贴进右侧的空白代码区2关闭VBA编辑器3在EXCEL的。然...