lien dans userform

C

Cathy

Guest
Re bonjour le forum

J'ai un UF dans lequel j'ai indiqué mon adresse e-mail, mais ce n'est qu'en caption d'une zone de texte, comment puis-je avoir un lien sur lequel on cliquerait directement pour m'envoyer un mél?

Merci à tous et bon appétit

Cathy
 
M

Moa

Guest
Salut Cathy !

Récemment, je t'ai envoyé mon classeur, FootComp02-03.

Regardes, dans "About, si tu cliques, sur ExcelDownloads, tu arrives sur le site, et si tu clique sur mon adresse mail, tu arrive directement, dans la boîte de dialogue d'envoi d'un mail.

@ +

Moa
 
M

Moa

Guest
Voilà le code, pour le mail

Private Sub Label6_Click()
Dim Adresse As String, Sujet As String
Adresse = "rbnchris@wanadoo.fr"
Sujet = "LogFoot2002-2003"
ActiveWorkbook.FollowHyperlink "mailto:" & Adresse & "?subject=" & Sujet _
& "&Body="
End Sub

Voilà le code pour l'adresse internet

Private Sub Label8_Click()
Dim Link As String
Link = "http://www.excel-downloads.com/html/French/forum/list.php?f=1"
ActiveWorkbook.FollowHyperlink Address:=Link, NewWindow:=True
End Sub

@ +

Moa
 
C

Cathy

Guest
Merci beaucoup Moa.

Finalement je vais laisser juste l'adresse e-mail sans le lien dans mon UF, car on reste dans la messagerie après l'envoi du mail (à moins qu'il y ait un moyen de retourner sur l'appli excel?... exigeante avec ça!!!)

Bonne soirée

Cathy
 
M

Moa

Guest
Doit y avoir un hic, car chaez moi, dès que j'envoie le message, je reviens tout de suite dans l'appli, et je quitte la méssagerie.

Va voir sur ce site : <http://dj.joss.free.fr/web.htm>

Il y a plusieurs procédures concernant le Web et excel

@ +

Moa
 

Discussions similaires


Haut Bas