XL 2010 macro envoie mail via Outlook Web OWA

mix770

XLDnaute Occasionnel
Bonjour le Forum,
j'ai une macro qui fonctionne pour envoyer les mail via un bouton. Cela fonctionne sur mon poste mais les utilisateurs ont un Outllok Web installé (pas d'autre solution), y a t'il moyen de modifier ma macro si c'est possible pour activer le mail via la macro.

merci à vous

sub Envoi_Resultats_Mois()
Dim MailAd As String
Dim msg As String
Dim Subj As String
Dim URLto As String, CC As String
MailAd = Range("a1") & ";" & Range("a2") & ";" & Range("a3")
Subj = Range("a4")
URLto = "mailto:" & MailAd & "?subject=" & Subj & msg
ActiveWorkbook.FollowHyperlink Address:=URLto
End Sub
 

Roland_M

XLDnaute Barbatruc
Bonjour,

et si tu essayais ceci !?

je n'ai jamais essayé avec Outlook !? (connexion TSL)
je sais qu'il y a "smtpusessl" mais je crois pas "smtpusetsl" !?
si quelqu'un passe par ici et peut m'informer ce serait sympa !
perso je n'ai pas trouvé d'info sur le net concernant "smtpusetsl"
je l'ai mis dans le code mais je doute !
en général on utilise cdo pour se passer d'outlook !
 

Fichiers joints

Dernière édition:

Discussions similaires


Haut Bas