Bonjour,
je réutilise ce code qui marche bien mais qui me met toujours dans outlook en tant qu' expediteur mon adresse principale :
Comment lui imposer une autre adresse mail ?
With olmail
Message = "Concerne " & Range("B" & i + 3).Value .From "toto@free.fr" ' ne marche pas
.To = Mails '& "rrr"
'Affiche le nom comme objet du message
.Subject = "Récapitulatif de "
Dans mon petit code d'envoi de mail en VBA, j'aimerai changer lexpéditeur qui est mon edresse personnelle par l'adresse générique de mon service. (je précise que cela fonctionne lorsque j'envoie un message
Bonjour Zebanx,
J'ai remplacé .From par .SentOnBehalfOfName = "adressedeservice@masociete.fr" mais cela n'a pas marché. Le code est reconnu mais l'adresse ne change pas.
Je dois voir pour changer directement dans outlook le mail par defaut.
Merci
Bonjour ca a marché ensuite en modifiant dans outlook :
Fichier/parametre du compte/Fichier de données. j'ai mis par defaut le compte souhaité.
Bonne journee
Re
en faite ca n'a pas marché réellement car l'adresse de l'expéditeur est bien mise en destinataire sauf qu'il ne l'envoie pas. Et pourtant l'adresse de l'expediteur est bonne
Merci pour ces précisions.
A voir avec un responsable informatique interne ou d'autres précisions de membre mais de prime abord il ne me semble pas non plus incongru de constater que je ne peux pas envoyer un mail à n'importe qui en utilisant l'adresse d'un autre compte de messagerie en tout cas si je n'ai pas les droits .
J'espère que vous aurez une réponse finalisant votre demande.