Como dar formato a rango de celdas con una macro
Tengo una rango de celdas, por ejemplo de D1:H4; pero este rango puede cambiar a X filas hacia abajo; y estas celdas contienen números positivos y negativos; me gustaría que me ayudaran por favor con una macro que todos los números que estén en negativo me ponga un cero y al final en todo el rango de celdas le de formato numérico, separado con comas pero con cero decimales.
Aquí el ejemplo:
Y que este fuera el resultado:
El Rango de celdas puede ser mayor al del ejemplo
1 Respuesta
Hola
El rango de celdas siempre será H9:X5000; pero no todo este rango tendrá información puede variar; pero si tendrá números positivos y negativos.
Saludos y Gracias.
[Hola nuevamente
Mira, te dejo un ejemplo con un rango fijo:
Dim Celda As Range
For Each Celda In Range("A1:D4")
If Celda < 0 Then
Celda = 0
Else
Celda.NumberFormat = "#,##0"
End If
Next CeldaSi la primera celda siempre es H9, solo reemplaza, la cosa es la última para evitar recorrer las celdas vacías, pero no has dado más pistas como para saber cómo usar una variable en ese caso, pero ya eso queda como tu tarea.
