Come rinominare più file di una cartella in Excel?
Forse la maggior parte di noi soffre di questo problema che dobbiamo rinominare più file in una cartella, rinominare i nomi dei file uno per uno ci farà impazzire se ci sono centinaia o migliaia di file in quella cartella. Ci sono buone funzioni per noi per affrontare questo compito?
Elenca tutti i nomi di file da una cartella specifica nel foglio di lavoro con kutools per Excel
Rinomina più file di una cartella in Excel con codice VBA
Elenca tutti i nomi di file da una cartella specifica nel foglio di lavoro con kutools per Excel
Se sono presenti più file che si desidera rinominare, innanzitutto è possibile elencare i vecchi nomi di file in una colonna del foglio di lavoro, quindi immettere i nuovi nomi di file con cui si desidera sostituire. Per elencare rapidamente tutti i file nel foglio di lavoro, puoi usare il Kutools for Excel'S Elenco nomi file utilità.
Dopo l'installazione Kutools for Excel, per favore fai come segue :( Scarica subito Kutools per Excel gratuitamente )
1. Clic Kutools Plus > Importa ed esporta > Elenco nomi file, vedi screenshot:
2. Nel Elenco nomi file finestra di dialogo, fare clic per scegliere la cartella di file in cui si desidera elencare i file, quindi fare clic su Tutti i file dal Tipo di file, vedi screenshot:
3. Quindi fare clic OK pulsante, tutti i nomi di file sono stati elencati in una colonna di un nuovo foglio di lavoro, così come alcuni attributi di file, e ora puoi eliminare altre colonne indesiderate e lasciare solo il Nome del file colonna, vedi screenshot:
Fare clic per saperne di più su questa funzione Elenco nomi file ...
Scarica subito Kutools per Excel gratuitamente
Rinomina più file di una cartella in Excel con codice VBA
Dopo aver elencato tutti i nomi di file originali in una colonna A, e dovresti digitare nuovi nomi di file nella colonna B come mostrato nella seguente schermata:
E qui parlerò di un codice VBA che potrebbe aiutarti a sostituire i vecchi nomi di file con i nuovi nomi di file contemporaneamente. Si prega di fare con i seguenti passaggi:
1. Tieni premuto il ALT + F11 chiavi e apre il file Finestra Microsoft Visual Basic, Applications Edition.
2. Clic inserire > Modulie incolla la seguente macro nel file Finestra del modulo.
Codice VBA: rinomina più file in una cartella
Sub RenameFiles()
'Updateby20141124
Dim xDir As String
Dim xFile As String
Dim xRow As Long
With Application.FileDialog(msoFileDialogFolderPicker)
.AllowMultiSelect = False
If .Show = -1 Then
xDir = .SelectedItems(1)
xFile = Dir(xDir & Application.PathSeparator & "*")
Do Until xFile = ""
xRow = 0
On Error Resume Next
xRow = Application.Match(xFile, Range("A:A"), 0)
If xRow > 0 Then
Name xDir & Application.PathSeparator & xFile As _
xDir & Application.PathSeparator & Cells(xRow, "B").Value
End If
xFile = Dir
Loop
End If
End With
End Sub
3. Dopo aver incollato il codice, premere F5 chiave per eseguire questo codice e in Scopri la nostra gamma di prodotti finestra, seleziona la cartella in cui desideri modificare i nomi dei file, vedi screenshot:
4. E poi clicca OK, tutti i vecchi nomi di file sono stati sostituiti immediatamente dai nuovi nomi di file. Vedi screenshot:
Note:
1. Quando si elencano i nomi di file vecchi e nuovi, è necessario includere l'estensione del file.
2. Nel codice precedente, il riferimento AA indica il vecchio elenco di nomi di file che si desidera rinominare e fare riferimento B contiene i nuovi nomi di file che si desidera utilizzare, è possibile modificarli secondo le proprie necessità
Demo: rinomina più file di una cartella in Excel
Articoli correlati:
Come creare fogli di lavoro in sequenza da un intervallo di celle in Excel?
Come rinominare più fogli di lavoro in Excel?
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!