Excel VBA Макросы: Как в переменную записать имя листа?

[iva]

Добрый день!
Пожалуйста, подскажите, как в переменную записать имя листа?

[Администратор]

Макрос записывает в переменную имя активного листа.

Sub макрос()
    Dim var
    var = ActiveSheet.name
End Sub