Envoyer un email...

[natorp]

Bjr à tous et toutes

Je reconnais qu'il s'agit d'un fil de plus sur l'envoi d'un email, mais je cherche depuis 2 jours sur le forum et je trouve rien de concret pour mon besoin...

Je souhaite tout simplement envoyé la feuille active d'un classeur par mail
Le programme de courrier électronique utilisé sur nos postes est : Lotus Domino Access Web, je ne connais pas le nom du serveur smtp

j'ai tenté une macro trouvée sur le forum :
Sub mailto()
ActiveWorkbook.SendMail "natorp@voila.fr"
End Sub

mais j'ai systématiquement la même réponse : La méthode SendMail de l'objet '_WorkBook' a échoué

Merci de votre aide, cordialement
Gérard

 

[bpol]

Re : Envoyer un email...

bonjour natorp,

essayes un peu avec
ActiveWorkbook.SendMail Recipients:="natorp@voila.fr"
A+
Bpol

 

[natorp]

Re : Envoyer un email...

merci bpol
malheureusement j'ai la même réponse....

 

[bpol]

Re : Envoyer un email...

re,
essayes un peu avec cela

ActiveWorkbook.SendMail Recipients:=ActiveSheet.Range("B1").Value

en B1 ou autre réf tu mets l'adresse email
A+
Bpol

 

[natorp]

Re : Envoyer un email...

merci de prendre du temps
mais même réponse....

 

[bpol]

Re : Envoyer un email...

re,

après recherche ds google

si cela peut t'aider

ENVOYER UN MAIL AVEC LOTUS NOTES 6 AVEC PASSWORD lotus, notes, password, mail, messagerie, Source N°36653 Visual Basic, VB6, VB.NET, VB 2005, VB

bpol

 

[natorp]

Re : Envoyer un email...

Merci pour ton aide

Je vais prendre le temps de regarder ce lien
mais déjà une question
Il s'agit d'une fonction... comment s'en sert-on ??

Au plaisir....
Gérard

 

[natorp]

Re : Envoyer un email...

Une autre remarque,
dans mes outils -> references je n'ai pas Lotus Domino Objets

merci......
Gérard