如何检查工作簿是否通过vba打开？
要检查工作簿是否使用任何 VBA 代码打开，您需要使用FOR EACH循环，它可以循环遍历当前打开的所有工作簿，并使用您提到的名称检查每个工作簿的名称。您可以使用消息框来获取循环的结果。或者您也可以执行代码将结果输入到单元格中。
检查工作簿是否打开
- 首先，您需要声明在代码中使用的变量来创建循环。
- 使用输入框获取要搜索的工作簿的名称。
- 启动循环以遍历所有打开的工作簿。
- 使用IF 语句编写代码，检查工作簿名称与您在输入框中输入的名称，一旦名称匹配，则激活工作簿，显示一个消息框，表明找到工作簿，然后退出该过程。
- 最后，完成循环并使用消息框，如果没有找到任何内容，则显示消息框。
有用的链接：运行宏–宏记录器– Visual Basic 编辑器–个人宏手册
这是完整的代码。
Sub vba_check_workbook() Dim WB As Workbook Dim myWB As String myWB = InputBox(Prompt:="Enter the workbook name.") For Each WB In Workbooks If WB.Name = myWB Then WB.Activate MsgBox "Workbook Found!" Exit Sub End If Next WB MsgBox "Not Found" End Sub