Boa Noite! Alberto, Para corrigir este seu código é necessário, primeiramente, saber que: Para referenciarmos uma célula, ou um conjunto de células, em específico precisamos referenciar qual é sua planilha, ou seja, sua worksheet desta maneira: Worksheets("Plan3") Realizando esta modificação, este problema não acontecerá mais... Porém, outro erro aparecerá e você irá resolver desta maneira: For Each cel In Worksheets("Plan3").Range("I2:I65536") cel = Application.Clean(cel) Next cel Abraços, Professor Filho.
