Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Macro para sumar valores de columna rango variable

09/07/2012 - 23:54 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 4 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 titopose
13/07/2012 - 00:05 | Informe spam
jarmoncada escribió el 12/07/2012 21:55 :
Creo que esto ya lo habia puesto es un foro anterior... Pero por si las dudas,
lo pongo nuevamente...

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


Efectivamente ya me habías contestado. Por desconocimiento puse la pregunta dos veces, Gracias a ambos por la ayuda!
Salutos,
Tito

Preguntas similares

 

Busqueda sugerida :