Intenta esto:
1-Pon una referencia a: Microsoft Scripting Runtime
2-Crea la siguiente variable en tu codigo:
Código vb:
Ver originalDim FSO As FileSystemObject
Set FSO = New FileSystemObject
3-Al digitar: FSO. te saldran varias opciones de operaciones con archivos, chequealo y estudialo.