Дорого дня форумчане и гуру екселя....
Есть макрос который прячет листы (номера которых находятся в ячейке)....Он работает на скрытие листов но не работает на отоброжение.....Где косяк?))
Выдает Ошибку-1004 в Excel VBA - невозможно установить свойство visible класса worksheet
Есть макрос который прячет листы (номера которых находятся в ячейке)....Он работает на скрытие листов но не работает на отоброжение.....Где косяк?))
Код |
---|
Sub Спрятать() ' прячет листы перечисленные в ячейке s = Sheets("Лист1").Range("D1").Value ' номера листов беруться из ячейки a = Split(s, ",") For i = 0 To UBound(a): a(i) = Sheets(Val(a(i))).Name: Next 'Sheets(a).Visible = xlSheetHidden 'работает на скрытие 'Sheets(a).Visible = xlSheetVisible 'не работает !!!! On Error Resume Next 'End If End Sub |