Here is what I use, I like to check if the file exists and keep the folder and file names separate, but otherwise similar to previous post:
Dim sPattern As String, sFolder As String, sFile As String,sSourceFile as String
sFolder = "G:\CLASP\CLASP Tools"
sPattern = "RG_" &...