ThisWorkbook.Name returns the current active workbook's name.
Example
{code}
msgbox ThisWorkbook.Name
{/code}