Excel VBA Макросы: Условие - лист показан (visible)

[gtz]

Как прописать условие для if что лист показан (visible)?
Т.е. visible = true или hidden = false.

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

Условие: если лист отображён:
Sub макрос()
    If Worksheets(1).Visible = xlSheetVisible Then
    End If
End Sub

[gtz]

Цифра 1 в скобках это лист 1?
У меня макрос проверяет каждый лист.
Допустим можно прописать условие activesheet.visible?

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

Да, число 1 означает первый лист. Просто для примера сделал.
Можно указать ActiveSheet, но это нелогично, т.к. активный лист всегда видим.