VBA 工作表可见 - VBA

VBA 的工作表隐藏和显示功能可以帮助你管理工作薄中的表，确保你只在需要时才可以访问它们。Visible 属性控制工作表的可见性，并且可以很容易地设置。

隐藏和显示工作表

要隐藏工作表，可以使用以下代码行：

Worksheets("Sheet1").Visible = False

这将隐藏名为“Sheet1”的工作表。同样地，要使它可见，可以使用以下代码行：

Worksheets("Sheet1").Visible = True

或者，如果你要隐藏或显示多个工作表，可以使用以下代码：

Worksheets(Array("Sheet1", "Sheet2")).Visible = False '隐藏
Worksheets(Array("Sheet1", "Sheet2")).Visible = True '显示

获取工作表的可见状态

如果要使用 VBA 检测工作表的可见性，可以使用以下代码行：

If Worksheets("Sheet1").Visible = True Then
    MsgBox "Sheet1 is visible"
Else
    MsgBox "Sheet1 is hidden"
End If

或者，如果要检测多个工作表的可见性，可以使用以下代码：

Dim ws As Worksheet
For Each ws In Worksheets
    If ws.Visible = True Then
        MsgBox ws.Name & " is visible"
    Else
        MsgBox ws.Name & " is hidden"
    End If
Next ws

以上代码将循环遍历所有工作表，并显示它们当前的可见状态。

总结

隐藏和显示工作表是 VBA 中非常有用的功能之一，可以让你更好地管理和控制工作薄中的表格。Visible 属性可以非常容易地设置，并且可以通过简单的 VBA 代码进行检测。