Problème de lien hypertexte avec Label

[Cédric]

Bonsoir à tout le forum, j'ai besoin d'aide concernant un lien hypertexte dans un UserForm.

Je m'explique : j'aimerai que lorsque l'on clique sur le texte (Label), on puisse envoyer un e-mail.

Bien entendu dans la feuille EXCEL, rien de plus simple, mais dans un UserForm, je n'ai pas trouvé la solution :unsure: .

Donc j'avais essayé ceci :

    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
        'mailto:xxxx@xxxx.fr?subject=Commentaire(s)', ScreenTip:= _
        'Cliquez ici pour m'envoyer un commentaire.', TextToDisplay:='Cédric'
End Sub

Merci à tous pour votre aide. [file name=lien_20050504212745.zip size=7303]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/lien_20050504212745.zip[/file]

 

[myDearFriend!]

Bonsoir Cédric,

Tu peux peut-être essayé quelquechose comme ça :

Private Sub Label1_Click()
      ThisWorkbook.FollowHyperlink 'mailto:Email@Destinataire?subject=TonSujet...'
End Sub

Et ajouter ''Cliquez ici pour m'envoyer un commentaire.' comme valeur dans la propriété ControlTipText de ton Label.

Cordialement.

 

[Cédric]

LOL en fait la réponse n'était vraiment pas compliqué.

Je te remercie de ta réponse, ça fonctionne vraiment bien.

Bonne nuit à toi et à tout le forum, et j'espère pas à bientot, sinon ça voudrait dire que je buche encore sur du VBA 😛 :woohoo:

Merci encore.