ファイル（ブック）がExcelで開いているか閉じているかをすばやく確認するにはどうすればよいですか？

Excelの毎日の作業では、作業のために同時に複数のブックを開きますが、特定のブックが開いているか閉じているかを思い出すために、何百ものブックが頭を混乱させることがあります。 ファイルをXNUMXつずつチェックする従来の方法をあきらめます。ここでは、ブックが開いているか閉じているかをすばやく見つけるための秘訣を紹介します。

ブックがVBAで開いているか閉じているかを確認します

ブックがKutoolsforExcelで開いているか閉じているかを確認します

ブックがVBAで開いているか閉じているかを確認します

特定のブックが開いているか閉じているかを確認するために実行できるVBAコードを次に示します。

1。 押す Altキー+ F11 開くキー アプリケーション向け Microsoft Visual Basic 窓。

2。 クリック インセット > モジュール 次に、VBAをコピーして新しいものに貼り付けます モジュール 窓。

VBA：ブックが開いているか閉じているかを確認します

Function IsWorkBookOpen(Name As String) As Boolean
    Dim xWb As Workbook
    On Error Resume Next
    Set xWb = Application.Workbooks.Item(Name)
    IsWorkBookOpen = (Not xWb Is Nothing)
End Function

Sub Sample()
    Dim xRet As Boolean
    xRet = IsWorkBookOpen("combine.xlsx")
    If xRet Then
        MsgBox "The file is open", vbInformation, "Kutools for Excel"
    Else
        MsgBox "The file is not open", vbInformation, "Kutools for Excel"
    End If
End Sub

3.そしてを押します F5 このvbaを実行するためのキーを押すと、特定のブックが開いているかどうかを通知するダイアログが表示されます。
    

ヒント： 上記のVBAでは、「組み合わせる」は確認したいワークブック名​​です。必要に応じて確認できます。

ブックがKutoolsforExcelで開いているか閉じているかを確認します

VBAに慣れていない場合は、ブックが開いているかどうかを確認できます。 Kutools for Excel、その ナビゲーション ペイン。ペインのブックリストで開いているすべてのブックを明確に表示するのに役立ちます。

後 無料インストール Kutools for Excel、以下のようにしてください：

1。 クリック クツール > ナビゲーション ナビゲーションペインを有効にします。 スクリーンショットを参照してください：

2。 次に、をクリックします ワークブックとシート 移動するペインを展開するボタン ワークブックとシート セクション。 また、開いているすべてのワークブックを上のリストで表示できます。 スクリーンショットを参照してください：

連絡先 ナビゲーション ペインでは、リスト内のワークブックまたはシートをすばやく切り替えることもできます。

ナビゲーションの詳細については、ここをクリックしてください。

デモ