1、首先在开发工具中打开VBA编辑器
2、在单元格区域当中输入一些内容作为例子
3、在VBA编辑器中插入模块
4、在模块当中输入如下代码，然后运行Private Sub UserForm_Clic氯短赤亻k() '单击窗体时关闭窗体U荏鱿胫协nload MeEnd SubPrivate Sub UserForm_Initialize()Application.EnableCancelKey=xlDisabled '屏蔽Ctrl+Pause键End SubPrivate Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode <> vbFormCode Then Cancel=True '屏蔽Alt+F4键End Sub
5、双击左边工程资源管理器中的“ThisWorkbook”，在右边的工作簿代码窗口输入以下代码，用于调用两个程序以及控制按钮的显示状态
