Witaj
Temat, który poruszasz wbrew pozorom nie jest łatwy. Samo ukrywanie nie sprawia problemów, ale już powrót do poprzednich ustawień może sprawić kłopot. Także przełączenie do innego arkusza lub wstawienie nowego może mieć dla nas duże znaczenie. Generalnie chodzi o rozróżnienie czego dotyczą zmiany, czy tylko pojedynczego arkusza czy całego skoroszytu bądź aplikacji.
Poniżej coś co działa jak przełącznik i zamieszczam to raczej jako żart, a nie gotowe rozwiązanie.
Sub poka_schowaj()
Application.DisplayFormulaBar = Not Application.DisplayFormulaBar
With ActiveWindow
.DisplayGridlines = Not .DisplayGridlines
.DisplayHeadings = Not .DisplayHeadings
.DisplayHorizontalScrollBar = Not .DisplayHorizontalScrollBar
.DisplayVerticalScrollBar = Not .DisplayVerticalScrollBar
.DisplayWorkbookTabs = Not .DisplayWorkbookTabs
End With
End Sub
Samo zabezpieczanie przed użytkownikiem to walka z wiatrakami. |