Excel 实现执行某个命令后会弹窗提示

1、新建一个Excel文档，后缀名为.xlsx。

2、打开后另存为.xlsm格式文件，此时在标题栏中可以看到文件后缀名为.xlsm。

3、切换到VBA窗口，方法可以参考如下链接：

4、在ThisWorkbook中输入代码：

Sub key()

    Application.OnKey "^s", "baocun"    ‘指定快捷键Ctrl+S

End Sub

5、插入模块，具体操作：点击菜单栏“插入”—“模块”。

6、在新建的模块中，输入代码：

Sub baocun()

    ThisWorkbook.Save   ’保存工作簿

    MsgBox "保存成功!"

End Sub

7、回到Excel窗口，按下Ctrl+S键成功后就会弹出窗口提示保存成功！