Jak szybko policzyć liczbę ukrytych arkuszy w programie Excel?

Jeśli masz duży skoroszyt z setkami arkuszy roboczych, a niektóre z nich są ukryte. Aby spełnić pewne specjalne potrzeby, chcesz poznać liczbę ukrytych arkuszy w skoroszycie, jak możesz to zrobić zamiast liczyć je jeden po drugim? Teraz przedstawię dwie sztuczki pozwalające szybko policzyć ukryte arkusze naraz.

Policz ukryte arkusze za pomocą VBA

Policz ukryte / widoczne arkusze za pomocą Kutools for Excel

Usuń ukryte arkusze lub odkryj wszystkie ukryte arkusze za pomocą Kutools for Excel

---

Policz ukryte arkusze za pomocą VBA

Przedstawiam kod VBA, który może wyświetlać okno dialogowe z informacją o liczbie ukrytych arkuszy w skoroszycie.

1. naciśnij Alt + F11 klawisze, aby włączyć Microsoft Visual Basic for Applications okno.

2. kliknij wstawka > Modułi wklej poniższy kod do nowego Moduł okno.

VBA: Policz ukryte arkusze.

Sub vhCount()
'Updateby20150602
Dim xWs As Worksheet
Dim xCount As Integer
For Each xWs In Application.ActiveWorkbook.Sheets
    If xWs.Visible Then xCount = xCount + 1
Next
MsgBox "Visible : " & xCount & vbCrLf & _
    "Hidden : " & ActiveWorkbook.Sheets.Count - xCount
End Sub

3. naciśnij F5 aby uruchomić kod, i pojawi się okno dialogowe z informacją o liczbie ukrytych arkuszy roboczych i liczbie widocznych arkuszy.

---

Policz ukryte / widoczne arkusze za pomocą Kutools for Excel

Jeśli nie znasz języka VBA, możesz bezpłatnie zainstalować Kutools dla programu Excel aby policzyć liczbę arkuszy, ukrytych arkuszy i widocznych arkuszy na pierwszy rzut oka.

Po bezpłatna instalacja Kutools dla programu Excel, wykonaj poniższe czynności:

1. kliknij Kutools > Nawigacja aby wyświetlić okienko. Zobacz zrzut ekranu:

2. Następnie kliknij Skoroszyt i arkusz aby wyświetlić listę książek i arkuszy, i przejdź na dół panelu, możesz znaleźć liczbę wszystkich arkuszy, ukrytych arkuszy i widocznych arkuszy.

Wskazówka: Jeśli nie potrzebujesz już okienka nawigacji, kliknij Kutools > Nawigacja ponownie, aby to ukryć.

---

Usuń ukryte arkusze lub odkryj wszystkie ukryte arkusze za pomocą Kutools for Excel

Z Kutools dla programu Excel, możesz też jednym kliknięciem usunąć wszystkie ukryte arkusze.

1. Jeśli chcesz odkryć wszystkie ukryte arkusze, po prostu kliknij Kutools > Pokaż ukryj > Odkryj wszystkie ukryte arkusze.

2. Jeśli chcesz usunąć wszystkie ukryte arkusze, po prostu kliknij Przedsiębiorstwo > Ćwiczenie > Usuń wszystkie ukryte arkusze. Zobacz zrzut ekranu: