You might try:
Application.VBE.VBProjects(k).FileName

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Paul,

You're the man! In Word 2011 that very statement returned something unusable. I don't remember the exact string but it was something like "" or "This Document"! That's why I had to find a creative way to extract the document's name.

But strangely in Word 2019 the statement worked!!! Thank you so much for stating the obvious!