Se i tuoi dati sono ordinati puoi usare la formula come
If(Dif(:B) == 1, 1 , :B == 1, 0 , -1 );
per contrassegnare le righe. Quindi scegli le righe con valori 0 ed eliminale