Hi there, thank you for your reply.
I am not familiar with FSO, is there any sample code for this case? I saw this code:
Public Sub RenameMoveFiles()
Const ARCHIVE_FOLDER As String = "N:\AGT\IT\Opdrachten\2012\Schatkistbankieren Aanvraagform\ExcelBestanden\Archive\"
Dim FSO As New...