A bemutató elmagyarázza, hogyan lehet a munkalapokat az Excel 2016, 2013, 2010 és alacsonyabb verzióban elrejteni. Megtanulja, hogyan lehet gyorsan elrejteni a munkalapot a jobb gombbal történő kattintással, és hogyan lehet egyszerre az összes lapot elrejteni VBA-kóddal.

Képzelje el a következőt: megnyit egy munkalapot, és észreveszi, hogy néhány képlet egy másik munkalapra hivatkozik. Megnézi a lapok lapjait, de a hivatkozott munkalap nincs ott! Megpróbál létrehozni egy új lapot ugyanazzal a névvel, de az Excel azt mondja, hogy az már létezik. Mit jelent ez az egész? Egyszerűen azt, hogy a munkalap el van rejtve. Hogyan lehet a rejtett lapokat az Excelben megtekinteni? Nyilvánvalóan fel kell oldani a rejtegetést. Ez lehetmanuálisan az Excel Unhide paranccsal vagy automatikusan a VBA-val. Ez a bemutató mindkét módszert megtanítja.

Hogyan lehet eltávolítani a lapokat az Excelben

Ha csak egy vagy két elrejtett lapot szeretne látni, itt van, hogyan tudja gyorsan eltávolítani őket:

1. Az Excel munkafüzetben kattintson a jobb gombbal bármelyik lapfülre, és válassza a Unhide ... a kontextusmenüből.
2. A Unhide mezőben válassza ki a megjeleníteni kívánt rejtett lapot, és kattintson a OK (vagy kattintson duplán a lap nevére). Kész!

A jobb egérgombbal történő kattintás kontextuális menüje mellett a Unhide párbeszédpanel a szalagról érhető el:

• Az Excel 2003 és korábbi programokban kattintson a Formátum menü, majd kattintson a Sheet > Unhide .
• Az Excel 2016, Excel 2013, Excel 2010 és Excel 2007 programokban lépjen az Excel 2016, Excel 2013, Excel 2010 és Excel 2007 Home tab> Sejtek csoport, és kattintson a Formátum A címen. Láthatóság , mutasson a Hide & Unhide , majd kattintson a Unhide Sheet ...

Megjegyzés: Az Excel Unhide opcióval egyszerre csak egy lapot választhat ki. Több lap elrejtésének megszüntetéséhez a fenti lépéseket minden egyes munkalapra külön-külön meg kell ismételnie, vagy az alábbi makrók segítségével az összes lapot egy menetben is elrejtheti.

Hogyan lehet eltávolítani a lapokat az Excelben a VBA segítségével

Olyan helyzetekben, amikor több elrejtett munkalap van, a lapok egyesével történő elrejtésének feloldása nagyon időigényes lehet, különösen, ha a munkafüzet összes lapját szeretné feloldani. Szerencsére a folyamatot automatizálhatja az alábbi makrók egyikével.

Hogyan lehet az Excel összes lapját elrejteni

Ez a kis makró egyszerre láthatóvá teszi az aktív munkafüzet összes rejtett lapját, anélkül, hogy bármilyen értesítéssel zavarná Önt.

Sub Unhide_All_Sheets() Dim wks As Worksheet For Each wks In ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible Next wks End Sub

Az összes rejtett lap megjelenítése és számának megjelenítése

A fenti makróhoz hasonlóan ez a makró is megjeleníti a munkafüzet összes elrejtett lapját, azzal a különbséggel, hogy befejezéskor egy párbeszédpanelt jelenít meg, amely tájékoztatja a felhasználót arról, hogy hány lapot távolított el:

Sub Unhide_All_Sheets_Count() Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If wks.Visible xlSheetVisible Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count> 0 Then MsgBox count & " worksheets have been unhiddenged." , vbOKOnly, "Unhiding worksheets" Else MsgBox "No hidden worksheets have been found." , vbOKOnly,"Munkalapok elrejtésének megszüntetése" End If End Sub

Több kiválasztott lap elrejtésének feloldása

Ha nem szeretné egyszerre az összes munkalapot elrejteni, hanem csak azokat, amelyek láthatóvá tételéhez a felhasználó kifejezetten hozzájárul, akkor a makró kérdezzen rá minden egyes elrejtett lapra külön-külön, például így:

