reemplazar valores en un rango

27/06/2005 - 16:45 por fredy | Informe spam

Buenos dias
mi problema es el siguiente:

tengo un rango (z:z) con 18000 registros y debo reemplazar los registros que
tengan valor negativo con cero (0), como lo puedo hacer por codigo ya que
este dato viene de una serie de calculos que realizan unas macros y por una
serie de consultas a bases de datos seria algo como seleccionar valores
negativos y reemplazar con cero (0), Muchisimas gracias!!! ;D

Siga el debate

6 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#6 fredy

28/06/2005 - 22:43 | Informe spam

si Manuel gracias ! eso fue lo que hice
FINAL = Application.CountA(ActiveSheet.Range("z:z"))
With Range("Z1:Z" & FINAL)
.AutoFilter Field:=1, Criteria1:="<0"
.SpecialCells(xlCellTypeVisible) = 0
.AutoFilter
End With

"Manuel Romero" wrote:

La primera solo cambia lo que se muestra, pero el negativo sigue ahi

La segunsa puede funcionar pero le cambia el orden a los numeros y tal vez
no le importe

Pero de hecho, la idea del filtro es la mejor. Usa Autofiltro solo muestra
los negativos, selecciona el rango y escribes 0 y aceptas con Ctrl+Enter

escribió en el mensaje
news:
>
>
> existen varias opciones, he aqui algunas:
>
> 1) dale a la columna Z:Z el siguiente formato > #.##0;"0";;@ o bien
> #.##0;;;@
>
> 2) ordenalas por la columna Z de manera ascendente.
> y sin seleccionar el rango torna los valores que sean negativos y
> cambiales el valor a todos a la vez.
> mediante un looping, mediante un filtro...
>

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

1 2

Busqueda sugerida