Come salvare rapidamente una cartella di lavoro in più posizioni in Excel?

In Excel, possiamo salvare una cartella di lavoro in una posizione specifica come vogliamo, tuttavia, hai immaginato di salvare una cartella di lavoro in più cartelle contemporaneamente? In questo articolo, con il codice VBA, puoi salvare rapidamente una cartella di lavoro in più posizioni contemporaneamente.

Salva una cartella di lavoro in più posizioni con VBA

Salva una cartella di lavoro in più posizioni con VBA

Per salvare una cartella di lavoro in più posizioni, è sufficiente applicare un codice macro.

1. Stampa Alt + F11 chiavi per aprire Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Moduli e incolla il codice sottostante nello script del modulo. Vedi screenshot:

VBA: salva una cartella di lavoro in più posizioni

Sub SaveToLocations()
'UpdateByExtendoffice20160623
    ActiveWorkbook.SaveCopyAs "C:\Users\DT168\Documents\" + ActiveWorkbook.Name
    ActiveWorkbook.SaveCopyAs "C:\Users\DT168\" + ActiveWorkbook.Name
    ActiveWorkbook.Save
End Sub

Consiglio: nel codice della macro è possibile modificare i percorsi di salvataggio come si desidera.

3. Stampa F5 chiave per eseguire il codice e la cartella di lavoro attiva è stata salvata nelle posizioni specificate nel codice.