Supprimer un fichier sur l'ordinateur via VBA

Bonjour à tous,

J'ai fait une macro qui transforme la feuille active en pdf, pour l'envoyer par mail dans outlook.

J'ai par contre le fichier PDF récemment créé qui reste dans le même dossier ou se trouve le fichier excel.

Pensez vous qu'il soit possible de le supprimer avec kill, en récupérant automatiquement le chemin d'accès sur l'ordinateur.

Sub Envoyer_par_mail(ByVal control As IRibbonControl)

NomFichier = InputBox("Veuillez saisir le nom que vous souhaitez donner au fichier pdf")

    Dim Path As String
    Dim valeur As String
    Path = ActiveWorkbook.Path & "\"
    valeur = Format(Now() - 1, "yyyy.mm.dd") & " - " & NomFichier

    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
    fileName:=Path & valeur, _
    Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False

Set olApp = CreateObject("Outlook.application")
Set m = olApp.CreateItem(olMailItem)
With m
    .Subject = ""
    .Body = ""
    .Attachments.Add Path & valeur & ".pdf"
    .display True
End With

End Sub

j'ai ajouté Kill Path & "\" & valeur avant le end sub, mais ca ne fonctionne pas

Merci d'avance


j'ai oublié d'indiqué .pdf à la fin de l'instruction, normal que ca ne fonctionnait pas.

Problème résolu tout seul !

Rechercher des sujets similaires à "supprimer fichier ordinateur via vba"