VBA kode til formel i Excel

Jeg har brug for lidt hjælp til at komme videre.

I en celle skal jeg bruge denne formel:
=IF(AB2>EOMONTH("31-12-2014";0);1;0)
(den skal angive et 1-tal hvis AB2 er før 31-12-2014). Jeg ønsker dog at den er lidt mere dynamisk (hvilket er grunden til Eomonth funktion også.

i VBA er jeg strandet omkring det med anførselstegn. Men jeg forsøgte så at tænke funktionen dynamisk også.

Jeg har en variabel (LagerFilterDato) som er indtastet af brugeren. Jeg kunne godt tænke mig at min nye variabel (som skulle erstatte "31-12-2014") altid valgte sidste dag i året før LagerFilterDato.

Mit udtryk i VBA var noget i retning af dette:
ActiveCell.Formula = "=IF(" & Referencelagerind & "3>Eomonth(" & year(LagerFilterDato)-1 & ",0),1,0))"

Referencelagerind er blot en henvisning til en kolonne i arket (den giver i denne måned kolonne AB).
jeg er med på at year(LagerFilterDato)-1 ikke giver 31-12-YYYY, men blot YYYY - så der er flere udfordringer.