Ho bisogno di cambiare un sacco di nomi di file, di eliminare caratteri speciali (ç, ad esempio), ma è meglio se potrebbe essere adattato per un elenco di valori anziché uno alla volta). Non sono molto esperto, ma ho già trovato un codice e ho provato a renderlo matematico i miei bisogni, ma ancora non funziona.
Questo codice cambia i file nella cartella specificata "C: \ Users \ user \ Desktop \ test", ma non quelli nelle sottocartelle dopo quel percorso.
Set objFso = CreateObject("Scripting.FileSystemObject")
Set Folder = objFso.GetFolder("C:\Users\user\Desktop\test")
For Each Subfolder in Folder.SubFolders
For Each File In Folder.Files
sNewFile = File.Name
sNewFile = Replace(sNewFile,"ç","+")
if (sNewFile<>File.Name) then
File.Move(File.ParentFolder+"\"+sNewFile)
end if
Next
Next
Qualsiasi aiuto, per favore ??