Sub Unhide_Selected_Sheets() Dim wks As Worksheet Dim MsgResult As VbMsgBoxResult For Each wks In ActiveWorkbook.Worksheets If wks.Visible = xlSheetHidden Then MsgResult = MsgBox( "Unhide sheet " & wks.Name & "?" , vbYesNo, "Unhiding worksheets" ) If MsgResult = vbYes Then wks.Visible = xlSheetVisible End If Next End Sub

Olyan munkalapok elrejtésének feloldása, amelyek lapnevében egy adott szó szerepel

Olyan helyzetekben, amikor csak a nevükben bizonyos szöveget tartalmazó lapokat szeretné elrejteni, adjon hozzá egy IF utasítást a makróhoz, amely ellenőrzi az egyes elrejtett munkalapok nevét, és csak azokat a lapokat rejti el, amelyek tartalmazzák a megadott szöveget.

Ebben a példában a lapok elrejtését a " jelentés "A makró olyan lapokat fog megjeleníteni, mint például Jelentés , 1. jelentés , Júliusi jelentés és hasonlók.

Az olyan munkalapok elrejtésének megszüntetéséhez, amelyek neve más szót tartalmaz, helyettesítse a " jelentés " a következő kódban a saját szövegeddel.

Sub Unhide_Sheets_Contain() Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If (wks.Visible xlSheetVisible) And (InStr(wks.Name, "report" )> 0) Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count> 0 Then MsgBox count & " worksheets have been unhiddened." , vbOKOnly, "Unhiding worksheets" Else MsgBox "No hiddena megadott nevű munkalapokat találtuk." , vbOKOnly, "A munkalapok elrejtésének megszüntetése" End If End Sub

Hogyan használhatja a makrókat az Excel lapok elrejtésének megszüntetéséhez?

A makrók munkalapon való használatához vagy bemásolhatja/beillesztheti a kódot a Visual Basic szerkesztőprogramban, vagy letöltheti a makrókat tartalmazó munkafüzetet, és onnan futtathatja azokat.

Hogyan illesszük be a makrót a munkafüzetbe

A fenti makrók bármelyikét hozzáadhatja a munkafüzetéhez:

1. Nyissa meg a rejtett lapokat tartalmazó munkafüzetet.
2. Nyomja meg az Alt + F11 billentyűkombinációt a Visual Basic szerkesztő megnyitásához.
3. A bal oldali ablaktáblán kattintson a jobb gombbal a ThisWorkbook és válassza a Beillesztés > Modul a kontextusmenüből.
4. Illessze be a kódot a Kód ablakba.
5. Nyomja meg az F5 billentyűt a makró futtatásához.

A részletes, lépésről-lépésre történő utasításokat lásd: Hogyan illesszünk be és futtassunk VBA-kódot az Excelben.

Töltse le a makrókat tartalmazó munkafüzetet

Alternatívaként letöltheti az Excelben a lapok elrejtésének feloldására szolgáló mintamunkafüzetünket, amely tartalmazza az ebben a bemutatóban tárgyalt összes makrót:

• Unhide_All_Sheets - egy aktív munkafüzet összes munkalapjának elrejtésének pillanatnyi és csendes megszüntetése.
• Unhide_All_Sheets_Count (Összes_lapok_elrejtése_számlálása) - megmutatja az összes rejtett lapot a számukkal együtt.
• Unhide_Selected_Sheets - a rejtett lapok megjelenítése, ha úgy dönt, hogy feloldja az elrejtést.
• Unhide_Sheets_Contain - olyan munkalapok elrejtésének megszüntetése, amelyek neve egy adott szót vagy szöveget tartalmaz.

A makrók futtatásához az Excelben a következőket kell tennie:

1. Nyissa meg a letöltött munkafüzetet, és ha kéri, engedélyezze a makrókat.
2. Nyissa meg a saját munkafüzetét, amelyben a rejtett lapokat szeretné látni.
3. A munkafüzetben nyomja meg az Alt + F8 billentyűkombinációt, jelölje ki a kívánt makrót, és kattintson a Fuss .

Ha például az Excel-fájl összes lapját szeretné elrejteni, és megjeleníteni a rejtett lapok számát, futtassa ezt a makrót:

Hogyan jeleníthet meg rejtett lapokat az Excelben egyéni nézet létrehozásával?

