Inicio > Software y aplicaciones > faszs > Sumar valores de varias celdas ...

Sumar valores de varias celdas ...

Experto: faszs Cerrar	Usuario: diegor81 Cerrar	Fecha: 27/09/2004
Valoración:	Categoría: Software y aplicaciones

16/09/2004

Usuario

Hola

Gracias por leer mi pregunta,

¿Como puedo sumar varias celdas en diferentes posiciones y el resultado mostrarlo en otra celda determinada usando cel?
Yo hago lo siguiente y no me funciona

' Worksheets("Agencia Marcas").Range(Cells(12, 51)).Value = (Cells(12, 27) + Cells(12, 29) + Cells(12, 31) + Cells(12, 33)) / (Cells(12, 28) + Cells(12, 30) + Cells(12, 32) + Cells(12, 34)) * 100

Muchas gracias por tu ayuda

Att: Diego

17/09/2004

Experto

Saludos Diego
Estuviste muy cerca de conseguirlo. Solamente faltan las propiedades ?value? en algunas de las celdas y el objeto Range se puede obviar en la referencia. He utilizado la instrucción ?With?End With? para indicar que todas las celdas pertenecen a la Hoja ?Agencia Marcas?. La macro corregida queda de la siguiente manera.

Sub SumarCeldas()
With Worksheets("Agencia Marcas")
.Cells(12, 51).Value = (.Cells(12, 27).Value + .Cells(12, 29).Value + .Cells(12, 31).Value + .Cells(12, 33).Value) / (.Cells(12, 28).Value + .Cells(12, 30).Value + .Cells(12, 32).Value + .Cells(12, 34).Value) * 100
End With
End Sub

Suerte, cualquier inquietud no dudes en escribir

27/09/2004

Usuario

Excelente. Una fantástica solución.

Compártelo

Volver a preguntar

Cerrar

... en "Software y aplicaciones"

... a un experto de "Software y aplicaciones"

... en otra categoría.
Herramientas

Cerrar

Imprimir

Descargar
Volver

Más opciones

Preguntar en Software y aplicaciones

Enlaces patrocinados

Respuestas relacionadas