' test si répertoire existe
If Dir(CheminFichier$) = "" Then MsgBox "Rep existe" Else MsgBox "Rep n'existe pas"
MkDir "C:\NomDuRep" ' création répertoire
RmDir "C:\NomDuRep" ' suppression répertoire
Kill "C:\NomDuRep\NomDuFichier" ' suppression d'un Fichier
Kill "C:\NomDuRep\*.*" ' supression des Fichier
'pour déplacer des fichiers
FileCopy CheminFichierSource$, CheminFichierDestin$
Name CheminFichierSource$ As CheminFichierDestin$