VBA how to use date to write file name in PDF

[wdg1]

Thanks, but adding this line causes an error.

Format(Now(), "yyyy-mmmm-dd")
'or maybe
Format(Now(), "mmmm-dd-yyyy")