Cartella di lavoro VBA di Excel aperta

Le operazioni più comuni nella vita di tutti i giorni sono aprire le cartelle di lavoro Excel quando lavori con Excel. Non puoi lavorare in Excel senza aprire le cartelle di lavoro o il file Excel. Quindi, in questo articolo, illustreremo come possiamo aprire una cartella di lavoro di Excel con l'aiuto di VBA.

Metodi per aprire le cartelle di lavoro di Exel in VBA

Esistono due metodi per aprire Excel Workbook in VBA e tratteremo entrambi i metodi in questo articolo.

Puoi scaricare questo modello di Excel Apri cartella di lavoro VBA qui - Modello di Excel Apri cartella di lavoro VBA

Metodo n. 1 - Metodo Excel VBA Workbooks.open

Il primo metodo nel VBA è usare la funzione integrata Workbooks.open . Ci sono 15 argomenti opzionali nella funzione “Workbooks.open” e per coprire tutti i 15 argomenti ci vorrà molto tempo. Quindi proveremo solo a capire alcune basi di Workbooks.open e vedremo come possiamo usare questa funzione in VBA per aprire le cartelle di lavoro.

Quindi il primo passo in questo metodo è che dovresti conoscere il nome del file delle cartelle di lavoro di Excel. Di seguito è riportata la dichiarazione per aprire le cartelle di lavoro. "Workbooks.open" File_Name "

O

Workbooks.Open Filename: = "File_Name"

"File_Name" è il nome delle cartelle di lavoro che si desidera aprire. Ma devi stare attento qui perché devi fornire il percorso completo in cui il file viene salvato e il nome del file con l'estensione dei file (.XLS, .XLSX, .xlsm, ecc.). Possiamo prendere l'esempio della macro di seguito per comprendere questa funzione.

Esempio

Supponiamo di voler aprire un file Excel con il nome "File di prova" che viene salvato nell'unità D del computer. Creare una macro in una cartella di lavoro abilitata per macro di Excel. Seguire i passaggi seguenti per utilizzare il metodo Excel VBA Workbooks.open.

Passaggio 1: fare clic su File.

Passaggio 2: fare clic su Opzioni .

Passaggio 3: fare clic su Personalizza barra multifunzione .

Passaggio 4: assicurarsi che il campo Sviluppatore sia contrassegnato come di seguito e fare clic su OK.

Passaggio 5: una volta che hai la scheda sviluppatore, fai clic su Visual Basic come mostrato nello screenshot qui sotto.

Dopo aver fatto clic su Nozioni di base su Visual, è necessario avviare la codifica per la macro.

Passaggio 6: immettere il codice seguente nel modulo VBA.

Codice:

 Sub Open_workbook () End Sub 

Questo codice fornisce il nome per la cartella di lavoro.

Passaggio 7: immettere il codice che può aprire la cartella di lavoro salvata nell'unità D del computer.

Codice:

 Sub Open_workbook () Workbooks.Open Filename: = "D: \ Test File.xlsx" End Sub 

Passaggio 8: eseguire il codice premendo il tasto F5 o facendo clic sul pulsante Riproduci. Dopo aver eseguito la macro, troverai che il file Excel viene aperto automaticamente. Come puoi vedere nel codice sopra, la macro aprirà il file Excel con il nome "Test File.xlsx" che viene salvato nell'unità D del computer. Il percorso sopra menzionato è abbastanza semplice perché non ci sono cartelle e sottocartelle per ottenere le cartelle di lavoro.

Questo diventa impegnativo perché molte persone non ricordano il percorso e se il percorso del file in cui viene salvato cambia un po ', la macro non funzionerà. La macro non funzionerà anche se il nome del file cambia di una singola lettera. Pertanto, se il percorso / nome del file cambia, è necessario modificare il codice VBA della macro. Ciò rende noioso Job e non è privo di errori. Quindi, per assicurarci che la tua macro funzioni perfettamente senza darti un errore, useremo il secondo metodo che è facile da gestire e non ti darà un errore anche quando non ricordi il nome del percorso o anche quando il nome del file cambia .

Metodo n. 2: ottieni il nome file aperto

Come sapete le sfide che affrontiamo nel primo metodo della modifica del percorso e nel nome del file, questo metodo evita entrambe le sfide. Questo metodo offre la possibilità di navigare nel computer fino alla posizione in cui è stato salvato il file e apre le cartelle di lavoro che si desidera aprire.

