Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1540to1544
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Mailadresse

Mailadresse
16.02.2017 20:21:10
Benedikt
Guten Abend zusammen
Zum erfassen von Mitgliedern habe ich eine UF mit diversen Textboxen
Bei der emailadresse funktioniert Worksheets("Test").Range("C19").Value = TextBox7.Value nicht ich habe keinen Hyperlink
Die Suche in Google hat nachfolgenden Code ergeben:
With ThisWorkbook.Worksheets("test")
.Hyperlinks.Add Anchor:=.Range("C19"), Address:= _
"mailto:" & Me.TextBox7.Text, TextToDisplay:=Me.TextBox7.Text
End With
Läuft soweit gut aber nur wenn der Blattschutz mit unprotect deaktiviert wird.
Schlimmer ist wenn der Anwender das Feld nicht ausfüllt dann meldet sich der Debugger
und markiert
.Hyperlinks.Add Anchor:=.Range("C19"), Address:= _
"mailto:" & Me.TextBox7.Text, TextToDisplay:=Me.TextBox7.Text
Wie kann ich das verhindern? Danke für Hilfe

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mailadresse
16.02.2017 21:35:39
AlterDresdner
Hallo Benedikt,
ungetestet:
If me.textBox7"" then .Hyperlinks.Add Anchor:=.Range("C19"), Address:= _
"mailto:" & Me.TextBox7.Text, TextToDisplay:=Me.TextBox7.Text

Gruß der AlteDresdner
danke an den AlteDresdner
16.02.2017 21:58:42
Benedikt
Vielen Dank Fehler behoben. Noch einen schönen Abend
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige