envoi d'un mail à partir d'un bouton

[GOUES]

J'ai une appli excel qui calule des résulats technico-économiques pour des clients. Ce sont les commerciaux qui saisissent les données sur le réseau. Chaque fois qu'ils créent un résultat, ils doivent en informer le secrétariat pour mise à jour du dossier, mais ils y pensent rarement. Mon idée, est d'intégrer un nouveau bouton. Un clic sur ce bouton permettrait l'envoi automatique d'un mail (Lotus Notes) à la secrétaire avec le nom du fichier crée (contient le code client + date).
Comment faire ?

 

[philippe]

Bonjour
Recherche sur le forum avec le mot cle 'Lotus'
on y trouve plein de choses interressantes comme
Lien supprimé

Philippe

 

[GOUESS]

Merci beaucoup pour l'info, je vais essayer de me débrouiller avec ça

 

[rcgozer]

salut essaie se code

Private Sub TextBox2_Change()
On Error Resume Next
Dim Mail As MailSender
Dim Subj As String
Subj = Range('a18')
Set Mail = New MailSender
Mail.Host = 'smtp1.sympatico.ca'
Mail.Port = 25
Mail.From = 'tom email ici'
Mail.AddAddress ' email du destinataire'
Mail.Body = 'ici tu peut écrire un message' & Subj
Mail.Send

End Sub
tu doit ajouter une référence je join le fichier

Message édité par: rcgozer, à: 25/10/2005 02:25

 

[rcgozer]

salut je renvoie le fichier référence

Message édité par: rcgozer, à: 25/10/2005 02:31

salut la référence fait 59 k0 je ne peut la joindre

je te donne son nom aspemail.dll

Message édité par: rcgozer, à: 25/10/2005 02:37