It's all fixed - it was a simple matter of ensuring i did not call a variable before i actually stored data in it.
Final code:
---------------------------
dim objFSO, objFolder, b, c, newfolder
dim colFiles, source, destination
source = "C:\Test\"
destination = "C:\Test1\"
Set objFSO =...