Macro en Excel Rangos Variables

[pepe1807]

Hola Buenas Tardes

No se si este mi pregunta en la categoria correcta.

Espero me puedan ayudar

Quiero hacer una macro que calcule la suma de dos numeros la idea es que en la columna A se ingresen n numeros en la columna B los n numeros y finalmente en la columna C aparezca el resultado.

Lo que hice fue grabar la macro donde comenze sumando en la celda C1 =A1+B1 y arrastre la formula hasta el final con el objetivo de que el resultado aparezca ya que el ingreso d enumeros puede ser dinamico.

Yo lo que quiero es que si ingreso solo 3 parejas de numeros no me aprezcan ceros en la columna c, es decir que sea dinamico si se ingresan 10 parejas de nuemros para ser sumados que en la fila 11 hacia abajo no aparezcan ceros.

Gracias

[rid501]

¿Algo asi?

Código:

Sub Sumas()
I = 1
Do While Cells(I, 1) <> Empty
    Cells(I, 3) = Cells(I, 1) + Cells(I, 2)
    I = I + 1
Loop
End Sub

[mrocf]

También podría intentarse:

Código VBA:

Sub Sumar_A_B()
If [a1] = Empty Then Exit Sub
[c1].Formula = "= a1+b1"
Range([a1], Cells(Rows.Count, "a").End(xlUp)).Offset(, 2).FillDown
End Sub
 

Saludos, Cacho R.

[systemtak]

Hola, pepe1807
Yo solucionaria con una formula en la columan C.
Si longitud sea mayor que cero sumar sino simplemente mostrar ""

Saludos,

[pepe1807]

Muchas Gracias por sus respuestas me ayudaron mucho agradezco su tiempo para contestar.