Vba - Suppression de fichier dans un dossier
Rédigé par Xpress
Aucun commentaire
Classé dans : Vba
Exemple pour la suppression de fichiers excel dans un dossier si existants 'On déclare le dossier et le type de fichier directory = "CheminRéseauDossier" Set obj = CreateObject("Scripting.FileSystemObject") fileName = Dir(directory & "*.xl??") Puis on supprime l'objet s'il existe If obj.FileExists(directory & fileName) Then obj.DeleteFile (directory & fileName) MsgBox ("Le fichier a ete supprime")