Come verificare rapidamente se un file (cartella di lavoro) è aperto o chiuso in Excel?

Nel lavoro quotidiano con Excel, si aprono contemporaneamente più cartelle di lavoro per lavorare, ma a volte centinaia di cartelle di lavoro possono confondere e rendere difficile ricordare se una specifica cartella di lavoro è aperta o chiusa. Abbandonate il metodo tradizionale di controllo dei file uno per uno; qui vi mostro alcuni trucchi per scoprire rapidamente se una cartella di lavoro è aperta o chiusa.

Verifica se una cartella di lavoro è aperta o chiusa con VBA

Verifica se una cartella di lavoro è aperta o chiusa con Kutools per Excel

Verifica se una cartella di lavoro è aperta o chiusa con VBA

Ecco un codice VBA che puoi eseguire per verificare se una specifica cartella di lavoro è aperta o chiusa.

1. Premi i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.

2. Clicca su Inserisci > Modulo e poi copia e incolla il VBA nella nuova finestra Modulo.

VBA: Verifica se una cartella di lavoro è aperta o chiusa

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. E premi F5 per eseguire questo VBA, e apparirà una finestra di dialogo per avvisarti se la cartella di lavoro specifica è aperta o meno.
    

Suggerimento: Nel VBA sopra, “combine” è il nome della cartella di lavoro che vuoi controllare, puoi modificarlo come necessario.

Verifica se una cartella di lavoro è aperta o chiusa con Kutools per Excel

Se non sei familiare con VBA, puoi verificare se una cartella di lavoro è aperta utilizzando Kutools per Excel, con il suo riquadro Navigazione, che ti aiuterà a visualizzare chiaramente tutte le cartelle di lavoro aperte nell'elenco delle cartelle di lavoro del riquadro.

Dopo aver installato gratuitamente Kutools per Excel, procedi come segue:

1. Clicca Kutools > Navigazione per abilitare il riquadro Navigazione. Vedi screenshot:

2. Poi clicca Cartella di lavoro e Foglio pulsante per espandere il riquadro e andare a Cartella di lavoro e Foglio sezione. E puoi visualizzare tutte le cartelle di lavoro aperte nell'elenco superiore. Vedi screenshot:

Con il riquadro Navigazione, puoi anche passare rapidamente tra le cartelle di lavoro o i fogli nell'elenco.

Clicca qui per saperne di più sulla Navigazione.

Demo: Come creare un elenco dinamico di nomi di fogli in Excel?