Cara Mengelak Lembaran di Excel: Tunjukkan Pelbagai atau Semua Lembaran Tersembunyi

Tutorial ini menunjukkan kepada anda bagaimana untuk melepaskan lembaran kerja di Excel 2016, 2013, 2010, dan versi terdahulu. Ketahui kaedah cepat menggunakan klik kanan dan kod VBA untuk mendedahkan lembaran tersembunyi.

Senario: Anda membuka spreadsheet, dan formula merujuk lembaran yang hilang. Tab Lembaran tidak dapat dilihat, dan membuat lembaran baru dengan nama yang sama gagal. Ini bermakna lembaran kerja tersembunyi. Tutorial ini merangkumi penyelesaian berasaskan manual dan VBA.

• Lembaran manual tanpa henti
• Tidak berpusat di VBA
  • Tidak dapat menembusi semua helaian
  • Tidak dapat dipilih
  • Helaian yang tidak disengajakan dengan teks tertentu dalam nama
• Tidak dapat dilihat dengan pandangan tersuai
• Memeriksa helaian tersembunyi
• Menyelesaikan masalah masalah tanpa henti

Lembaran tanpa henti secara manual

Untuk tidak mengikat satu atau dua helai:

1. Klik kanan mana-mana tab Lembaran dan pilih "UNTIDE ...".
2. Pilih lembaran tersembunyi dan klik "OK" (atau klik dua kali nama lembaran).

Sebagai alternatif, akses dialog "UNHIDE" melalui reben:

• Excel 2003 dan lebih awal: Format > Lembaran > Unhide .
• Excel 2016, 2013, 2010, 2007: Laman Utama > Sel > Format > Keterlihatan > Hide & UNHID > Lembaran UNHID ....

Nota: "UNHIDE" Excel hanya mengendalikan satu helaian pada satu masa. Untuk pelbagai helaian, gunakan makro VBA.

Lembaran yang tidak disengajakan dengan VBA

Untuk pelbagai lembaran kerja tersembunyi, Automasi VBA adalah cekap.

Tidak dapat menembusi semua helaian

Makro ini menjadikan semua lembaran tersembunyi kelihatan:

 Sub unhide_all_sheets ()
  Dim wks sebagai lembaran kerja
  Untuk setiap wks di aktif kerja.worksheets
    wks.visible = xlsheetVisible
  Wks seterusnya
Akhir sub

Menunjukkan semua lembaran tersembunyi dan mengira mereka

Makro ini memaparkan semua helaian tersembunyi dan menunjukkan kiraan mereka dalam kotak mesej:

 Sub unhide_all_sheets_count ()
  Dim wks sebagai lembaran kerja
  Kiraan redup sebagai integer
  kiraan = 0
  Untuk setiap wks di aktif kerja.worksheets
    Jika wks.visible  xlsheetvisible maka
      wks.visible = xlsheetVisible
      kiraan = kiraan 1
    Akhir jika
  Wks seterusnya
  Jika kiraan> 0 kemudian
    Msgbox Count & "Lembaran Kerja telah tidak disengajakan.", Vbokonly, "Lembaran Kerja yang tidak disengajakan"
  Lain
    Msgbox "Tiada lembaran kerja tersembunyi telah dijumpai.", Vbokonly, "Lembaran Kerja yang tidak disengajakan"
  Akhir jika
Akhir sub

Tidak dapat dipilih

Makro ini mendorong pengguna untuk memilih lembaran tersembunyi yang tidak dapat disangkal:

 Sub unhide_selected_sheets ()
  Dim wks sebagai lembaran kerja
  Dim msgresult sebagai vbmsgboxResult
  Untuk setiap wks di aktif kerja.worksheets
    Jika wks.visible = xlsheetidden kemudian
      Msgresult = msgBox ("UNHIDE SHEET" & WKS.NAME & "?", VByesno, "Lembaran Kerja Unfiding")
      Jika msgresult = vbyes maka
        wks.visible = xlsheetVisible
      Akhir jika
    Akhir jika
  Seterusnya
Akhir sub

Lembaran tanpa henti yang mengandungi teks tertentu

Makro ini menyentuh lembaran dengan perkataan tertentu dalam nama mereka (ganti " laporan " dengan teks anda):

 Sub unhide_sheets_contain ()
  Dim wks sebagai lembaran kerja
  Kiraan redup sebagai integer
  kiraan = 0
  Untuk setiap wks di aktif kerja.worksheets
    Jika (wks.visible  xlsheetVisible) dan (instr (1, wks.name, "laporan", vbtextcompare)> 0) kemudian
      wks.visible = xlsheetVisible
      kiraan = kiraan 1
    Akhir jika
  Wks seterusnya
  Jika kiraan> 0 kemudian
    Msgbox Count & "Lembaran Kerja telah tidak disengajakan.", Vbokonly, "Lembaran Kerja yang tidak disengajakan"
  Lain
    Msgbox "Tiada lembaran kerja tersembunyi dengan nama yang ditentukan telah dijumpai.", Vbokonly, "Lembaran Kerja Unfiding"
  Akhir jika
Akhir sub

Menggunakan makro

Masukkan kod ke dalam modul dalam editor VBA (ALT F11), atau muat turun buku kerja yang disediakan.

Memasukkan makro

1. Buka buku kerja.
2. Tekan alt f11.
3. Klik kanan ini , pilih MASCROP > MODULE .
4. Tampal kod.
5. Tekan F5 untuk dijalankan.

Memuat turun buku kerja

Muat turun buku kerja sampel yang mengandungi semua makro. Jalankan makro melalui Alt F8.

Helaian yang tidak disengajakan dengan pandangan tersuai

Buat paparan tersuai untuk menunjukkan semua helaian:

1. Pastikan semua helaian dapat dilihat.
2. Lihat > Pandangan Buku Kerja > Paparan Kustom .
3. Klik "Tambah ...".
4. Namakan paparan (misalnya, "showallsheets") dan klik "OK".

Memeriksa helaian tersembunyi

Cepat periksa helaian tersembunyi dengan mengklik kanan tab lembaran. Jika "Sembunyikan ..." diaktifkan, lembaran tersembunyi wujud.

Penyelesaian masalah

Buku kerja yang dilindungi

Jika struktur buku kerja dilindungi, tidak dapat disangkal adalah mustahil. Tidak melindungi melalui tab Kajian .

Lembaran kerja yang sangat tersembunyi

Lembaran kerja yang tersembunyi melalui xlSheetVeryHidden VBA memerlukan VBA untuk tidak disengajakan.

Tiada lembaran tersembunyi

"Unhide" yang berwarna kelabu bermakna tiada lembaran tersembunyi.

Ini menyimpulkan panduan mengenai lembaran kerja Excel yang tidak disengajakan. Makro yang boleh dimuat turun boleh didapati.

Atas ialah kandungan terperinci Cara Mengelak Lembaran di Excel: Tunjukkan Pelbagai atau Semua Lembaran Tersembunyi. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!