Questo metodo funziona in realtà in due parti.

La prima parte di questo metodo è Application.GetOpenFileName. Questa parte consente di sfogliare il computer e selezionare il percorso in cui è stato salvato il file. La prima parte non apre il file che si desidera aprire.

La seconda parte è aprire il file per il quale è ancora necessario dipendere dal primo metodo (metodo VBA Workbooks.open). Ci sono 5 argomenti in Application.GetOpenFileName ma esamineranno solo le basi come abbiamo fatto nel primo metodo. Ora proviamo a capire questo metodo con l'aiuto di un esempio.

Esempio

Supponiamo di voler aprire il "File di prova" salvato nell'unità D del computer, quindi devi solo seguire i passaggi seguenti.

Passaggio 1: Seguire il passaggio 1 menzionato nel primo esempio per l'apertura di Visual Basic Editor o Apri Visual Basic Editor dalla scheda Sviluppatore.

Passaggio 2: immettere il codice seguente che fornisce il nome per la macro.

Codice:

 Sottotitolo Open_workbook_example2 () End Sub 

Passaggio 3: immettere il codice seguente. Questa dichiarazione dichiara il nome file come variabile perché qui non stiamo specificando alcun percorso o nome file perché può cambiare di volta in volta.

Codice:

 Sottotitolo Open_workbook_example2 () Dim Nome_file come Sottotitolo variante variante 

Passaggio 4: immettere il codice seguente. Questa istruzione apre la finestra di dialogo in basso ed è possibile sfogliare le cartelle per accedere al percorso in cui è stato salvato il file. Inoltre, mostrerà il file Excel durante la navigazione perché abbiamo inserito un filtro per i file Excel.

Codice:

 Sub Open_workbook_example2 () Dim Myfile_Name come variante Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel Files (*. Xl *), *. Xl *)") End Sub 

Passaggio 5: immettere il codice seguente. Questa affermazione è l'istruzione If Then che viene utilizzata quando il file .Name non è uguale a false quindi aprire il file Excel selezionato.

Codice:

 Sottotitolo Open_workbook_example2 () Dim Myfile_Name come variante Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel Files (*. Xl *), *. Xl *)") Se Myfile_Name False then Workbooks.Open Filename: = Myfile_Name End Sub 

Passaggio 6: immettere il codice seguente. Questa istruzione chiude la condizione If then nella Macro.

Codice:

 Sottotitolo Open_workbook_example2 () Dim Nome file_file come variante Nome_file = Nome applicazione.FileOpenFilter (FileFilter: = "File Excel (*. Xl *), *. Xl *)") Se Myfile_Name False, allora Workbooks.Open Filename: = Myfile_Name End If End Sub 

Passo 7: Ora esegui il codice premendo il tasto F5 o facendo clic sul pulsante Riproduci. Vedrai la finestra di dialogo per sfogliare il file che si aprirà. Passare al desktop in cui è stato salvato il file. Ora sarai in grado di vedere il file in D Drive. Seleziona il file e fai clic su Apri.

Ora, come abbiamo appena visto nel nostro esempio, non dobbiamo preoccuparci del nome del file e del nome del percorso in cui viene salvato il file. Possiamo facilmente accedere alla cartella in cui è salvato il nostro file e selezionare il file che vogliamo aprire. Quindi possiamo facilmente concludere che questo metodo è molto più efficiente rispetto al primo metodo.

Cose da ricordare

  • Assicurarsi che il percorso e il nome del file siano corretti durante l'utilizzo del primo metodo. La macro non funzionerà in caso di modifica per lettera o spazio nel percorso o nel Nome file.
  • Assicurarsi che i filtri menzionati nel codice nel secondo metodo siano corretti. Esistono molti formati di Excel che potrebbero non essere visibili a causa di un filtro.
  • Assicurati che la dichiarazione e il codice utilizzati nel VBA siano corretti per evitare errori.

Articoli consigliati

Questa è una guida alla cartella di lavoro VBA aperta. Qui discutiamo di due diversi metodi per aprire la cartella di lavoro utilizzando il codice VBA di Excel insieme ad esempi pratici e modello Excel scaricabile. Puoi anche consultare i seguenti articoli per saperne di più -

  1. Guida completa alla cartella di lavoro VBA
  2. Formula HYPERLINK in Excel
  3. Apri file con VBA FileDialog
  4. Esempi di fogli di calcolo Excel

Categoria: