我有以下代码,我想切换工作表的可见或隐藏:
Sub toggle()
If Sheets("Navigation (2)").Visible = True Then
ActiveWindow.SelectedSheets.Visible = False
Else
Sheets("Navigation (2)").Visible
End If
End Sub
但是在其他表可见语句中出现错误。我做错了什么?
答案1
讽刺的是,你把 a 放在了=True
不需要的地方,然后忘记了它是需要。
Sub toggle()
If Sheets("Navigation (2)").Visible Then
ActiveWindow.SelectedSheets.Visible = False
Else: Sheets("Navigation (2)").Visible = True
End If
End Sub
正如你所看到的可见方法,其计算结果为TRUE
或FALSE
。这就是为什么你不需要它,if
但也是为什么你需要它Else:
答案2
这有效:
Sub toggle()
If Sheets("Navigation (2)").Visible = True Then
ActiveWindow.SelectedSheets.Visible = False
Else
Sheets("Navigation (2)").Visible = True
End If
End Sub