A makrókon kívül a rejtett munkalapok egyenként történő megjelenítésének unalmát egyéni nézet létrehozásával is leküzdhetjük. Ha nem ismeri ezt az Excel funkciót, az egyéni nézetet úgy képzelheti el, mint a munkafüzet beállításainak pillanatfelvételét, amelyet bármikor egy egérkattintással alkalmazhat. Ezt a módszert a legjobb a munka legelején alkalmazni, amikor még egyik lap sincs elrejtve.

Tehát, most azt fogjuk tenni, hogy létrehozzuk a Minden lap megjelenítése Egyéni nézet. Íme, hogyan:

1. Győződjön meg róla, hogy a munkafüzet összes táblázata látható Ez a tipp megmutatja, hogyan ellenőrizheti gyorsan a munkafüzetet a rejtett lapok tekintetében.
2. Menjen a A megtekintése tab> Munkafüzet nézetek csoport, és kattintson a Egyéni nézetek gomb.

A Egyéni nézet párbeszédpanel jelenik meg, és kattintson a Add...

a Nézet hozzáadása párbeszédpanelen írja be az egyéni nézet nevét, például ShowAllSheets , és kattintson az OK gombra.

Most már annyi munkalapot rejthet el, amennyit csak akar, és amikor újra láthatóvá kívánja tenni őket, kattintson a Egyéni nézetek gombra, válassza ki a ShowAllSheet nézet és kattintson Mutasd meg a , vagy egyszerűen kattintson duplán a nézetre.

Ennyi! Az összes rejtett lap azonnal megjelenik.

Hogyan ellenőrizhetjük, hogy egy munkafüzet tartalmaz-e rejtett lapokat?

A leggyorsabb módja a rejtett lapok felderítésének az Excelben a következő: kattintson a jobb gombbal bármelyik lapfülre, és nézze meg, hogy a Rejtsd el... parancs engedélyezve van vagy sem. Ha engedélyezve van, kattintson rá, és nézze meg, mely lapok vannak elrejtve. Ha letiltva van (szürke), a munkafüzet nem tartalmaz rejtett lapokat.

Megjegyzés: Ez a módszer nem jeleníti meg a nagyon rejtett lapokat. Az ilyen lapokat csak úgy lehet megtekinteni, ha a VBA segítségével feloldjuk a rejtettségüket.

Nem lehet eltávolítani a lapokat az Excelben - problémák és megoldások

Ha nem tud bizonyos lapokat elrejteni az Excelben, a következő hibaelhárítási tippek megvilágíthatják, hogy miért.

1. A munkafüzet védett

Nem lehetséges a lapok elrejtése vagy elrejtésének megszüntetése, ha a munkafüzet felépítése védett (nem tévesztendő össze a munkafüzet szintű jelszavas titkosítással vagy a munkalapok védelmével). Ennek ellenőrzéséhez menjen a Felülvizsgálat tab> Változások csoportot, és nézze meg a Protect munkafüzet Ha ez a gomb zöld színnel van kiemelve, a munkafüzet védett. A védelem feloldásához kattintson a Protect munkafüzet gombra, írja be a jelszót, ha erre kéri, és mentse el a munkafüzetet. További információért lásd: Hogyan oldható fel egy védett munkafüzet az Excelben.

2. A munkalapok nagyon rejtett

Ha a munkalapok olyan VBA-kóddal vannak elrejtve, amely nagyon rejtetté teszi őket (hozzárendeli a xlSheetVeryHidden tulajdonság), az ilyen munkalapokat nem lehet megjeleníteni a Unhide A nagyon rejtett lapok elrejtésének megszüntetéséhez meg kell változtatnia a tulajdonságot a xlSheetVeryHidden a címre. xlSheetVisible a Visual Basic szerkesztőből, vagy futtassa ezt a VBA kódot.

3. A munkafüzetben nincsenek rejtett lapok.

Ha a Unhide parancs szürke a szalagban és a jobb klikk menüben is, ez azt jelenti, hogy nincs egyetlen rejtett lap sem a munkafüzetben :)

Így lehet a lapokat elrejteni az Excelben. Ha kíváncsi vagy arra, hogyan lehet más objektumokat, például sorokat, oszlopokat vagy képleteket elrejteni vagy elrejteni, akkor az alábbi cikkekben találsz minden részletet. Köszönöm, hogy elolvastad, és remélem, jövő héten találkozunk a blogon!

Elérhető letöltések

Makrók az Excel munkalapok elrejtésének megszüntetéséhez