Modifica l'estensione del file utilizzando il codice VBA (con immagini)
Che cosa è:
Questo codice VBA ti aiuterà a modificare l'estensione dei file in una particolare cartella/directory.
Per es. Se si desidera modificare l'estensione dei file Excel ricevuti in .xlsx in .xls o visaversa allora è possibile utilizzare questo codice VBA.
Perché:
Se stai lavorando su un progetto in cui ottieni file di input con estensioni di file diverse in cui desideri che i file in un formato standard affinché il tuo programma VBA funzioni e non hai alcun controllo sui file di input, questa parte di codice sarà molto utile in quanto puoi modificare l'estensione in qualsiasi formato desideri.
L'oggetto Windows Script viene utilizzato per modificare l'estensione in questo codice.
Come modificare l'estensione del file utilizzando il codice VBA:
Passaggio 1: aprire la cartella di lavoro che deve essere protetta e premere Alt+F11
Passaggio 2: copia e incolla il codice seguente nella finestra dell'editor VBA e salva la cartella di lavoro.
Sub changeExt() strDir = "C:\myFolder\" 'menziona qui il percorso della cartella dei file With CreateObject("wscript.shell") .currentdirectory = strDir .Run "%comspec% /c ren *.xlsx *.xls", 0, Fine vera con fine sub
Passaggio 3: fare clic F5 per eseguire il codice.
2 risposte
e se... i file non avessero estensioni fin dall'inizio... e vuoi che a tutti aggiungano .xls?
Buona giornata
Come modificare l'estensione specifica del file?
Poiché questo codice modifica tutti i file nella cartella
Grazie