Filter --> Delete

[jost]

Morgeh allemaal,

Zit met een vraagje, kom er zelf steeds niet uit...

Ik laat eerst via een VLOOKUP een bepaalde waarde herkennen, en zet hier dan een X naast in kolom F. Daarna komt deze code:

Sheets("CHF").Select
Columns("F:F").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="X"
Application.Goto Reference:="R2:R3"
Selection.Delete Shift:=xlUp
Selection.AutoFilter Field:=1
Selection.AutoFilter
Range("F1").Select


De bedoeling is dat dan alleen de gefilterde lijn wordt verwijderd, maar op de een of andere manier is deze oplossing niet helemaal stabiel. Soms doet ie het wel, soms niet..

Heeft iemand anders een goede oplossing voor het verwijderen van een gefilterde lijn??

Wederom bedankt,

Joost

 

[jost]

heb het al..

Er zat nog een "merged cell" bovenin, vindt Excel nooit leuk als die er bij zitten...

Dan doet die filter -> delete het wel..

grtn