1、在工作表界面按下组合快捷键Alt+F11或者右键单击任意一个工作表标签,在弹出的右键快捷菜单单击“查看代码”进入VBA编辑环境,如下图所示:
2、在任意一个模块的代码窗口中输入以下的代码
Sub xyf()
Sheet1.Visible = xlSheetHidden
End Sub
然然后将光标定位于Sub 与End Sub 之间按下快捷键F5运行代码既可以将第一个工作表隐藏。
3、如果要将某个工作表取消隐藏可以使用如下的代码
Sub xyf()
Sheet1.Visible = xlSheetVisible
End Sub
通过修改工作表对象的Visible属性可以在隐藏和取消隐藏之间切换。

文章版权声明:除非注明,否则均为李海博客原创文章,转载或复制请以超链接形式并注明出处。
-- 展开阅读全文 --
还没有评论,来说两句吧...