[ataskin]

Μπορείτε να μου δώσετε οδηγίες ;
α) που θα τρέξω την εντολή RenameMyFiles().
β) Επίσης που θα τρεξω το Sub RenameMyFiles()
FormatNummericFilenames Foldername:=Range("FolderPath").Value, _
ExtensionName:=Range("FileFilter").Value, _
nFormat:="0000" 'μπορείς να αλλάξεις το μήκος του προθέματος όσο χρειαστεί.

End Sub

Δεν το καταλαβαίνω