Excel07如何用宏让隐藏的工作表显示？又如何用宏将显示的工作簿隐藏？
我有一个设想，就是想让Excel用户强制使用宏，这样就能保证我的工作表的全部功能齐全，但是有些时候用户不允许用宏，就无法实现了。因为VBA没有强制使用宏这个模块，所以我用另一个方法来实现这个目的，就是先右键隐藏所有的工作表，保留一个就行了，然后在上面注明如果开启宏才能使用这个表，一旦用户开启了宏，就能达到用编辑好的宏来显示隐藏的工作表了，同时也能达到其他宏功能的目的。关键是怎么用宏来显示被隐藏了的工作表？然后又怎么用宏来隐藏被唯一保留的那个工作表？
使ç¨å·¥ä½è¡¨çå±æ§visibleå³å¯ã
1ã代ç å¦ä¸
Sub test()
'éè表1
Sheets("表1").Visible = 0
'æ¾ç¤ºè¡¨1
Sheets("表1").Visible = -1
End Sub
2ã使ç¨ALt+F11ï¼è¿å ¥ï¼æå ¥æ¨¡åï¼ç²è´´ä»£ç ï¼æä¸F5å³å¯
温馨提示：答案为网友推荐，仅供参考
第1个回答 2013-08-12
1、Alt+F11,双击thiswork在打开的窗口中添加如下内容（示例代码）
Private Sub Workbook_Open()
Worksheets("界面").Visible = True
Worksheets("操作说明").Visible = False
Worksheets("负荷测试表头").Visible = False
End Sub
2、插入一个模块该模块中添加如下代码
sub 打开操作说明（）
Worksheets("操作说明").Visible =True
Worksheets("界面").Visible = False
Worksheets("负荷测试表头").Visible =False
?end sub
3、有多个工作表依次将打开宏制作完成
4、在界面工作表中将宏指定给按钮追问
Private Sub Workbook_Open()
Worksheets("界面").Visible = True
Worksheets("操作说明").Visible = False
Worksheets("负荷测试表头").Visible = False
End Sub
2、插入一个模块该模块中添加如下代码
sub 打开操作说明（）
Worksheets("操作说明").Visible =True
Worksheets("界面").Visible = False
Worksheets("负荷测试表头").Visible =False
?end sub
3、有多个工作表依次将打开宏制作完成
4、在界面工作表中将宏指定给按钮追问
我试了，也是不行的，是不是因为我的是2007版本的？能发您的email来我把文件发给您然后帮我录制宏吗？我在Excel文件上注明了怎么去隐藏和显示工作表了。
追答第2个回答 推荐于2017-09-07
worksheets(r).visible=true (显示)
=false(隐藏）追问
=false(隐藏）追问
还是不行哦，能给你的邮箱给我，我发过去你帮我编辑这个宏吗？
追答[email protected]
最好在表内注明要求
已经发过去您油箱了，谢谢了。
追答也回给你了
本回答被提问者采纳
相似回答