Email in Msg-Box

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
UserForm Label MsgBox


Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: Email in Msg-Box
von: Daniel Köchler
Geschrieben am: 24.05.2002 - 08:25:44

Hallo,

ich habe einen Button "Info", der eine MsgBox öffnet, wo meine Daten stehen. Ich möchte nun auch meine Email-Adresse einfügen, sodass beim Anklicken automatisch das Standard-Emailprogramm geöffnet wird!

Wie geht das?
Daniel


nach oben   nach unten

Re: Email in Msg-Box
von: Michael Scheffler
Geschrieben am: 24.05.2002 - 08:43:34

Hallo,

da wirst Du wohl um eine UserForm nicht drumrumkommen.

Gruß

Micha


nach oben   nach unten

Re: Email in Msg-Box
von: Monika Weber
Geschrieben am: 24.05.2002 - 09:07:46

Hi Daniel

Da hat der Micha völlig recht.
Per MsgBox geht das nicht, per UserForm jedoch schon.

Die Lösung könnte so aussehen (Erstelle zuerst ein UserForm mit einem Label).


Dim EMail As String

Private Sub UserForm_Initialize()
   EMail = "mailto:monika@jumper.ch"
   With Label1
      .Caption = EMail
      .ControlTipText = EMail
      .Font.Underline = True
      .ForeColor = RGB(0, 0, 255)
   End With

End Sub

Private Sub Label1_Click()
   ActiveWorkbook.FollowHyperlink Address:=EMail, NewWindow:=True
End Sub

Ob es unter XL97 läuft weiss ich nicht, denn ich kann es hier nur unter XL2000 testen.

Ich hoffe, dass dir das weiterhilft.
Es liebs Grüessli
Monika


www.jumper.ch
*** Generell: Bitte kein Crossposting ***




 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Trennzeichen entfernen"