Office: Zellen auf die richtigen Spalten verteilen

Liebes Forum,

ich benötige Hilfe bei einem (für mich) komplizierten Fall von Daten sortieren:

Ich habe 18 Spalten mit Überschriften 1-18. Es handelt sich um die Auswertung einer Mehrfachantwort, codiert in Zahlen für jede Antwortmöglichkeit: So haben einige bspw. 1,3,7,18 angekreuzt, andere 4;5;8;9.

Die zugehörigen Daten wurden ursprünglich (semikolon-getrennt) in nur einer Spalte gespeichert. Ich habe die Daten mittels "Text in Spalten" auf einzelne Spalten verteilt, diese werden aber ohne Lücken aufgefüllt und die enthaltenen Daten daher an den falschen Stellen/in den falschen Spalten.

Gibt es einen Befehl, mit dem ich ich die Zahlen automatisch auf die richtige Spalte verteilen kann?

Herzlichen Dank für Eure Hilfe.

Paddy

 

Hola,
sind den an Stelle der "Lücken" in der ersten Spalte auch Semikola, also zB:
1;;3;;5
Gruß,
steve1da

 

Nein, alle nicht ausgefüllten Zellen sind leer.

 

Lade mal bitte eine Beispieldatei hoch damit man weiß was genau wo steht.

 

Sehr gerne:
Chargement de Google Sheets

Funktioniert es so?

 

Also zumindest ich erhalte beim versuch den Link zu öffnen die Fehlermedung
Unauthorized
Error 401

 

Demo Excel.xlsx

Jetzt?

 

Moin

Interessanter wäre die Datei mit den Semikolon-getrennten Daten.

 

Hallo,

Demo Excel.xlsx

Hier die neue Datei mit den semikolon-getrennten Daten!
Gibt es für mein Problem eine Formel?

Viele Grüße
Paddy

 

Meinst du sowas:

Code:

Sub spalten()

    Dim arr$(), i&, j&
    Dim Sp&, Ze&

    Sp = 5  'Spalte E
    Ze = 2

    For i = Sp To Sp + 18
        Cells(1, i) = CStr(i - 4)
    Next

    For i = Ze To 165
        arr = Split(Cells(i, 2), ";")
        For j = 0 To UBound(arr)
            Cells(i, Val(arr(j)) + Sp - 1) = arr(j)
        Next
    Next

End Sub


[\code]

 

Hallo Knolli,

das sieht nicht schlecht aus: Wie wende ich das an?

Gruß Paddy

 

Moin

Code:

=ZÄHLENWENNS($C2;"*;"&D$1&";*")*D$1