Clever-Excel-Forum

Ich steh leider grad auf dem Schlauch.
Ich habe in der Spalte A der Tabelle1 Werte. Nun möchte ich diese in eine Listbox schreiben. Allerdings soll ein Wert nicht geschrieben / übergangen werden (Wert = "Huber"). Es sollen so lange Werte in die Listbox geschrieben weren, bis in der Tabelle1 eine leere Zelle kommt.

Der Code sieht momentan so aus:

Do While .Cells(zeile, 1) <> "" Or .Cells(zeile, 1) = "Huber"
UserForm.ListBox1.AddItem Trim(.Cells(zeile, 1))
zeile = zeile + 1
Loop

Nun wird aber der Wert "Huber" dennoch in die Listbox geschrieben. Offensichtlich ist der Operator Or falsch. Kann mir da jemand helfen?

Liebe Grüsse und Danke
Ursprung

Hallo,

Code:
Do While .Cells(zeile, 1) <> ""

  If Trim(.Cells(zeile, 1)) <> "Huber" Then

    UserForm.ListBox1.AddItem Trim(.Cells(zeile, 1))

  End If

  zeile = zeile + 1

Loop

Gruß, Uwe

Vielen Dank, das war sehr lieb.... Bin ein Anfänger und die Frage war wohl nicht so schwierig.

matthias wehrli

Kuwer

matthias wehrli