Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Umlaute aus Textbox umwandeln und in Tabelle ausgeben

Umlaute aus Textbox umwandeln und in Tabelle ausgeben
26.01.2024 11:04:03
Dieter.G
Hallo zusammen,

ich benötige wieder mal Euere Hilfe!

Ich habe eine Userform mit Textbox1 (Nachname) und TextBox2 (Vorname).
Aus Vor-/ und Nachname soll nun eine E-Mail-Adresse ohne Umlaute generieret und in eine Tabelle (Zelle) ausgegeben werden.

Danke schon mal im Voraus!

Dieter

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Umlaute aus Textbox umwandeln und in Tabelle ausgeben
26.01.2024 11:35:08
daniel
Hi

im Prinzip so
im Array immer abwechselnd Umlaut und Ersatzzeichenfolge eingeben.
Proper macht das ganze dann für Großbuchstaben, so dass man die nicht extra im Array angeben muss.

dim strMail as string

dim i as long
dim arrUL

strMail = Textbox1.Text & "." & Textbox2.Text

arrUL = Array("ä", "ae", "ö", "oe", "ü", "ue")

for i = 0 to ubound(arrUL) step 2
strMail = replace(strMail, arrUL(i), arrUL(i + 1))
strMail = Replace(strMail, Worksheetfunction.Proper(arrUL(i)), worksheetfunction.proper(arrUL(i + 1)))
next

Cells(1, 1) = strMail

Gruß Daniel
Anzeige
AW: Umlaute aus Textbox umwandeln und in Tabelle ausgeben
26.01.2024 12:35:42
Dieter.G
Hallo Daniel,

vielen Dank!
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige