Discussion :

[yjouin]

Bonjour,
J'ai lu cette discussion.
j'ai le même problème, as-tu trouvé une solution ?
merci
Yvan

[COCONUT2]

j'aurais sectionné la ligne qui pose probleme non?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Sub envoifeuilmail()
Dim wbk As Workbook
ThisWorkbook.Sheets("STATS").Copy
Set wbk = ActiveWorkbook
 
SendKeys "{E}"
wbk.SendMail "djee@free.fr", "STAT MENS", True
wbk.Close savechanges:=False
setwbk = Nothing
End Sub

Car pour moi il s'agit de 2 commandes différentes

sinon utiliser une syntaxe différente comme sur cette question:
http://www.developpez.net/forums/sho...94#post2309394

Ou alors dans contribuez d'Excel on trouve ca
http://www.developpez.net/forums/sho...hlight=outlook

[yjouin]

Bonjour,
et non toujours pas de solution a mon pb, je crois que cela vient de xp.
cela fonctionne très bien pour office 2000 sur win 2000 et xp et office 2003 avec win 2000, mais dès que je suis en configuration 2003 et xp : plantage !

J'installe un petit logiciel VBA sur un parc hétérogène dans mon entreprise, avec l'utilisation de thunderbird !

si tu as une idée pour éviter cette erreur 1004 je suis preneur !
merci
Yvan