How can I find the name of the currently open Excel document using vba?

Question

I'm using vba in Excel 2007 to read a spreadsheet and modify it's contents. I need to save the results with a name that is similar to the original file, but with some alterations.

How can I programmatically find the name of the currently open file using vba?

Thanks in advance.

Answer 1

It depends, here are two possibilities:

Debug.Print ActiveWorkbook.Name

For Each wk In Workbooks
    Debug.Print wk.Name
Next

Answer 2

ThisWorkbook.Name will return the file name. ThisWorkbook.FullName will return the directory structure and the file name.