Hey hey =)

Ich bins mal wieder

Dieses Mal müssen wir eine Komma separierte Liste in Excel bzw. mit VBA erstellen.

z.B. in A1 steht Da,s fun,ktio,nier,t sog,ar

und in A3, A4, A5, A6,.... sollen nach und nach alle Buchstaben ausgegeben werden, die zwischen den einzelnen Kommata stehen.

Sowas ähnliches haben wir schonmal mit JavaScript gemacht, allerdings auch erst nach ein paar hilfreichen Hinweisen.

Nun würde ich gerne wissen, welche Befehle ich nutzen muss, um diese Liste auslesen zu lassen. Momentan habe ich folgenden Code

Dim s As String

s = Range("A1").Value

Dim Felder() As String


Felder() = Split(s, ",")


For i = 0 To UBound(fields)

    List1.AddItem Tri***(fields(i))

Next

Dieser Code verwirrt mich zur Mitte hin aber noch mehr, als der aus JavaScript. Hat jemand vl. einen Denkanstoß für mich?

lG

r26t01

Ich würd da liebend gern was konstruktives beitragen zu, aber :

du teilst uns hier weder mit, was List1 ist, noch was fields ist.

allgmein gesprochen, mit split("a/b/c", "/") kannst du nen String an nem Trennzeichen aufsplitten. Rückgabewert ist ein Array mit den "Abschnitten" des strings den du übergeben hast.

Wenn du jetzt Range("A1").Value, oder Cells(1,1).Value (ich bin Fan von integern, da muss ma nit no ne funktion schreiben um "AB1" umzumünzen und ma kann in schleifen durchrattern) übergiebst, dann splittet dir die Funktion das was in der Zelle A1 steht auf anhand des Trennzeichens.

Im Endeffekt weis ich nich ma was du eigentlich grad Fragst oO

(Das kann allerdings auch daran liegen das ich momentan nimmer ganz alleine bin)

mfg

Sven

Bearbeitet 23. September 200915 j von streffin

Das ist ein Code, den ich über Google gefunden habe. Der hat mich aber auch nicht wirklich weiter gebracht.

Hab den Code jetzt fertig, aber danke für deine Hilfe =)