Bonjour à tous,
J'ai rédigé le code VBA ci dessous pour envoyer un fichier excel à mon administration.
L'ensemble du code se déroule sans erreur, le mail s'envoi seulement après 5 secondes Excel crash et redémarre.
Sub EnvoiFacture()
Dim Integration As Variant, Maintenance As Variant
Integration = Cells(14, 3)
Maintenance = Cells(14, 5)
'MsgBox Integration & " " & Maintenance
Application.DisplayAlerts = False
ThisWorkbook.SendMail Recipients:="guillaume@moi.com", _
Subject:="Facturation de l'affaire intégration " & Integration & " & Maintenance " & Maintenance, _
ReturnReceipt:=False
'MsgBox " Message bien envoyé"
End Sub
Une petite idée de ce code pourtant simple ?
Merci d'avance