MACRO - LLENAR UNA COLUMNA

No entendí bien lo de la sumatoria de cada fila, pero seguro que cambiando
la fórmula hará lo que tu quieres que haga:

v = Range("A1").End(xlDown).Row
Range("E1:E" & v).FormulaR1C1 = "=SUM(RC[-4]:RC[-1])"

en v se almacena la última fila con datos de la columna A, siempre debes
empezar por A1 y no dejar espacios libres, si van espacios libres, puedes
inveritr
v = Range("A65535").End(xlUp).Row

y cosas así

"Mbaeijhapa" escribió en el mensaje
news:
Mostrar la cita

Hola amigos:
Quisiera hacer que una macro me copie una formula en una columna paralela

a un rango determinado, teniendo en cuenta que el rango se modifica
diariamente. Ejemplo:
Mostrar la cita

Tengo el rango "A1:D10" y quiero poner en la columna "E" la sumatoria de

c/fila, para este ejemplo sé que la columna "E" va estar llena hasta la fila
"10" pero como hago para que automaticamente la macro me llene con esta
sumtaoria las filas nuevas que se incorpora al rango ?.
Mostrar la cita

Se entiende ?
Gracias.-

debes usar la propiedad Value

ej:

Range("E1:E" & v).Value="Lo que quieras"

si quieres pasar tu calculo o haces:
Range("E1:E" & v).Value= Range("A" & activecell.Row ).Value+Range("B" &
activecell.Row ).Value

o pasas como valor lo que hiciste en formula
Range("E1:E" & v).Copy
Range("E1:E" & v).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False





"Mbaeijhapa" escribió en el mensaje
news:
Mostrar la cita

Hola José Luis, muchas gracias por tu rápida respuesta, es exactamente lo

que quería.
Mostrar la cita

Aprovechando tu buena disposición, podrías decirme como hago (para este

mismo ejemplo) para que la macro copie un texto en lugar de la fórmula que
me suma las filas ?
Mostrar la cita

Gracias

Gracias JoséLuisArg, tema totalmente aclarado