Memorizziamo le informazioni importanti in Excel Eseguiamo inoltre varie operazioni in base alle nostre esigenze. È quindi necessario salvare il file una volta aggiornato, altrimenti potremmo perdere alcuni dati preziosi. Esistono alcuni metodi efficaci per Risparmiare un Cartella di lavoro Excel Inoltre, il salvataggio di un Excel come da noi desiderato Formato o la memorizzazione del file nella posizione desiderata Posizione In questo articolo, vi mostreremo gli esempi più utili di Excel VBA Salva come formato file .

Scarica il quaderno di esercizi

Scaricate la seguente cartella di lavoro per esercitarvi da soli.

12 esempi di Excel VBA Salva come formato file

Per illustrare la situazione, utilizzeremo il seguente set di dati come esempio. Ad esempio, il set di dati rappresenta i dati di Venditore , Prodotto , e Vendite nette di un'azienda. Qui, salveremo questa cartella di lavoro applicando Excel VBA Salva come formato file .

1. VBA per salvare come file Excel

Nel nostro primo esempio, mostreremo un semplice Codice VBA per salvare un Excel Pertanto, per eseguire l'operazione, attenersi alla seguente procedura.

FASI:

• In primo luogo, andare alla pagina Scheda sviluppatore.
• Quindi, selezionare Visual Basic .

• Di conseguenza, il VBA si aprirà una finestra.
• Successivamente, fare clic su Inserire .
• Successivamente, selezionare la voce Modulo .

• Quindi, il Modulo apparirà la finestra di dialogo.
• Successivamente, copiare il codice seguente e incollarlo nella casella.

 Sub Esempio_1() ActiveWorkbook.SaveAs End Sub 

• Ora, eseguire il codice premendo F5 .
• Di conseguenza, dovrete inserire il nome del file, il formato e altre informazioni come richiesto.
• Infine, salverà il file nella posizione specificata.

Per saperne di più: Come salvare un foglio di lavoro come nuovo file utilizzando Excel VBA

2. Specificare l'estensione del file con Excel VBA

Nell'esempio precedente, abbiamo dovuto specificare manualmente l'opzione Formato del file dopo aver premuto il comando di esecuzione. Ma qui mostreremo un modo più efficiente per applicare Excel VBA Salva come formato file per salvare le cartelle di lavoro nel formato desiderato. Sarà sufficiente specificare l'estensione del file dopo il nome del file. Quindi, inserire il codice seguente nel file Modulo finestra.

 Sub Esempio_2() Dim location As String location = "D:\SOFTEKO\excel vba save as file format.xlsm" ActiveWorkbook.SaveAs Filename:=location End Sub 

In questo modo, è possibile eseguire il codice per ottenere il file nel formato e nella posizione desiderati. Per salvare il file nel formato xlsx, tipo xlsx al posto di xlsm .

Leggi tutto: Macro VBA di Excel per salvare PDF in una cartella specifica (7 esempi ideali)

3. Excel VBA per utilizzare il codice del formato file

Tuttavia, è possibile inserire il valore Formato del file Numero di codice invece di specificare l'estensione del file. Alcuni codici utili sono: .xlsx = 51 , . xlsm = 52 , .xlsb = 50 , .xls = 56 Quindi, copiare il codice seguente e incollarlo nel file Modulo scatola.

 Sub Esempio_3() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=52 End Sub 

