VBA - Dato indviklinger igen igen

Ja, så er den gal igen...

Jeg fik tidligere denne formel fortalt:

=HVIS(DATO.FORSKEL(IDAG();B32;"d")>30;B32-30;IDAG()+1)

Den virker fint nok i regnearket, men den er ikke så ligetil at bruge i VBA...

Jeg skal lave noget i stil med:

If Range("B32") = "" Then
Range("B36").Value = "=IDAG()+8)"
Else
Range("B36").Value = "=HVIS(DATO.FORSKEL(IDAG();B32;"d")>30;B32-30;IDAG()+1)"

Altså hvis B32 er tom, skal datoen i B36 være otte dage senere end dags dato.
Men hvis B32 ikke er tom, skal B36 være 30 dage før B32, dog tidligst i morgen, og ikke, hvis B32 er mindre end 30 dage fra dags dato.