Come aprire un file Excel utilizzando la finestra di sfoglia?

Potrebbe essere facile e veloce per te aprire un file Excel da una finestra di sfoglia quando stai lavorando su una cartella di lavoro, invece di minimizzare la cartella di lavoro attiva per scegliere e aprire un'altra. Questo tutorial spiegherà come aprire un file Excel utilizzando la finestra di sfoglia in una cartella di lavoro Excel.

Apri un file Excel utilizzando la finestra di sfoglia con il codice VBA

Apri un file Excel utilizzando la finestra di sfoglia con il codice VBA

Per aprire una cartella di lavoro Excel utilizzando la finestra di sfoglia, il seguente codice VBA può aiutarti, procedi come segue:

1. Tieni premuti i tasti ALT + F11 per aprire la finestra Microsoft Visual Basic for Applications.

2. Clicca su Inserisci > Modulo, e incolla la seguente macro nella finestra del Modulo.

Codice VBA: Apri una cartella di lavoro Excel utilizzando la finestra di sfoglia:

Sub OpenNewBox()
Dim xFilePath As String
Dim xObjFD As FileDialog
Set xObjFD = Application.FileDialog(msoFileDialogFilePicker)
  With xObjFD
        .AllowMultiSelect = False
        .Filters.Add "Excel Files", "*.xls; *.xlsx; *.xlsm; *.xlsb", 1
        .Show
        If .SelectedItems.Count > 0 Then
            xFilePath = .SelectedItems.Item(1)
        Else
            Exit Sub
        End If
    End With
    Workbooks.Open xFilePath
End Sub

3. Dopo aver incollato il codice sopra, premi il tasto F5 per eseguire questo codice, verrà visualizzata la finestra Sfoglia, quindi seleziona una cartella di lavoro Excel che desideri aprire e poi clicca sul pulsante OK, vedi screenshot:

4. E la cartella di lavoro specifica verrà aperta immediatamente.