
VBA
已经在一个问题里回答过了:就是把sheet3作为一个提示用的工作表,关文档的时候让它不隐藏,别的都隐藏掉。打开文件时,如果禁用宏,就只显示sheet3,别的都不显示;如果启用了宏,就用宏把所有工作表设为可见,然后隐藏sheet3。然后再调用其他宏继续运行。最后一步还要给
VBA加个密码,防止别人改了显示设置。这个思路是参考别人代码总结出来的,自己也调试成功了。操作方法:双击ThisWorkbook,粘贴下面的代码:
VBAPrivate Sub Workbook_BeforeClose(Cancel As Boolean) Dim i As Integer Application.DisplayAlerts = False For i = 1 To Sheets.Count If Sheets(i).Name sheet3 Then Sheets(i).Visible = 2 Else Sheets(i).Visible = 1 End If Next ThisWorkbook.Save Application.QuitEnd SubPrivate Sub Workbook_Open() For i = 1 To Sheets.Count Sheets(i).Visible = 1 Next Sheets(3).Visible = 2 ' Call other MacroEnd Sub