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

Worte zusammensetzen

Forumthread: Worte zusammensetzen

Worte zusammensetzen
14.04.2014 11:46:40
Peter
Hallo Zusammen,
ich bitte um Eure Hilfe.
Ich habe in den Zellen A1 bis A5 Emailadressen.
Nun möchte ich per Schleife die Emailaddessen in einem String (z.B. strEmpfaenger) zusammenfügen wobei sie durch ein Semikolon getrennt sein müssen.
Wie müsste dazu das Makro aussehen?
Für Eure Hilfe bedanke mich im voraus!
Peter

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Worte zusammensetzen
14.04.2014 11:54:53
Rudi
Hallo,
ohne Schleife:
Sub aaa()
Dim s
s = Join(WorksheetFunction.Transpose([a1:a5]), ";")
End Sub

Gruß
Rudi

AW: Worte zusammensetzen
14.04.2014 12:03:31
Matthias
Hallo
und hier mit Schleife, weil so gewollt ;-)
Dim x&, strg$, strEmpfaenger$
For x = 1 To 5
strg = strg & Cells(x, 1) & ";"
Next
strEmpfaenger = Left(strg, Len(strg) - 1)
Gruß Matthias

Anzeige
AW: Worte zusammensetzen
15.04.2014 13:54:27
Peter
Hallo Zusammen,
beide Lösungen sind gut.
Vielen Dank dafür!
Peter

Na dann zu! owT
15.04.2014 17:17:00
Luc:-?
:-?
;

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