Question

使用下面的代码，我可以在其中选择所有包含单词“ ba”的工作表，但是，如果这些工作表/选项卡被隐藏，我将无法获得“运行时错误'1004” '：”警告。

任何建议如何使此代码与隐藏的工作表/标签一起使用？因此，即使隐藏，它也会显示所有带有“ ba”的工作表/标签名称？如果它们是隐藏的，我希望它们出现或.Visible = True

Sub listray()
Dim ws As Worksheet, flg As Boolean
For Each ws In Sheets
If LCase(ws.Name) Like "*ba*" Then
    ws.Select Not flg
    flg = True
End If
Next
End Sub
End Sub

Answer 1

必须可见表格才能被选择。

router.events

Answer 2

您不需要if (your condition) { $("#userCount").val(parseInt(item.TotalUsers, 10) + 1); }来隐藏/取消隐藏工作表。这将循环浏览工作表，并且仅显示名称为Select

的工作表

Like "*ba*"

使用名称包含特定单词的VBA取消隐藏工作表名称

2 个答案: