Bonjour

Est-il possible que d'Excel, après avoir envoyé un mail par macro, celui-ci s'imprime directement ? J'ai fait ce code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Set appoutlook = CreateObject("outlook.application")
Set Message = appoutlook.CreateItem(olMailItem)
With Message
    .Subject = "LC "
    .Body = "Bonjour "
    .Recipients.Add ("titi@toto.com")
    .Send
    .PrintOut
    End With
mais cela ne fonctionne pas.
Quelqu'un pourrait-il m'aider ?

merci beaucoup