valedor respondió:
La explicación sencilla seria... strFormula = "=SUM(R[" & Format(intFila1) & "]C[" & Format(intCol1) & "]:R[" & Format(intFila2) & "]C[" & Format(intCol2) & "])" ActiveCell.FormulaR1C1 = strFormula En donde: IntFila1 = Número de filas hacia arriba o...