Forum des VBA-Tutorials

Zahlen filtern! (VBA)

masterofswim, Donnerstag, 08. Juni 2017, 08:09 (vor 134 Tagen)

Hallo lieber Nutzer,

ich habe ein Problem, bei dem ich nicht weiter komme.
Der Quellcode sieht aktuell so aus.

 
Do
If UserForm1.TextBox1 + 100 >= rngcellPLZ.Value Then
With UserForm1.ListBox1
 
                    .ColumnCount = 3
 
                    .AddItem
 
                    .List(.ListCount - 1, 0) = rngcellPLZ.Value
 
                    .List(.ListCount - 1, 1) = rngcellPLZ.Offset(0, 0).Value
 
                    .List(.ListCount - 1, 1) = rngcellPLZ.Offset(0, 1).Value
 
                    .ColumnWidths = "1,5cm;4cm"
                End With
                End If
 

Ich möchte gern nur Ergebnisse anzeigen lassen, die 100 kleiner bzw. 100 größer sind als die Eingabe die der Nutzer tätigt.

Würde mich freuen, wenn mir jemand helfen würde.

Zahlen filtern!

Martin Asal, Donnerstag, 08. Juni 2017, 09:01 (vor 134 Tagen) @ masterofswim

Hi,

ich habe einige Rückfragen:

  • Sollen 200 Einträge angezeigt werden, oder nur Werte aus einer Auflistung? Falls Auflistung, wo steht die?

  • Der Code ist definitiv unvollständig (Wo ist das "Loop" zum "Do"?) und es ist mir nicht verständlich, warum du ListBox1.List mehrfach identische Werte zuweist?

  • Warum bekommt .ColumnWidths in einer Schleife immer den gleichen Wert zugewiesen?

Langer Rede, kurzer Sinn: Es ist hilfreich, die Frage klarer zu stellen ;-)

Martin

RSS-Feed dieser Diskussion
powered by my little forum