Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Macro que sume valores de celdas de columna

09/07/2012 - 22:22 por titopose | Informe spam
Ayuda Hacer una pregunta
Hola amigos:
Quisiera agregar una macro (para un botón que la ejecute) que sume las celdas de la columna de la celda activa, desde la fila 6 hasta la fila inmediatamente arriba de la celda activa (las 5 primeras filas son de títulos).
La celda que será la activa es variable.
Cómo sería el código?
Saludos y muchas gracias.
Tito
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 titopose
10/07/2012 - 20:16 | Informe spam
jarmoncada escribió el 10/07/2012 07:20 :
Buenas noches... Posiblemente este código te funcione al pelo, con las
instrucciones que pides que se hagan... Espero le sirva!

Sub SumarValores()

Dim fila As Integer
Dim columna As Integer
Dim rango As Range
Dim suma As Long

fila = ActiveCell.Row
columna = ActiveCell.Column

Set rango = Range(Cells(6, columna), Cells(fila - 1, columna))
suma = Application.WorksheetFunction.Sum(rango)

ActiveCell.Value = suma

End Sub

No olvide guardarlo en un libro habilitado para macros...
Mi E-mail: en caso de que necesites ayuda con este
problema.


Hola!
Gracias por tu respuesta, funciona bien!
Saludos,
Tito

Preguntas similares

 

Busqueda sugerida :