Per saperne di più: [Perché Excel non salva la mia formattazione? (7 possibili motivi)

4. Salvare nella stessa directory con VBA

In questo esempio, mostreremo come Risparmiare nel Stesso elenco dove il file è già presente con Excel VBA Pertanto, inserire il codice nel campo Modulo finestra.

 Sub Esempio_4() ActiveWorkbook.SaveAs Filename:="excel vba salva come formato file" End Sub 

Per saperne di più: Excel VBA: scegliere la posizione e salvare come PDF

5. VBA per archiviare in una nuova directory

Tuttavia, potrebbe anche essere necessario salvare il file in un file Nuovo elenco Quindi, digitate il seguente codice nel file Modulo ed eseguirlo.

 Sub Esempio_5() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location End Sub 

6. Chiedere la password per aprire il file Excel

Inoltre, è possibile applicare Excel VBA Salva come formato file per chiedere un Password a Aprire un file Excel Quindi, inserire ed eseguire il codice seguente.

 Sub Esempio_6() ActiveWorkbook.SaveAs _ Nome file:="D:\SOFTEKO\excel vba save as file format.xlsm", Password:="one" Fine Sub 

Per saperne di più: Come salvare un file Excel con una password

Letture simili

• Excel VBA per salvare un file con un nome variabile (5 esempi)
• Come salvare Excel in formato PDF (con passaggi rapidi)
• Excel VBA per salvare come file usando il percorso dalla cella (con passaggi rapidi)
• Codice VBA per il pulsante Salva in Excel (4 varianti)
• [File CSV di Excel che non salva le modifiche (6 possibili soluzioni)

7. Aggiungere la password per la modifica in Excel

Inoltre, è possibile richiedere un Password per Editing in Excel Senza la password, si aprirà solo in sola lettura. Copiare il codice e incollarlo, quindi eseguirlo.

 Sub Esempio_7() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", WriteRes:="one" End Sub 

8. Aprire in sola lettura

Anche in questo caso, per aprire un file in Formato di sola lettura digitare il codice sottostante e premere F5 per eseguirlo.

 Sub Esempio_8() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", _ ReadOnlyRecommended:=True End Sub 

Per saperne di più: Come aprire un documento Word e salvarlo come PDF o Docx con VBA Excel

9. Generare la finestra di dialogo 'Salva con nome'.

Un'altra utile operazione di Excel VBA per salvare come formato file è quello di generare Finestra di dialogo Salva con nome Quindi, inserire il codice seguente.

 Sub Esempio_9() Application.GetSaveAsFilename End Sub 

Per saperne di più: Macro di Excel per salvare in formato PDF (5 esempi)

10. VBA per creare e salvare una nuova cartella di lavoro

Oltre a salvare un file, possiamo anche Creare e salvare una nuova cartella di lavoro con VBA Per eseguire l'operazione, digitare il codice seguente nel file Modulo e premere F5 .

 Sub Esempio_10() Dim book As Workbook Set book = Workbooks.Add Application.DisplayAlerts = False book.SaveAs Filename:="D:\SOFTEKO\excel vba save as file format.xlsm" Application.DisplayAlerts = True End Sub 

Per saperne di più: Excel VBA: salvare un foglio come nuova cartella di lavoro senza aprirlo

11. Salvare la cartella di lavoro attiva in Excel

Allo stesso modo, possiamo salvare la cartella di lavoro attiva dove è già memorizzata. Per eseguire l'operazione, inserite il semplicissimo codice.

 Sub Esempio_11() ActiveWorkbook.Save End Sub 

Per saperne di più: Come salvare una macro per tutte le cartelle di lavoro in Excel (con semplici passaggi)

12. VBA per salvare in formato PDF in Excel

Infine, si può utilizzare l'opzione PDF estensione del file nel nostro VBA codice da salvare in Formato PDF Quindi, applicare Excel VBA Salva come formato file Quindi, eseguire il codice premendo F5 .

 Sub Esempio_12() ActiveSheet.SaveAs Filename:="excel vba save as file format.pdf" End Sub 

Per saperne di più: Come salvare Excel in PDF (6 modi utili)

Conclusione

D'ora in poi, sarà possibile salvare i file con Excel VBA Salva come formato file Continuate a utilizzarli e fateci sapere se avete altri modi per svolgere il compito. Seguite l'ExcelWIKI Non dimenticate di lasciare commenti, suggerimenti o domande nella sezione commenti qui sotto.