主题：[求助]表格标题栏

参考代码

For Each dt As DataTable In DataTables
    If dt.name <> "表a" Then
        Tables(dt.name).visible = False
    Else
        Tables(dt.name).visible = True
    End If
Next