Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
768to772
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
768to772
768to772
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Daten zusammenführen

Daten zusammenführen
09.06.2006 20:42:03
Walter
Guten Abend , ich sitze hier vor einem Problem und hoffe das mir jemand helfen kann, wenns geht mit einer Formel ohne VBA.
Ich habe eine Liste mit Zahlen die Zeilenweise untereinander stehen, diese sollen in einer Zeile oder Zelle zusammengeführt werden und mit Koma getrennt sein.
Beispiel Grundliste:
709 621
812 079
812 080
Als Ergebnis sollte rauskommen:
709 612, 812 079, 812 080 ( in einer Zelle )
Hoffe es kann mir jemand helfen, auch wenn sichs vielleicht blöd anhört.
Aber ich brauchs Montag für die Arbeit.
Danke im Voraus

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten zusammenführen
09.06.2006 20:55:02
Ramses
Hallo
Mit VBA geht es aber am einfachsten
 
 ABC
16aaa a,b b,c c,d d,e e
17bb 
18cc 
19dd 
20ee 
21   
Formeln der Tabelle
C16 : =arrrange(A16:A20;B16:B20;",")
 

und dies ist der Code der in die Mappe muss:
Function ArrRange(lRng As Range, rRng As Range, mydiv As String)
    Dim myC As Range
    Dim myCounter As Integer
    Dim tmpStr As String
    If lRng.Rows.Count <> rRng.Rows.Count Then
        ArrRange = "Ungleicher Datenbereich"
        Exit Function
    End If
    myCounter = 1
    tmpStr = ""
    For Each myC In lRng
        tmpStr = tmpStr & myC & " " & rRng.Cells(myCounter, 0) & mydiv
        myCounter = myCounter + 1
    Next
    ArrRange = Left(tmpStr, Len(tmpStr) - 1)
End Function

Gruss Rainer
Anzeige
AW: Daten zusammenführen
09.06.2006 21:18:59
Walter
Danke für deine schnelle Antwort Rainer, von VBA hab ich leider überhaupt keine Ahnung, weis noch nicht mal wie man sowas einbindet. und bei der Formel die du aufgeführt hast bekomme ich immer #NAME als Fehlermeldung
AW: Daten zusammenführen
09.06.2006 21:56:04
firmus
Hi Walter,
hier die Lösung mit Formeln.
Einfach in der Spalte B nach Bedarf nach unten kopieren.
https://www.herber.de/bbs/user/34269.xls
Gruss,
Firmus
AW: Daten zusammenführen
09.06.2006 21:59:46
Ramses
Hallo
"Alt"+"F11" drücken
Rechte Maustaste auf "VBA-Projekt DeinMappenname.xls"
Einfügen - Modul
Doppelklick auf das eingefügte Modul
Dort den Code einfügen.
Dann kannst du die Funktion wie beschrieben in der Mappe verwenden
Gruss Rainer
Anzeige
AW: Daten zusammenführen
10.06.2006 00:01:04
Walter
Besten Dank Firmus und Rainer das Wochenende ist gerettet.
Echt klasse wie einem hier geholfen wird !!
Wünsche euch ein schönes Wochenende

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige