Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1356to1360
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

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

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

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige