How to use EVALCELL() with YEAR() in visio vba

Question

I'm running into this problem with shape formulas. If I do this:

YEAR(NOW())

I get the result: 2022.0000 which is what I expect.

However, let's say I have two shape data rows: Prop.Foo and Prop.Bar.

Prop.Foo = YEAR(ARG("A"))
Prop.Bar = EVALCELL("Prop.Foo","A",NOW())

I get a #VALUE! error in the result of Prop.Bar, and I don't understand why. Shouldn't I get 2022.0000?