ActiveSheet.Name returns the current active sheet's name.
Example
{code}
msgbox ActiveSheet.Name
{/code}