kopiranje cele mape v visual basicu

Uspelo mi je napisati makro, ki v visual basicu kopira posamezno datoteko v drugo mapo, ki izgleda nekako tako:

Sub Prenos2()

Dim SourceFile, DestinationFile
SourceFile = "C:\PREDOZIRANJE\nadzor\RCP\3.rcp" DestinationFile = "C:\PREDOZIRANJE\nadzor\RCP\aaa\3.rcp"
FileCopy SourceFile, DestinationFile
End Sub


Nikakor pa ga ne znam predelati tako, da bi namesto ene datoteke kopiral v drugo mapo vse datoteke, ki so v izvorni mapi, oz. da bi kopiral cel direktorij. Poizkusil sem z * namesto imena posamezne datoteke, pa verjetno ni prava rešitev.


------------------------
tudi če v naslovu KRIČIŠ, ne bo zadeva nič bolj opazna -P