XL 2013 Envoi mail via excel

[live]

bonjour,

j'aurais besoin de votre aide svp car tous les mois, je dois envoyer une campagne d'emailing avec des données variables et plusieurs destinataires en copie.
Pour le moment, j'utilise un lien hypertexte en mailto mais ce mois-ci j'en ai plus d'une centaine à effectuer.
De plus, j'ai 2 adresses mails reliées à mon OUtlook. Quelle est la configuration pour pouvoir choisir d'envoyer les mails via une adresse précise.
Pourriez-vous m'aider à automatiser un peu plus cette campagne svp.
Je ne m'y connais pas trop en vba mais je suis partante pour apprendre.
Merci d'avance pour votre aide.
Cdt,
LIVE

 

[Staple1600]

Re

=>live
Le CTRL+V eut fonctionné également dans le champ CC
qui est juste au dessus du champ CCI dans un mail Outlook en cours de rédaction.
😉
Je compatis donc pour tes troubles digitaux ou pour ton clavier sans touche CTRL, sans lettre C et lettre V.
😉

 

[zebanx]

Re-

@live
Chez moi, cela fonctionne bien sous 2007. Je viens de réessayer, pas de problème.
Si quelqu'un peut essayer sous 2013 svp en chargeant son adresse mail.
Vérifiez svp quand même que les références sont bien cochées (copie écran sur le fichier) à savoir microsoft scripting runtime et surtout microsoft outlook library version (pour moi 12, pour vous un nombre supérieur car lié à la version d'excel).

@ Staple1600
Oui vu. Merci.😉

 

[Staple1600]

Re

=>Zebanx
(une question en passant)
Si tu coches Microsoft Outlook Library, pourquoi tu n'en tires pas parti (pour bénéficier d'Intellisense dans VBE) ?
En déclarant ainsi

Sub SendMail()
Dim objOutlook As Outlook.Application
'--Définition
Set objOutlook = New Outlook.Application

PS: Ce n'est qu'une question 😉 (et non pas une critique)

Sinon, en ouvrant ta PJ, je me suis demandé pourquoi live ne fait un emailing avec la fonction Publipsotage de Word?
Ce serait moins compliqué, non ?

 

[live]

Oui effectivement, c'est moins compliqué mais je ne parviens pas à mettre plusieurs destinataires en cc

 

[zebanx]

Re

=>Zebanx
(une question en passant)
Si tu coches Microsoft Outlook Library, pourquoi tu n'en tires pas parti (pour bénéficier d'Intellisense dans VBE) ?
En déclarant ainsi

Sub SendMail()
Dim objOutlook As Outlook.Application
'--Définition
Set objOutlook = New Outlook.Application

PS: Ce n'est qu'une question 😉 (et non pas une critique)

Sinon, en ouvrant ta PJ, je me suis demandé pourquoi live ne fait un emailing avec la fonction Publipsotage de Word?
Ce serait moins compliqué, non ?

Re-

Merci pour ce point 😉
J'utilise souvent outlook.application et non new.outlook.application.
Pas d'explication, j'utilise de vieux codes pour les e-mails, en général fournis par Ron De Bruin et il me semble que c'est ce type de déclaration qui est utilisé.
(Et quelle différence stp ? 🙄 )
Mais pour éviter tout problème dans l'exécution, sans y réfléchir, la case de la outlook library est cochée.

Bon, pour le publipostage word...euh, sans moi. 😌

A chacun ses préférences cependant.

Bonne soirée
zebanx

 

[Staple1600]

Re

Toute la différence est là 😉
pour bénéficier d'Intellisense dans VBE
Et j'ai bien pris le soin de préciser 😉

PS: Ce n'est qu'une question 😉 (et non pas une critique)

Je reviens avec un copie d'écran pour que tu vois la différence 😉

 

[Staple1600]

Re

Alors voici le bénéfice de déclarer As Outlook.Application
vs As Object

Fais le test en déclarant en As Object, et alors là plus d'Intellisence.