excel怎么隐藏除了第一个工作表之外的其他工作表,并通过按钮调用隐藏的工作表?

 我来答
BAIXINGR

2016-11-09 · TA获得超过3万个赞
知道大有可为答主
回答量:2.9万
采纳率:89%
帮助的人:8604万
展开全部
方法/步骤

在工作表界面按下组合快捷键Alt+F11或者右键单击任意一个工作表标签,在弹出的右键快捷菜单单击“查看代码”进入VBA编辑环境,如下图所示:

在任意一个模块的代码窗口中输入以下的代码
Sub xyf()
Sheet1.Visible = xlSheetHidden
End Sub
然后将光标定位于Sub 与End Sub 之间按下快捷键F5运行代码既可以将第一个工作表隐藏。

如果要将某个工作表取消隐藏可以使用如下的代码
Sub xyf()
Sheet1.Visible = xlSheetVisible
End Sub
通过修改工作表对象的Visible属性可以在隐藏和取消隐藏之间切换。

如果需要批量隐藏或者取消隐藏多个工作表可以使用如下的代码

Sub xyf()
'定义一个工作表变量对象
Dim oWS As Worksheet
For Each oWS In Excel.ThisWorkbook.Worksheets
'批量取消隐藏
oWS.Visible = xlSheetVisible
Next
End Sub
通过 For Each 。。。Next的循环遍历每一个工作表,通过对每一个工作表的
Visible属性的设置可以实现批量取消隐藏或者批量隐藏工作表。
如下图所示

当通过运行以上的代码模式批量隐藏工作表时会弹出如下图所示的错误提示
Sub xyf()
'定义一个工作表变量对象
Dim oWS As Worksheet
For Each oWS In Excel.ThisWorkbook.Worksheets
'批量隐藏
oWS.Visible = xlSheetHidden
Next
End Sub
这个是因为任意一个工作簿至少要有一个可见的工作表,不能所有工作表都隐藏,可以通过添加一些条件判断代码来解决。
族诺子悠
2016-11-09 · 知道合伙人软件行家
族诺子悠
知道合伙人软件行家
采纳数:1093 获赞数:84147
毕业于河南理工大学计算机科学与技术学院,对品牌推广,app运营比较擅长

向TA提问 私信TA
展开全部
1.恢复被隐藏的行和列:可以很容易发现被隐藏的行和列,中间的字母或者数字出现了跳跃。

2.在两列中间右击,选择【取消隐藏】,或者也可以直接拉出来。

3.取消成功。

4.有些单元格数据也会被隐藏,取消方法和上面不一样,先在【审阅】-【更改】看一下是否有工作表保护。

5.如果有的话,输入密码,需要撤销保护。
这个用于隐藏编辑框中的公式。

6.如果发现,只是工作表中隐藏,编辑框还能看到里面的内容。
可以选中后,右击,选择【设置单元格格式】。

7.将【数字】-【自定义】下的类型改为【G/通用格式】,然后确定就可以取消隐藏了。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
kfliuqingshun
2016-11-09 · 知道合伙人生活技巧行家
kfliuqingshun
知道合伙人生活技巧行家
采纳数:514 获赞数:1603

向TA提问 私信TA
展开全部
选择要隐藏的表格下方表格栏,点击右键选择隐藏即可;如需取消隐藏,可以选择第一个工作表的下方表格栏,点击取消隐藏,会显示要取消隐藏的几个表格,选择需要显示的即可!
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
boyou4444
2016-11-09 · TA获得超过664个赞
知道小有建树答主
回答量:490
采纳率:0%
帮助的人:199万
展开全部
选择第一个你要隐藏的sheet,按住shift键再选中最后一个你要隐藏的sheet,然后鼠标右键选择隐藏
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式