Formule in cel G7 plaatsen m.b.h een macro

[Gert Bouwmeeste]

Hoi. Ik wil graag in cel G7 met een macro een formule plaatsen. De formule is =SUBTOTAAL(9;$G$9:$G$65536)

Ik probeer dat met de opdracht
Range("G7").Select
ActiveCell.Formula = "=SUBTOTAAL(9;$G$9:$G$65536)"

Maar de macro loopt stuk op die opdracht. Hoe moet het dan wel?

 

[Wigi]

Waarom ga je tot helemaal de laatste rij?

 

[Gert Bouwmeeste]

O, die stond er nog omdat ik had geprobeerd of dat misschien de oplossing was. Dus niet. Tot regel 1.000 is al voldoende.

 

[Wigi]

Sub zetformule()

    Range("G7").Formula = "=SUBTOTAL(9,$G$9:$G$1000)"

End Sub

Wigi

 

[Ginger]

Gert Bouwmeeste, Een kleine aanvulling (tekstueel) bij de oplossing van Wigi... Als je in VBA een formule opbouwt die in een sheet geplaatst moet worden, moet dat ALTIJD op de engelse notatie gebeuren.... Dus de functies in het engels en als scheidingsteken een komma!

Groet, Leo

 

[Gert Bouwmeeste]

Dank jullie wel, het werkt!

:thumb: