Absolute verwijzing in VBA

[bouva]

Sheet("Totaaltelling").Cells(D2) = App.SheetFunction.IF(C2/$C$31<1,0,C2/$C$31)

Ik heb deze absolute verwijzing overgenomen vanuit excel.
VBA hetkent de dollar tekens echter niet en ziet de cell dus ook niet als absoluut.
Hoe krijg ik dit voor elkaar in VBA?
(is het mogelijk een bewerking in de onderstreepte regel toe te passen?)

 

[edmoor]

Zo:

Sheets("Totaaltelling").Range("D2").Formula = "=IF(C2/$C$31<1,0,C2/$C$31)"

 

[VenA]

't is in ieder geval opgelost.

 

[edmoor]

Zo eentje dus...