怎么用excel vba实现自动敲击enter键？

2025-03-09 08:07:22

推荐回答（2个）

回答1：

Sub AAA()
    Application.DisplayAlerts = False '关闭提示信息
    Sheets("SHEET2").Delete
    Sheets("SHEET3").Delete
    Application.DisplayAlerts = True '打开提示信息
End Sub

在你删除操作前后加上上面两句代码，如果是循环删除，则在循环外添加。或者你直接在过程的开头和结束加也行。

回答2：

本示例删除活动工作簿的 Sheet3 工作表，并且不显示确认对话框。
Application.DisplayAlerts = False
Worksheets("Sheet3").Delete
Application.DisplayAlerts = True