Crash d'Excel - envoi Mail

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

Bonjour,

quel sont les valeurs de Cells(14, 3) et Cells(14, 5) ?

ces cellules ne doivent pas être vide

Bonjour,

Merci pour ce retour pertinent

Peux-t-on envisager une condition if qui vérifie le contenu est refuse l'envoi du mail si celle ci est vide ?

Bonjour,

à tester,

Sub EnvoiFacture()
Dim Integration As Variant, Maintenance As Variant
If IsEmpty(Cells(14, 3)) And IsEmpty(Cells(14, 3)) Then Exit Sub

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

Bonsoir,

Pour le coup la fonction de vérification fonctionne correctement. Fermeture de la fonction si cellules vides.

En revanche, le fichier excel crash quand les cellules sont remplies.

La procédure se déroule entièrement car je fais afficher mon MsgBox "message envoyé" et celle ci apparaît, le mail s'envoie et est bien reçu seulement le fichier crash et redémarre.

Bonjour,

est ce qu'il y avait seulement ce fichier d'ouvert lors du test ?

Bonjour,

J'ai essayé plusieurs fois :

Plusieurs classeurs ouverts = Crash

Classeur facturation seul + fenêtre Visual basic = Crash

et cela se produit sans message ?

La fenêtre Windows :

"Microsoft Excel va redémarrer"

avec une barre de progression

avez-vous essayé d'exécuter la macro en mode pas à pas ?

Bonjour,

Oui elle s'effectue correctement. Du moins j'ai inséré une msgbox en dernier afin de voir si l'EXE allait jusque là. C'est le cas...

Quelques secondes après redémarrage d'excel sur son interface de base. je dois rouvrir mon ficher ect...

Bonjour,

j'ai fais le test de cette macro sur mon poste et pas de probleme,

sans avoir votre fichier il est impossible d'aller plus loin pour moi. désolé

Bonsoir,

Voilà le fichier

Bonjour,

Alors la seule chose que j’ai changé sur la macro de votre fichier est l’adresse courriel, j'ai mis la mienne.

Je l’ai exécuté et tous c’est bien passé, aucune erreur, le fichier reste ouvert et le message est bien envoyé. Désolé de ne pas pouvoir vous aider plus.