Բովանդակություն
Ձեռնարկը բացատրում է, թե ինչպես բացել աշխատաթերթերը Excel 2016, 2013, 2010 և ավելի ցածր տարբերակներում: Դուք կսովորեք, թե ինչպես արագ բացել աշխատանքային թերթը՝ սեղմելով աջը, և ինչպես բացել բոլոր թերթերը միաժամանակ VBA կոդով:
Պատկերացրեք սա. բացում եք աշխատաթերթը և նկատում, որ որոշ բանաձևեր վերաբերում են մեկ այլ աշխատաթերթին: . Դուք նայում եք թերթի ներդիրներին, բայց հղումով աղյուսակը չկա: Դուք փորձում եք նույն անունով նոր թերթ ստեղծել, բայց Excel-ը ձեզ ասում է, որ այն արդեն գոյություն ունի: Ի՞նչ է նշանակում այդ ամենը: Պարզապես, աշխատանքային թերթիկը թաքնված է: Ինչպե՞ս դիտել թաքնված թերթերը Excel-ում: Ակնհայտ է, որ դուք պետք է բացահայտեք դրանք: Դա կարելի է ձեռքով անել՝ օգտագործելով Excel-ի Unhide հրամանը կամ ավտոմատ կերպով VBA-ի միջոցով: Այս ձեռնարկը կսովորեցնի ձեզ երկու մեթոդներն էլ:
Ինչպես բացել թերթերը Excel-ում
Եթե ցանկանում եք տեսնել ընդամենը մեկ կամ երկու թաքնված թերթ, ահա թե ինչպես կարող եք արագ ցուցադրել դրանք՝
- Ձեր Excel-ի աշխատանքային գրքում աջ սեղմեք թերթի ցանկացած ներդիր և ընտրեք Բացահայտել … համատեքստի ընտրացանկից:
- Բացահայտել վանդակում, ընտրեք թաքնված թերթիկը, որը ցանկանում եք ցուցադրել և սեղմեք OK (կամ կրկնակի սեղմեք թերթի անվան վրա): Կատարված է:
Բացի աջ սեղմման համատեքստային ընտրացանկից, Բացահայտել երկխոսությունը կարելի է մուտք գործել ժապավենից.
- Excel 2003-ում և ավելի վաղ, սեղմեք Ձևաչափ ընտրացանկը, այնուհետև կտտացրեք Թերթիկը > Հեռացնել :
- Excel 2016-ում, Excel 2013, Excel 2010 և Excel2007 թ., գնացեք Գլխավոր ներդիր > Բջիջներ խումբ և սեղմեք Ձևաչափ Տեսանելիություն -ում, մատնացույց արեք Թաքցնել &: ; Բացահայտել , այնուհետև սեղմել Բացահայտել թերթիկը …
Նշում: Excel-ի Unhide տարբերակը թույլ է տալիս միաժամանակ ընտրել միայն մեկ թերթ: Բազմաթիվ թերթիկները ցուցադրելու համար դուք պետք է կրկնեք վերը նշված քայլերը յուրաքանչյուր աշխատաթերթի համար առանձին կամ կարող եք բոլոր թերթերը մեկ քայլով ցուցադրել՝ օգտագործելով ստորև բերված մակրոները:
Ինչպես հեռացնել թերթերը Excel-ում VBA-ի միջոցով
Այն իրավիճակներում, երբ դուք ունեք մի քանի թաքնված աշխատաթերթեր, դրանք մեկ առ մեկ բացելը կարող է շատ ժամանակատար լինել, հատկապես, եթե ցանկանում եք բացել բոլոր թերթերը: ձեր աշխատանքային գրքում: Բարեբախտաբար, դուք կարող եք ավտոմատացնել գործընթացը հետևյալ մակրոներից որևէ մեկով:
Ինչպես ցուցադրել բոլոր թերթերը Excel-ում
Այս փոքրիկ մակրոն ակտիվ աշխատանքային գրքույկի բոլոր թաքնված թերթերը միանգամից տեսանելի է դարձնում՝ առանց խանգարելու: դուք ցանկացած ծանուցումներով:
Sub Unhide_All_Sheets() Dim wks As Worksheet for Every Wks In ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible Հաջորդ շաբաթ Ավարտ SubՑուցադրել բոլոր թաքնված թերթերը և ցուցադրել դրանց թիվը
Հավանել վերը նշվածը, այս մակրոն նաև ցուցադրում է բոլոր թաքնված թերթերը աշխատանքային գրքում: Տարբերությունն այն է, որ ավարտից հետո այն ցույց է տալիս երկխոսության տուփ, որը տեղեկացնում է օգտագործողին, թե քանի թերթ է բացվել:
Sub Unhide_All_Sheets_Count() Dim wks As Worksheet Dim count As Integer count = 0ActiveWorkbook-ում յուրաքանչյուր շաբաթվա համար.Աշխատանքային թերթիկներ Եթե wks.Visible xlSheetVisible Ապա wks.Visible = xlSheetՏեսանելի հաշվում = հաշվում + 1 ավարտ, եթե հաջորդ շաբաթ, Եթե count > 0 Ապա MsgBox հաշվում & AMP; «Աշխատանքային թերթիկները չթաքնված են»: , vbOKOnly, "Unhiding worksheets" Else MsgBox "Ոչ մի թաքնված աշխատաթերթ չի գտնվել." , vbOKOnly, «Unhiding worksheets» End If End Sub
Ցուցադրել ձեր ընտրած բազմաթիվ թերթերը
Եթե նախընտրում եք չցուցադրել բոլոր աշխատաթերթերը միանգամից, այլ միայն նրանք, որոնք օգտատերը բացահայտորեն համաձայնում է տեսանելի դարձնել, այնուհետև թող մակրոները հարցնեն յուրաքանչյուր թաքնված թերթի մասին առանձին, այսպես.
Sub Unhide_Selected_Sheets() Dim wks As Worksheet Dim MsgResult As VbMsgBoxResult For Every wks ActiveWorkbook-ում.Աշխատանքային թերթիկներ Եթե wks.Visible = xlSheetHidden Այնուհետեւ MsgResult = MsgBox( "Բացահայտել թերթիկը " & wks.Name & "?" , vbYesNo, "Unhiding worksheets" ) If MsgResult = vbYes Այնուհետեւ wks.Visible = xlSheetVisible End Worksheet IfU Ende. թերթի անվանման կոնկրետ բառ
Այն իրավիճակներում, երբ ցանկանում եք բացել միայն որոշակի տեքստ պարունակող թերթերն իրենց անուններում, մակրոյում ավելացրեք IF հայտարարություն, որը կստուգի յուրաքանչյուր թաքնված աշխատաթերթի անունը և կցուցադրի միայն այդ թերթերը: որոնք պարունակում են ձեր նշած տեքստը:
Այս օրինակում մենք ցուցադրում ենք « հաղորդում» բառով թերթերը t » անունով։ Մակրոն կցուցադրի թերթեր, ինչպիսիք են Զեկույց , Հաղորդում 1 , Հուլիսreport և այլն:
Աշխատանքային թերթերը ցուցադրելու համար, որոնց անունները պարունակում են որևէ այլ բառ, փոխարինեք « report »-ը հետևյալ կոդում ձեր սեփական տեքստով:
Sub Unhide_Sheets_Contain( ) Dim wks-ը որպես աշխատանքային թերթիկ Dim count as Integer = 0 ActiveWorkbook-ում յուրաքանչյուր շաբաթվա համար: Worksheets If (wks.Visible xlSheetVisible) And (InStr(wks.Name, «report») > 0) Հետո wks.Visible = xlSheets count + 1 Ավարտ, եթե հաջորդ շաբաթ, Եթե count > 0 Ապա MsgBox հաշվում & AMP; «Աշխատանքային թերթիկները չթաքնված են»: , vbOKOnly, "Unhiding worksheets" Else MsgBox "Նշված անունով թաքնված աշխատաթերթեր չեն գտնվել։" , vbOKOnly, «Unhiding worksheets» End If End SubԻնչպես օգտագործել մակրոները Excel-ում թերթերը ցուցադրելու համար
Ձեր աշխատաթերթում մակրոներն օգտագործելու համար կարող եք կամ պատճենել/տեղադրել կոդը Visual Basic-ում: Խմբագրեք կամ ներբեռնեք աշխատանքային գրքույկը մակրոներով և գործարկեք դրանք այնտեղից:
Ինչպես տեղադրել մակրո ձեր աշխատանքային գրքում
Դուք կարող եք ավելացնել վերը նշված մակրոներից որևէ մեկը ձեր աշխատանքային գրքում հետևյալ կերպ. 3>
- Բացեք աշխատանքային գրքույկը թաքնված թերթերով:
- Սեղմեք Alt + F11՝ Visual Basic Editor-ը բացելու համար:
- Ձախ վահանակում սեղմեք աջը This Workbook և համատեքստի ընտրացանկից ընտրեք Տեղադրել > Module :
- Տեղադրեք կոդը կոդի պատուհանում:
- Սեղմեք F5 գործարկելու համար: մակրո:
Մանրամասն քայլ առ քայլ հրահանգների համար տե՛ս Ինչպես տեղադրել և գործարկել VBA կոդըExcel:
Ներբեռնեք աշխատանքային գրքույկը մակրոներով
Այլընտրանքով, կարող եք ներբեռնել մեր աշխատանքային գրքույկի նմուշը՝ Excel-ում ցուցադրելու թերթերը, որոնք պարունակում են այս ձեռնարկում քննարկված բոլոր մակրոները.
- Unhide_All_Sheets - ցուցադրել բոլոր աշխատանքային թերթերը ակտիվ աշխատանքային գրքում մի պահ և անաղմուկ:
- Unhide_All_Sheets_Count - ցույց տալ բոլոր թաքնված թերթերը դրանց քանակի հետ միասին:
- Unhide_Selected_Sheets - ցուցադրել թաքնված թերթերը, որոնք դուք ընտրում եք ցուցադրել:
- Unhide_Sheets_Contain - ցուցադրել աշխատաթերթերը, որոնց անունները պարունակում են որոշակի բառ կամ տեքստ:
Ձեր Excel-ում մակրոները գործարկելու համար դուք անում եք հետևյալը.
- Բացեք ներբեռնված աշխատանքային գիրքը և միացրեք մակրոները, եթե ձեզ հուշեն:
- Բացեք ձեր սեփական աշխատանքային գիրքը, որտեղ ցանկանում եք տեսնել: թաքնված թերթիկներ:
- Ձեր աշխատանքային գրքում սեղմեք Alt + F8 , ընտրեք ցանկալի մակրո և սեղմեք Գործարկել :
Օրինակ՝ բոլոր թերթերը ցուցադրելու համար Ձեր Excel ֆայլը և ցուցադրեք թաքնված թերթերի քանակը, դուք գործարկում եք այս մակրո.
Ինչպես t o Ցույց տալ թաքնված թերթերը Excel-ում՝ ստեղծելով հատուկ դիտում
Բացի մակրոներից, թաքնված աշխատաթերթերը մեկ առ մեկ ցուցադրելու ձանձրույթը կարելի է հաղթահարել՝ ստեղծելով հատուկ տեսք: Եթե դուք ծանոթ չեք Excel-ի այս ֆունկցիային, կարող եք պատկերացնել հատուկ տեսքը որպես ձեր աշխատանքային գրքի կարգավորումների պատկեր, որը կարող է կիրառվել ցանկացած պահի մկնիկի սեղմումով: Այս մեթոդը լավագույնս օգտագործելու համար շատձեր աշխատանքի սկիզբը, երբ թերթերից ոչ մեկը դեռ թաքնված չէ:
Այսպիսով, այն, ինչ մենք պատրաստվում ենք անել հիմա, ստեղծել ենք Ցուցադրել բոլոր թերթերը հատուկ տեսքը: Ահա թե ինչպես.
- Համոզվեք, որ ձեր աշխատանքային գրքի բոլոր աղյուսակները տեսանելի են : Այս խորհուրդը ցույց է տալիս, թե ինչպես արագ ստուգել աշխատանքային գրքույկը թաքնված թերթերի համար:
- Գնացեք Դիտել ներդիր > Աշխատանքային գրքի դիտումներ խումբ և սեղմեք Անհատականացված դիտումներ կոճակը:
Այժմ դուք կարող եք թաքցնել այնքան աշխատաթերթեր, որքան ցանկանում եք, և երբ ցանկանում եք դրանք նորից տեսանելի դարձնել, սեղմեք Պատվերով դիտումներ կոճակը, ընտրեք ShowAllSheet դիտեք և սեղմեք Ցույց տալ , կամ պարզապես կրկնակի սեղմեք դիտման վրա:
Ահա վերջ: Բոլոր թաքնված թերթերը անմիջապես կցուցադրվեն:
Ինչպես ստուգել, թե արդյոք աշխատանքային գրքույկը պարունակում է որևէ թաքնված թերթ
Excel-ում թաքնված թերթերը հայտնաբերելու ամենաարագ ճանապարհը սա է՝ աջ սեղմեք թերթի ցանկացած ներդիր և տեսեք. եթե Թաքցնել… հրամանը միացված է, թե ոչ: Եթե այն միացված է, սեղմեք այն և տեսեք, թե որ թերթերն են թաքնված: Եթե այն անջատված է (մոխրագույն է), աշխատանքային գրքույկը չի պարունակում թաքնված թերթեր:
Նշում. Այս մեթոդը չի ցուցադրում շատ թաքնված թերթեր: Նման թերթիկները դիտելու միակ միջոցը թաքցնելն էդրանք VBA-ով:
Հնարավոր չէ ցուցադրել թերթերը Excel-ում. խնդիրներ և լուծումներ
Եթե չեք կարողանում որոշ թերթեր ցուցադրել ձեր Excel-ում, ապա անսարքությունների վերացման հետևյալ խորհուրդները կարող են պարզել, թե ինչու:
1. Աշխատանքային գրքույկը պաշտպանված է
Հնարավոր չէ թաքցնել կամ ցուցադրել թերթերը, եթե աշխատանքային գրքի կառուցվածքը պաշտպանված է (չպետք է շփոթել աշխատանքային գրքի մակարդակի գաղտնաբառի գաղտնագրման կամ աշխատաթերթի պաշտպանության հետ): Սա ստուգելու համար այցելեք Վերանայել ներդիր > Փոփոխություններ խումբ և դիտեք Պաշտպանել աշխատանքային գրքույկը կոճակը: Եթե այս կոճակը ընդգծված է կանաչով, աշխատանքային գրքույկը պաշտպանված է: Այն չպաշտպանելու համար սեղմեք Պաշտպանել աշխատանքային գրքույկը կոճակը, մուտքագրեք գաղտնաբառը, եթե պահանջվի, և պահեք աշխատանքային գիրքը: Լրացուցիչ տեղեկությունների համար տե՛ս Ինչպես բացել պաշտպանված աշխատանքային գիրքը Excel-ում:
2. Աշխատանքային թերթերը շատ թաքնված են
Եթե ձեր աշխատաթերթերը թաքցված են VBA կոդով, որը դրանք դարձնում է շատ թաքնված (վերագրում է xlSheetVeryHidden հատկությունը), այդպիսի աշխատաթերթերը չեն կարող ցուցադրվել Unhide<2-ի միջոցով:> հրաման. Շատ թաքնված թերթերը ցուցադրելու համար դուք պետք է Visual Basic խմբագրիչից փոխեք հատկությունը xlSheetVeryHidden -ից xlSheetVisible կամ գործարկեք այս VBA կոդը:
3. Աշխատանքային գրքում թաքնված թերթեր չկան
Եթե Unhide հրամանը մոխրագույն է և՛ ժապավենի վրա, և՛ աջ սեղմման ընտրացանկում, դա նշանակում է, որ չկա ոչ մի թաքնված թերթ:ձեր աշխատանքային գրքույկը :)
Այսպես եք ցուցադրում թերթերը Excel-ում: Եթե դուք հետաքրքրված եք իմանալ, թե ինչպես թաքցնել կամ ցուցադրել այլ առարկաներ, ինչպիսիք են տողերը, սյունակները կամ բանաձևերը, դուք կարող եք գտնել ամբողջական մանրամասներ ստորև ներկայացված հոդվածներում: Շնորհակալ եմ կարդալու համար և հուսով եմ՝ հաջորդ շաբաթ կտեսնենք ձեզ մեր բլոգում:
Հասանելի ներբեռնումներ
Մակրոներ՝ Excel-ում աշխատաթերթերը ցուցադրելու համար