Pièce jointe + Suppression

Bonjour à tous,

J'ai besoin d'un petit coup de main afin de finir une macro. Comme le titre l'indique le but de ma macro est de partir d'un fichier vierge de référence, qu'il faut compléter puis une fois compléter je souhaiterais que ce fichier s'enregistre sous un nom particulier (en fonction des données saisient), se mette en pièce jointe d'un mail et enfin se supprime (car je ne souhaite pas l'archivage de ces fichiers, le fait qu'ils soient dans un mail suffit) afin de retourner sur mon fichier de base.
J'ai réussi à faire les 2 premières étapes (grâce à l'aide du forum pour mes precedents besoins), or je suis incapable de faire la dernière (la suppression du fichier) car pour supprimer le fichier, il faut qu'il soit fermé et s'il est fermé la macro ne s'execute pas. En gros je tourne en rond...

Ci-dessous ma macro.

Sub Messagerie()

Application.DisplayAlerts = False
Application.EnableEvents = True
   
   
  Dim OL As Object
  Dim OLmail As Object
  Dim pj As String
  
  pj = ThisWorkbook.Path & "" & ThisWorkbook.Sheets("BDD - Code Matières").Cells(2, 10).Value & ".xlsm"
  

ThisWorkbook.SaveAs Filename:=pj, FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False

  Set OLk_Appli = CreateObject("Outlook.Application")
  
  If OLk_Appli.Explorers.Count > 0 Then
    'Ok outlook ouvert
  Else
 
    OLk_OK = Shell("C:\Program Files\Microsoft Office\Office14\outlook.exe", vbHide)
  End If
   
  Set OL = CreateObject("Outlook.Application")
  Set OLmail = OL.CreateItem(0)
   
    With OLmail
        .To = "xxx"
        .Subject = "Rapport de production : " & ThisWorkbook.Sheets("BDD - Code Matières").Cells(2, 10).Value
        .Body = "Bonjour," & vbCrLf & vbCrLf & "Ci-joint le rapport de production." & vbCrLf & vbCrLf & "Bien à vous,"
        .Attachments.Add pj
        .Display
        '.Send
    End With
    
    Set OLmail = Nothing
    Set OL = Nothing
    Set OLk_Appli = Nothing

'Kill pj    
Application.Quit
Kill pj

End Sub

Si quelqu'un à une solution à mon problème, ou alors une alternative : je suis preneur !

Merci d'avance,