特定の名前のブックが開かれているかどうかを調べる|Excel VBA |
サンプルマクロは、Sample.xlsという名前のブックが開かれているかどうかを調べます。
Sub Sample()
Dim myChkBook As Workbook
On Error GoTo ErrHdl
Set myChkBook = Workbooks("Sample.xls")
MsgBox "開かれています。"
Exit Sub
ErrHdl:
MsgBox "開かれていません。"
End Sub