Gruppen

Top Gruppen: Windows 7; Windows Vista; Windows XP; Textverarbeitung; Excel; DSL; Internet Browser; E-Mail/Outlook
Betriebsysteme: Windows classik; Linux; BS-Sonstige
Software: Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; SW-Sonstige
Hardware: Mainboard/CPU; Grafikkarten; Peripherie; Laptop/Notebook; HW-Sonstiges
Netzwerk: Telefon,ISDN,Modem; W-Lan; NW-Sonstiges
Programmierung: PHP,ASP,Perl...; Java,C++...; Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke; SN Intern; Test

/ Forum / Tabellenkalkulation

Tabellenkalkulation

Fragevon JeremyMcNeill vom 17.01.2020, 23:02 Options

Mehrere Zellinhalte in eine übernehmen

Servus alle miteinand,

kleines Problem am Abend

ich habe in den zellen O 5 : O 68 untereinander mehrere Mailadressen stehen.
Ich möchte nun das in Zelle O 70 alle diese Mailadressen nacheinander folgend, nur mit einem Semikolon getrennt aufgeführt werden.

Gibt es da eine Möglichkeit?

Vielen Dank im Voraus

Jeremy

Antwort schreiben

Antwort 1 von rainberg vom 17.01.2020, 23:28 Options

Hallo Jeremy,

das kannst Du mit folgendem Code erledigen, ich frage mich nur, was Du mit den ganzen Adressen in einer Zelle machen willst?

Option Explicit

Sub verketten()
    Dim intI As Integer, strText As String
    For intI = 5 To 68
        strText = strText & Cells(intI, 15).Value & ";"
    Next
    Cells(70, 15).Value = strText
End Sub

Gruß
Rainer

Antwort 2 von JeremyMcNeill vom 18.01.2020, 11:41 Options

Danke für die Hilfe, Rainer.

Ich kann so alle Tabellen in unser Firmen-Mailprogramm in die "An" Zeile kopieren uns so an alle meine Mail senden und muss nicht jeden einzeln rüberkopieren.

Danke nochmals

Jeremy

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Tipp einschicken

News einschicken