Desculpe, me enganei.. não exatamente este o erro. Tipo assim. Na coluna A tem os seguintes valores: A1 = TIAGO A2 = VALOR A3 = "" (VAZIO) A4 = TIAGO A5 = VALOR A6 = TIAGO A7 = "" (VAZIO) A8 = VALOR Eu montei a seguinte condição: i=1 While ActiveSheet.Range("A" & i).Value <> "VALOR" ActiveSheet.Range("A" & i).Value = "deleta" Wend Ou seja, os valores que forem diferente de VALOR, ele põe o nome de DELETA. Mais o que acontecendo é o seguinte, ele altera o nome pra DELETA só até no A1 e depois a célula A3 fica ativa, porque o A2 é VALOR então ele diz que termino.. segundo a condição que eu montei.. mas tem mais valores para ele verificar.. Como faço pra verificar um po um? falou