Formule fout

[ThecodeMaster]

Ik heb een macro geschreven waarin waarden en formules worden geplaatsen op een werkblad.

'code
Formule = "=+SOM(E7:" & CellNr & ")"
Worksheets(Wijk(Teller)).Range(CellNr2).Formula = Formule

Het rare is nu dat wanneer ik het werkblad open, er een foutmeldig komt in de cel waarin de formule staat: melding=> #NAAM?
Echter wanneer ik op de cel ga staan en deze wil wijzigen; druk op F2 en gevolgd door ENTER, dan komt het resultaat er keurig te staan.

Wie weet hiervan de oorzaak en wellicht ook de oplossing.

Werner

 

[Wigi]

'code
Worksheets(Wijk(Teller)).Range(CellNr2).Formula = "=[B]SUM[/B](E7:" & CellNr & ")"

 

[ThecodeMaster]

Wigi,

Het werkt. Super.

Maar waarom SUM ipv SOM.
Het is een nederlandse versie.

Werner

 

[Wigi]

De commando's die je gebruikt in VBA zijn in het Engels.

Formules kan je ook in de taal van Excel neerzetten als je niet de Formula eigenschap gebruikt, maar de FormulaLocal eigenschap:

Range("A1").FormulaLocal = "=SOM(F3:G5)"

Wigi