如何将工作表动态隐藏和显示?

zhuye33 · 发表于 2020-2-7 22:52

本帖最后由 zhuye33 于 2020-2-8 09:30 编辑

将工作表3-7 C18单元格数据为0时隐藏，不为0时显示工作表.

麻烦看下代码是否有问题？

For w = 3 To 7

If Sheets(w).Range("C18") = "0" Then
Sheets(w).Visible = False
Else
Sheets(w).Visible = Ture
End If

现在只能隐藏，不能显示....

万分感谢

yjh_27 · 发表于 2020-2-7 23:41

Sheets(w).Visible = Ture

zhuye33 · 发表于 2020-2-8 09:31

yjh_27 发表于 2020-2-7 23:41
Sheets(w).Visible = Ture

漏掉了s.... 不过依然没成功。

NadrsSaber · 发表于 2020-2-8 11:31

看看解释吧.

网海遨游 · 发表于 2020-2-8 14:43

你确定C18单元格的0是文本型？
改下条件试下
Sheets(w).range("c18")=0

网海遨游 · 发表于 2020-2-8 15:03

没看到你的附件,请参考.

wanao2008 · 发表于 2020-2-8 15:09

你的单词错了，不是Ture，应该是True

sj15627581616 · 发表于 2020-2-8 15:20

7楼正解，楼主写代码时尽量全部小写或大写，VBA有调整功能，换行后首字母会是大写余下小写，你这大写字母肯定自己打的，后面错了也没发现

Excellover · 发表于 2020-2-9 19:01

直接右键就好了。

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

[求助] 如何将工作表动态隐藏和显示?

最新热点 /1