Perfect.

I thought
[A3].Value = Format(SheetDate, "MMMM yyyy")
would put text into the cell rather than a date. I was wrong.

Thanks!