ik wil met een druk op een knop een nieuwe lijst maken.
eerst worden 4 velden ingevuld die de voorwaardes zullen bepalen (1 tot 3 is een positieve waarde, 4 is een woord dat via een omweg een kolom in de oorspronkelijke lijst bepaalt)
Nu wil ik een nieuwe lijst waarbij de waarde in kolom B kleiner moet zijn dan getal 1, de waarde in kolom C leiner moet zijn dan getal 2, de waarde in kolom D kleiner moet zijn dan getal 3, en er een waarde moet staan in de kolom bepaald door voorwaarde 4.
ik ben ervan overtuigd dat dit moet lukken, maar ik zie niet hoe ik moet beginnen.
ik was begonnen met:
While Worksheets("itemlist").Range("d3: d1000").Value <= Worksheets("voorwaarde").Range("a6").Value
While Worksheets("itemlist").Range("e3:e1000").Value <= Worksheets("voorwaarde").Range("b6").Value
While Worksheets("itemlist").Range("f3:f1000").Value <= Worksheets("voorwaarde").Range("c6").Value
While Worksheets("itemlist").Range("g3:g1000").Value <= Worksheets("voorwaarde").Range("d6").Value
While Worksheets("itemlist").Range("h3:h1000").Value <= Worksheets("voorwaarde").Range("e6").Value
Maar ik weet niet hoe ik verder moet.
eerst worden 4 velden ingevuld die de voorwaardes zullen bepalen (1 tot 3 is een positieve waarde, 4 is een woord dat via een omweg een kolom in de oorspronkelijke lijst bepaalt)
Nu wil ik een nieuwe lijst waarbij de waarde in kolom B kleiner moet zijn dan getal 1, de waarde in kolom C leiner moet zijn dan getal 2, de waarde in kolom D kleiner moet zijn dan getal 3, en er een waarde moet staan in de kolom bepaald door voorwaarde 4.
ik ben ervan overtuigd dat dit moet lukken, maar ik zie niet hoe ik moet beginnen.
ik was begonnen met:
While Worksheets("itemlist").Range("d3: d1000").Value <= Worksheets("voorwaarde").Range("a6").Value
While Worksheets("itemlist").Range("e3:e1000").Value <= Worksheets("voorwaarde").Range("b6").Value
While Worksheets("itemlist").Range("f3:f1000").Value <= Worksheets("voorwaarde").Range("c6").Value
While Worksheets("itemlist").Range("g3:g1000").Value <= Worksheets("voorwaarde").Range("d6").Value
While Worksheets("itemlist").Range("h3:h1000").Value <= Worksheets("voorwaarde").Range("e6").Value
Maar ik weet niet hoe ik verder moet.