Note: The other languages of the website are Google-translated. Back to English

Ինչպե՞ս ավտոմատ կերպով թաքցնել հատուկ աշխատանքային թերթերը Excel ֆայլ բացելիս:

Եթե ​​ինչ-որ կոնկրետ աշխատանքային թերթեր անհրաժեշտ է ինքնաբերաբար թաքցնել, երբ ինչ-որ մեկը բացում է աշխատանքային գիրքը, ինչպե՞ս կարող եք գործ ունենալ այս աշխատանքի հետ Excel- ում:

VBA կոդով աշխատանքային գիրք բացելիս ավտոմատ կերպով թաքցրեք որոշակի աշխատանքային թերթ

VBA կոդով աշխատանքային գիրք բացելիս ավտոմատ կերպով թաքցրեք որոշ հատուկ աշխատանքային թերթեր


նետ կապույտ աջ պղպջակVBA կոդով աշխատանքային գիրք բացելիս ավտոմատ կերպով թաքցրեք որոշակի աշխատանքային թերթ

Եթե ​​աշխատանքային գիրքը բացելիս ցանկանում եք թաքցնել մեկ կոնկրետ աշխատանքային թերթ, կարող եք կիրառել հետևյալ VBA կոդը:

1, Պահեք պահեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2, Ձախ կողմում Projectրագիր-VBAP նախագիծ պատուհանը, կրկնակի սեղմեք Այս գործառույթը դատարկ Մոդուլ բացելու համար, ապա պատճենեք և կպցրեք հետևյալ կոդը Մոդուլում.

VBA կոդ. Աշխատանքային գիրք բացելիս թաքցրեք որոշակի թերթիկ.

Private Sub Workbook_Open()
Sheets("Sheet5").Visible = False
End Sub

doc թաքցնել թերթը բաց 1-ում

ՆշումՎերոհիշյալ ծածկագրում Sheet5 այն թերթիկի անունն է, որը ցանկանում եք թաքցնել բաց: Խնդրում եմ փոխեք այն ձեր կարիքի վրա:

3, Դրանից հետո պահեք և փակեք այս ծածկագրի պատուհանը և կտտացրեք Ֆայլ > Պահել As այս աշխատանքային գիրքը պահպանելու համար, ինչպես Excel մակրոներով աշխատունակ գիրք ձևաչափը, տես նկարի նկարը.

doc թաքցնել թերթը բաց 2-ում

4. Երբ հաջորդ անգամ բացեք այս աշխատանքային գիրքը, սեղմեք Միացնել բովանդակությունը նախ կոճակը, ապա ձեր նշված թերթը ինքնաբերաբար կթաքցվի:

doc թաքցնել թերթը բաց 3-ում


նետ կապույտ աջ պղպջակ VBA կոդով աշխատանքային գիրք բացելիս ավտոմատ կերպով թաքցրեք որոշ հատուկ աշխատանքային թերթեր

Եթե ​​աշխատանքային գրքույկը բացելիս անհրաժեշտ է թաքցնել բազմաթիվ աշխատանքային թերթեր, ահա նաև մի կոդ, որը կարող է օգնել ձեզ:

1, Նախ, դուք պետք է նշեք թերթի անունները, որոնք ցանկանում եք բաց թաքցնել, աշխատանքային թերթիկի ցուցակում, ապա անցնել Անուն տուփ նրանց մի շարք անվանում տալ-SheetsToHide- ըեւ սեղմեք Մտնել ստեղնը, տես նկարի նկարը.

doc թաքցնել թերթը բաց 4-ում

2, Ապա պահեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

3, Ձախ կողմում Projectրագիր-VBAP նախագիծ պատուհանը, կրկնակի սեղմեք Այս գործառույթը դատարկ Մոդուլ բացելու համար, ապա պատճենեք և կպցրեք հետևյալ կոդը Մոդուլում.

VBA կոդ. Աշխատանքագիրք բացելիս թաքցրեք որոշ հատուկ աշխատանքային թերթեր.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   'Updateby Extendoffice 20161206
    Dim ws As Worksheet
    For Each ws In Worksheets
       ws.Visible = xlSheetVisible
    Next ws
End Sub
Private Sub Workbook_Open()
    Dim ws As Worksheet
        For Each ws In Worksheets
            If WorksheetFunction.CountIf([SheetsToHide], ws.Name) > 0 Then
                ws.Visible = xlSheetHidden
                MsgBox ws.Name & "Has been hidden!", vbInformation, "Kutools for Excel"
            Else
                ws.Visible = xlSheetVisible
            End If
        Next ws
    Set ws = Nothing
End Sub

doc թաքցնել թերթը բաց 5-ում

ՆշումՎերոհիշյալ ծածկագրում SheetsToHide- ը ընդգրկույթի անունն է, որը դուք ստեղծել եք 1-ին քայլում:

4, Դրանից հետո պահեք և փակեք այս ծածկագրի պատուհանը և կտտացրեք Ֆայլ > Պահել As այս աշխատանքային գիրքը պահպանելու համար, ինչպես Excel մակրոներով աշխատունակ գիրք ձևաչափ Այսուհետ, երբ հաջորդ անգամ բացեք այս աշխատանքային գիրքը, նշված աշխատանքային թերթերն ինքնաբերաբար կթաքցվեն:


Գրասենյակի արտադրողականության լավագույն գործիքները

Excel-ի համար Kutools-ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80%-ով

  • Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
  • Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
  • Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
  • Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
  • Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
  • Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
  • Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
  • Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
  • Ավելի քան 300 հզոր հատկություններ. Աջակցում է Office / Excel 2007-2021 և 365: Աջակցում է բոլոր լեզուներին: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հնարավորություններ 30-օրյա անվճար փորձարկում: 60-օրյա գումարի վերադարձի երաշխիք:
kte էջանիշը 201905

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
officetab ներքևում
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (0)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր

Հետեւեք մեզ

Հեղինակային իրավունքի © 2009 - www.extendoffice.com. | Բոլոր իրավունքները պաշտպանված են. Powered by ExtendOffice. | | Կայքի քարտեզ
Microsoft- ը և Office- ի պատկերանշանը հանդիսանում են Microsoft Corporation- ի ապրանքային նշաններ կամ գրանցված ապրանքային նշաններ ԱՄՆ-ում և (կամ) այլ երկրներում:
Պաշտպանված է Sectigo SSL- ի կողմից