1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑忌粒器中插入模块

4、在模块当中输入如下代码,然后运行
Private Sub UserForm_Click() '单击泪凤窗体时关闭窗体
Unload Me
End Sub
Private Sub UserForm_Initialize()
Application.EnableCancelKey=xlDisabled '屏蔽Ctrl+Pause键
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode <> vbFormCode Then Cancel=True '屏蔽Alt+F4键
End Sub

5、双击左边工程资源管理器中的“ThisWorkbook”,在右边的工作簿代码窗炼欧罩口输入以下代码,用于调用两个程序以及控制按钮的显示状态
