Ինչպե՞ս լրացնել հաջորդականության համարները Excel- ում բաց թողնել թաքնված տողերը:
Ենթադրելով, որ դուք ունեք զտիչի տվյալների տիրույթ, որը ցանկանում եք լրացնել հաջորդականության համարները զտված դատարկ բջիջում, ինչպես ցույց է տրված հետևյալ նկարը: Այս դեպքում լրացնելու բռնիչը քարշ տալով ընդհանուր առմամբ բջիջները ճիշտ չեն լցվի, այս հոդվածում ես կխոսեմ Excel- ում այս խնդիրը լուծելու որոշ լավ հնարքների մասին:
Լրացրեք հաջորդականության համարները բաց թողեք թաքնված տողերը բանաձեւով
Լրացրեք հաջորդականության համարները բաց թողեք թաքնված տողերը VBA կոդով
Լրացրեք հաջորդականության համարները բաց թողեք թաքնված տողերը Excel- ի համար Kutools- ով
Լրացրեք հաջորդականության համարները բաց թողեք թաքնված տողերը բանաձեւով
Հաջորդական համարները միայն տեսանելի բջիջներում լրացնելու համար մի պարզ բանաձև կարող է օգնել ձեզ, խնդրում ենք կատարել հետևյալը.
1, Մուտքագրեք այս բանաձևը. = ԵՆԹԱԿԱԼ (103, $ B $ 3: $ B3)(B3 այն տեսանելի բջիջն է, որը համապատասխանում է այն բջիջին, որի համար ցանկանում եք սկսել լրացնել հաջորդականության համարը) առաջին բջիջում, որտեղ այս օրինակի համար ցանկանում եք լրացնել հաջորդականության համարները, A3, և այնուհետև սեղմել Մտնել բանալին, դուք կստանաք թիվ 1, տես նկարի նկարը.
2, Դրանից հետո ընտրեք A3 բջիջը և լրացնելու բռնիչը ներքև քաշեք դեպի այն բջիջները, որոնք ցանկանում եք լրացնել հաջորդականության համարները, տես նկարի նկարը.
Լրացրեք հաջորդականության համարները բաց թողեք թաքնված տողերը VBA կոդով
Հետևյալ VBA կոդը կարող է նաև օգնել ձեզ հաջորդականության համարները լրացնել միայն տեսանելի բջիջների մեջ, խնդրում ենք արեք հետևյալ կերպ.
1, Պահեք պահեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.
2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլներ Պատուհանը:
VBA կոդ. Լրացրեք հաջորդականության համարները բաց թողեք թաքնված տողերը.
Sub FillValue()
'updateby Extendoffice
Dim xRg As Range
Dim xCell As Range
Dim xTxt As String
Dim xVal As Long
Dim I As Long
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the data range", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = xRg.SpecialCells(xlVisible)
Debug.Print xRg.Address
If xRg Is Nothing Then Exit Sub
For Each xCell In xRg
xVal = xVal + 1
xCell = xVal
Next
End Sub
3, Դրանից հետո սեղմեք F5 այս կոդն աշխատեցնելու բանալին, և արագ տուփ է դուրս գալիս ՝ հիշեցնելու համար, որ ընտրեք տվյալների տիրույթը, որը ցանկանում եք լրացնել: Տեսեք,
4. Եվ այնուհետեւ կտտացրեք OK կոճակը, հաջորդականության համարները լրացվել են միայն տեսանելի բջիջների մեջ:
Լրացրեք հաջորդականության համարները բաց թողեք թաքնված տողերը Excel- ի համար Kutools- ով
Երկու մեթոդներից վերը միայն կօգնի ձեզ հաջորդականության համարները լրացնել տեսանելի բջիջների մեջ, եթե ուզում եք հաջորդականությունը լրացնել որպես AA-0001-BB, AA-0002-BB, AA-0003-BB, վերը նշված մեթոդները չեն գործի: Բայց խնդրում եմ մի անհանգստացեք Excel- ի համար նախատեսված գործիքներ'S Տեղադրեք հաջորդականության համարը օգտակարությունը կարող է օգնել արագ և հեշտությամբ ավարտել այն:
Excel- ի համար նախատեսված գործիքներ : ավելի քան 300 հարմար Excel հավելվածներով, 30 օրվա ընթացքում առանց սահմանափակումների փորձեք անվճար. |
Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներխնդրում եմ արեք հետևյալը.
1, Ընտրեք այն բջիջները, որոնք ցանկանում եք լրացնել հաջորդականության տողերը:
2: Սեղմեք Կուտոլս > Տեղադրել > Տեղադրեք հաջորդականության համարըԷ, ապա Տեղադրեք հաջորդականության համարը երկխոսության վանդակում, սեղմեք նոր կոճակը, տես սքրինշոթերը.
3, Ընդլայնված երկխոսության տուփում խնդրում ենք նշեք պարամետրերը ըստ ձեր անհրաժեշտության ձախ ներքևի հատվածում, միևնույն ժամանակ, դուք կարող եք դիտել հաջորդականությունը աջ ներքևի պատուհանում, տե՛ս նկարը.
4, Պարամետրերն ավարտելուց հետո կտտացրեք Ավելացնել Այս նոր տարրը վերը նշված ցուցակում պահելու համար կոճակը տե՛ս նկարը.
6, Եվ այնուհետև ընտրեք ձեր ստեղծած իրը և կտտացրեք Լրացնել միջակայքը կոճակը, հաջորդականության տողերը լրացվել են միայն տեսանելի բջիջներում, տե՛ս նկարը.
Ներբեռնեք և անվճար փորձեք Kutools- ը Excel- ի համար:
Դեմո. Լրացրեք հաջորդականության համարները բաց թողեք թաքնված տողերը Excel- ի համար Kutools- ով
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: