Como corregir la sintaxis de la siguiente macro

Question

el 14 may. 15

Tengo la siguiente macro para copiar una formula a varias celdas pero me marca errro

Sub

For k=1 to 20

Cells(57+k,8)="=SUMA(D"&57+k&":F"&57+k&")/3 "

Next k

End Sub

De antemano muchas gracias

Respuesta de Manuel Madrid

1

For k = 1 To 20
Cells(57 + k, 8).Formula = "=SUMA(D" & 57 + k & ":F" & 57 + k & ")/3 "
Next k

Así mejor ;)

el 14 may. 15

For k = 1 To 20
Cells(57 + k, 8).FormulaLocal = "=SUMA(D" & 57 + k & ":F" & 57 + k & ")/3 "
Next k

Y así se hace lo que quieres :DDDDD jajajajaa...

el 14 may. 15

Dante Amor, https://www.youtube.com/@CursosDeExcelyMacros · Accepted Answer · 2015-05-14T18:16:10.0000000Z

Respuesta de Dante Amor

1

Le falta nombre a tu macro y en la fórmula se tiene que poner en inglés la suma:

Sub macro()
'
    For k = 1 To 20
        Cells(57 + k, 8) = "=SUM(D" & 57 + k & ":F" & 57 + k & ")/3 "
    Next k
End Sub

Saludos.Dante Amor

Recuerda valorar la respuesta.

el 14 may. 15