Private Function IsSheetVisible(sWorkbookName As String, iSheetNumber As Integer) As Boolean
IsSheetVisible = Workbooks(sWorkbookName).Sheets(iSheetNumber).Visible
EndFunction
Как программно определить является ли лист скрытым?
Доброго времени суток. Как скрыть или отобразить лист ясно. А Как можно программно через VBA определить является ли конкретный лист в данный момент видимым или скрытым. Есть необходимость в конкретном файле просмотреть все листы и инвертитовать видимость , т.е. если видим - сделать невидимым, а если скрыт, то отобразить... Благодарю.
Код: