Suppression d'une liste de fichier

Bonjour,

J'ai besoin de votre aide pour un petit problème

j'ai un fichier excel avec une liste de fichier a supprimé

ex : C:\Temp\Liste - Copie (2).xls

C:\Temp\Liste - Copie (4).xls

C:\Temp\Liste - Copie (12).xls

C:\Temp\Liste - Copie (5).xls

C:\Temp\Liste - Copie (6).xls

C:\Temp\Liste - Copie (9).xls

J'aimerais bien faire une macro pour pouvoir tous les supprimé d'un coup car dans le dossier en question il y a plus de 5000 fichier

du coup j'aimerais les supprimé sans avoir a les chercher.

Merci pour vos future reponse

bonjour,

une proposition (prendre un bon backup avant de tester la macro !), les fichiers sont supprimés, ils ne sont pas mis dans la corbeille !

Sub aargh()
    With Sheets("feuil1")    ' feuille qui contient la liste des fichiers à supprimer
' liste en colonne A
        dl = .Cells(Rows.Count, "A").End(xlUp).Row
        For i = 1 To dl
            fn = .Cells(i, "A")
            On Error GoTo terreur
            Kill fn
ici:
        Next i
    End With
    Exit Sub
terreur:
    MsgBox "erreur lors de la tentative de suppression du fichier " & fn
    Resume ici:
End Sub

SUPER !

Merci pour ton aide sa marche très bien !

Bonne journée