使用工作表的属性visible即可。
1、代码如下
Sub test()
'隐藏表1
Sheets("表1").Visible = 0
'显示表1
Sheets("表1").Visible = -1
End Sub
2、使用ALt+F11,进入,插入模块,粘贴代码 ,按下F5即可
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、在界面工作表中将宏指定给按钮
worksheets(r).visible=true (显示)
=false(隐藏)