[Excel VBA] Formula

[Masch]

Hoi Tweakers,

Ik ben bezig om een formule in een cel te krijgen zoals hieronder in de code te zien;

Dim strLastCellM As String
strLastCellM = ActiveCell.Address
ActiveCell.Offset(rowOffset:=2, columnOffset:=0).Activate
ActiveCell.Formula = "=SUBTOTAAL(9;M4:" & strLastCellM & ")"

Ik krijg echter de volgende foutmelding als ik dit uitvoer;
Door de toepassing of het object gedefinieerde fout (Fout 1004). Echter als ik in het directvenster de formule wil hebben geeft hij wel de goede waarde. Als ik dit dan kopieer naar het werkblad vindt hij de formule wel goed. Ook andere formules (SOM of bv. "= "& strLastCellM & "")werken wel.

Waar kijk ik over heen

[LegacyCode]

Ik doe het als volgt:

code:

Range("A1").Select
ActiveCell.FormulaR1C1 = "=A2*A3"

En VBA is engels dus IF ipv ALS,
wat SUBTOTAAL is weet ik ni.

[Masch]

Ik heb het geprobeerd (Formula veranderd in FormulaR1C1), maar dit werkt niet. Het werkt echter wel als ik een gewone formule gebruik, ook de variabele kan ik dan gebruiken. Ook als ik een absolute verwijzing gebruik werkt het wel. Het loopt volgens mij vast op de string strLastCellM.

-- Edit --

Opgelost!!
Het zat inderdaad in het verschil van taal zoals Junkie XL aangaf;

De regel ActiveCell.Formula = "=SUBTOTAAL(9;M4:" & strLastCellM & ")"
moest zijn ActiveCell.Formula = "=SUBTOTAL(9,M4:" & strLastCellM & ")"

Let op het verschil; vooral die komma na de 9 is handig.
Voor mijn part kan er nu een slotje op..

[ Voor 0% gewijzigd door Masch op 29-10-2002 14:09 . Reden: Opgelost ]