Expéditeur désigné pour un email via excel
Bonjour,
Je viens encore vous soliciter car je bloque sur un paramètrage mais je ne suis pas sûr que l'on puisse le faire.
Je lance depusi excel un mail sur outlokk express, le truc c'est que j'ai deux compte sur Outlook Express et je voudrais que le code impose une adresse d'expéditeur
Voici mon code :
Code:
1 2 3 4 5 6 7 8 9 10 11 12
| AdresseDesti = Email
expediteur = "moi@free.fr"
Sujet = "BULLETINS D'ANALYSE COMMANDE " & Cde
Texte = "Bonjour," & vbCrLf & vbCrLf & "Veuillez trouver ci-joint la liste des produits expédiés le " & Date_expe2 & " et pour laquelle vous pourrez télécharger les bulletins d'analyse sur notre site." & vbCrLf & "Bonne réception." & vbCrLf & "Bien cordialement." & vbCrLf & vbCrLf & "Le Service Commercial"
Shell "C:\Program Files\Outlook Express\msimn.exe " & "/mailurl:mailto:" & _
Adressedesti & "?subject=" & Sujet & "&Body=" & Texte & ""
SendKeys "%I" & "p" & nomfich & "~"
'Signification des caractères après "SendKeys":
'* %I et P = Insertion de la pièce jointe dans Outlook Express. (%=Alt)
'* ~ = Validation. (~=Entrée)
'* %S = Envoyer. |
Je ne sais pas comment faire, est ce qq1 peut m'aider?
Merci par avance
Nini