Hallo,
ik heb een tabblad "Inhoud" vol met data. In kolom A staat enkel de waarde 0 of 1.
Indien de waarde 0 is moet de rij verwijderd worden...
momenteel doe ik met deze code:
ik vroeg me af of dit op een snellere manier kan, want het lukt momenteel wel, maar gezien het grote aantal rijen duurt dit een eindje?
bedankt alvast!
ik heb een tabblad "Inhoud" vol met data. In kolom A staat enkel de waarde 0 of 1.
Indien de waarde 0 is moet de rij verwijderd worden...
momenteel doe ik met deze code:
Code:
Sheets("Inhoud").Activate
rij = 2
Do Until Range("A" & rij).Value = ""
If Range("A" & rij).Value = 1 Then
rij = rij + 1
Else: Rows(rij).Delete
End If
Loop
ik vroeg me af of dit op een snellere manier kan, want het lukt momenteel wel, maar gezien het grote aantal rijen duurt dit een eindje?
bedankt alvast!