Macro, suma en una columna variable

Hola,

Después de numerosas investigaciones, no logro adaptar los distintos códigos que he encontrado a mi problemática,

¿añadir una suma variable en función del número de filas?
hacer la suma de la celda B2 hasta la última fila de la columna B donde se encuentra el resultado al final del rango de datos,

http://www.cjoint.com/c/FJkqTsvuV6g

¿Podría indicarme qué código usar?
Gracias

3 respuestas

  1. Ok, here is the translation to Spanish: Para una macro
    Dim lifin As Long, plage As Range
    With Sheets("Feuil1")
    lifin = Range("A" & Rows.Count).End(xlUp).Row
    Set plage = Range("B2:B" & lifin)
    Range("A" & lifin + 1).Value = "total"
    Range("B" & lifin + 1).Value = Application.WorksheetFunction.Sum(plage)
    End With

    Cdlmnt
    1
    1. Hola, gracias por tu respuesta.

      Sí, de hecho, la hoja se elimina en cada actualización.
      La columna A se actualiza mediante una macro a partir de un archivo detallado; esta fórmula que deseo automatizar con el resto de la macro debe servir para sintetizar información.

      Gracias de antemano.
      0
      1. Hola

        ¿Estás seguro de que necesitas una macro?
        fórmula en B16
        =SUMA(DESREF($A$2;0;1;NBVAL(A:A)-2;1))
        si insertas una fila antes de la fila total, se tendrá en cuenta (en la medida en que la columna A esté rellena)

        Cordialmente
        1