Reemplazar valor en columna

Estimados:

Tengo este problema, al correr esta macro que busca en la columna N el Sub valor 33 lo reemplaza por 1, el problema es que cuando se ejecuta y no encuentra ningún valor 33 lo borra en la siguiente columna o donde lo encuentre, que puede ser?

Saludos

CambioNumero33()

Range("N:N").Select
Cells.Replace What:="33", Replacement:="1"
End Sub

1 Respuesta

Respuesta
1

De esta forma

Sub CambioNumero33()
Range("N:N").Select
Selection.Replace What:="33", Replacement:="1"
End Sub

o de esta forma

Sub CambioNumero33()
Range("N:N").Replace What:="33", Replacement:="1"
End Sub

Saludos.DAM
Si es lo que necesitas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas