Sumar rangos excel

[tachu69]

Hola a todos, estoy haciendo una macro en excel y el caso es que necesito sumar los valores de un rango de celdas, con los valores de otro rango de celdas, pero celda a celda. Es decir:

celda1+celda2=celda3

Se hacerlo de esta forma:

Valor1 = Worksheets("1").Cells(j, 5).Value + Worksheets("1").Cells(j, 6).Value
Worksheets("2").Cells(k, 2).Value = Valor1

Pero esto me suma sólo una celda.
Es posible hacerlo directamente para que te sume un rango entero celda a celda directamente? o no me quedan mas cojones que meter un bucle?

Muchas gracias por adelantado!

[3pies]

Bienvenido al foro. ¿Seguro que eso te funciona, y no te da error?.

Prueba así:

Código:

Valor1 = Worksheets("1").Cells(5, 10).Value + Worksheets("1").Cells(6, 10).Value
Worksheets("2").Cells(2, 11).Value = Valor1

Cells se usa así: Cells(nº de fila, nº de columna)

Salu2

[tachu69]

Muchas gracias, al final meti el bucle y ya esta que tampoco tarda tanto, pero gracias por contestar!

Un saludo!