Macro borre ceros
Hola que tal
Un favor podrías ayudarme con una macro
Que en determinado rango
Borre los ceros que aparecen
Gracias
Un favor podrías ayudarme con una macro
Que en determinado rango
Borre los ceros que aparecen
Gracias
1 Respuesta
Respuesta
1
Te paso la macro (deberías seleccionar el rango y luego ejecutar esta macro)
Sub borrarCeros()
Dim cellAux As Range
For Each cellAux In Selection
If cellAux = 0 Then cellAux.ClearContents
Next cellAux
End Sub
Saludos y comenta
Gustavo
PD: podrías cambiar el formato para que no se vean los ceros (aunque seguirían estando); si te interesa avisá y lo vemos (no cierres la pregunta en este caso)
Sub borrarCeros()
Dim cellAux As Range
For Each cellAux In Selection
If cellAux = 0 Then cellAux.ClearContents
Next cellAux
End Sub
Saludos y comenta
Gustavo
PD: podrías cambiar el formato para que no se vean los ceros (aunque seguirían estando); si te interesa avisá y lo vemos (no cierres la pregunta en este caso)
Cambiar el formato ya lo había hecho pero en el momento de imprimir salen los ceros
Así como proporcionaste el código esta perfecto
Te lo agradezco
Así como proporcionaste el código esta perfecto
Te lo agradezco