窗体最终是要关闭的,可以给窗体设个退出事件,即关闭窗体同时关闭工作薄,同时,也要用代码把工作表隐藏起来,给代码设密码,打开工作薄弹出窗体等,全窗体操作,这样一般人就很难动你的表格了
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode = 0 Then Cancel = TrueEnd Sub