请教各位老师，vba同时多张表隐藏问题

7016427 · 发表于 2018-7-21 09:41

本帖最后由 7016427 于 2018-7-21 09:42 编辑

Worksheets(Array(Sheets("上旬"), Sheets("上旬A"), Sheets("上旬E"))).Visible = 2 ' 请问老师，为什么这样写不行？
补充，不是连续的工作表。

jiangxiaoyun · 发表于 2018-7-21 09:51

不行就用循环呗。将工作表名称放入array数组，遍历。

7016427 · 发表于 2018-7-21 09:56

jiangxiaoyun 发表于 2018-7-21 09:51
不行就用循环呗。将工作表名称放入array数组，遍历。

请教老师，工作表怎么遍历？

朱荣兴 · 发表于 2018-7-21 10:15

提示: 作者被禁止或删除内容自动屏蔽

不知道为什么 · 发表于 2018-7-21 10:42

数组里表达错误，把array里面直接写工作表名称

7016427 · 发表于 2018-7-21 11:04

不知道为什么发表于 2018-7-21 10:42
数组里表达错误，把array里面直接写工作表名称

Worksheets(Array("上旬", "上旬A","上旬E")).Visible = 2 ' 这样写还是错误，提示：运行时错误1004

不知道为什么 · 发表于 2018-7-21 13:34

本帖最后由不知道为什么于 2018-7-21 13:37 编辑

7016427 发表于 2018-7-21 11:04
Worksheets(Array("上旬", "上旬A","上旬E")).Visible = 2 ' 这样写还是错误，提示：运行时错误1004

Worksheets(Array("上旬", "上旬A", "上旬E")).Visible = xlHidden
我怎么就能运行成功？

7016427 · 发表于 2018-7-21 17:37

不知道为什么发表于 2018-7-21 13:34
Worksheets(Array("上旬", "上旬A", "上旬E")).Visible = xlHidden
我怎么就能运行成功？

你好！如果我要取消隐藏怎样改？

		自动登录	找回密码
密码			免费注册

朱荣兴朱荣兴当前离线性别保密 UID 1318548 阅读权限 0 注册时间 2011-2-2 在线时间小时最后登录 1970-1-1 积分 19282 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2018-7-21 10:15 \| 显示全部楼层 [广告] ★ ReportLite:表哥表姐早下班神器，专治各种报表不服，拒绝无意义的重复劳动 ★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报

[求助] 请教各位老师，vba同时多张表隐藏问题