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

Ինչպե՞ս համարել շարքերը Excel- ում տողերը ավտոմատ կերպով մտցնելուց կամ ջնջելուց հետո:

Ենթադրելով, որ ես սյունակում համարակալել եմ տողերը 1-ից 20-ը, այժմ, երբ տվյալների տիրույթից տող եմ տեղադրում կամ ջնջում, ուզում եմ, որ թվերի ցանկը կարող է ավտոմատ կերպով համարակալվել: Արդյո՞ք այս խնդիրը կարող է կատարվել Excel- ում:

Թվերի տողերը բանաձեւերով տողերը ավտոմատ կերպով մտցնելուց կամ ջնջելուց հետո

VBA կոդով տողերը ավտոմատ կերպով տեղադրելուց կամ ջնջելուց հետո համարների տողեր


Թվերի տողերը բանաձեւերով տողերը ավտոմատ կերպով մտցնելուց կամ ջնջելուց հետո

Իրականում, Excel- ում Row գործառույթը կարող է օգնել շարքերը տեղադրելուց կամ ջնջելուց հետո տողերն ավտոմատ կերպով համարակալել, խնդրում ենք անել հետևյալը.

1, Մուտքագրեք այս բանաձևը. = ROW () - 1 մեջ A2 բջիջ, և այնուհետև լրացնելու բռնիչը ներքև քաշեք դեպի այն բջիջները, որոնք ցանկանում եք համարակալել շարքերը, տեսեք,

փաստաթուղթ ավտոմատ համարի տողեր 1

ՆշումԵթե ​​ձեր համարների ցուցակը սկսվում է առաջին բջիջից, ապա բանաձևը կարող եք փոխել ինչպես = ROW (), դուք կարող եք ավելացնել կամ հանել բանաձևից, եթե ձեր համարները չեն համընկնում իրական շարքի հետ, օրինակ, = ROW () - 3, = ROW () + 10...

2, Դրանից հետո սեղան ստեղծեք այս տվյալների տիրույթի համար, ընտրեք տվյալների տիրույթը և կտտացրեք Տեղադրել > Սեղանեւ հետո ` Ստեղծեք աղյուսակը երկխոսության տուփ, ստուգեք Իմ սեղանը վերնագրեր ունի եթե ձեր տիրույթում կան վերնագրեր, տես նկարի նկարը.

փաստաթուղթ ավտոմատ համարի տողեր 2

3. Եվ այնուհետեւ կտտացրեք OK, աղյուսակը ստեղծվել է միանգամից, և այժմ, երբ սեղանի տիրույթում շարքեր եք տեղադրում կամ ջնջում, շարքերի համարները միշտ ավտոմատ կերպով թարմացվում են, տես նկարի նկարը.

փաստաթուղթ ավտոմատ համարի տողեր 3


VBA կոդով տողերը ավտոմատ կերպով տեղադրելուց կամ ջնջելուց հետո համարների տողեր

Բացառությամբ վերը նշված բանաձևի մեթոդից, այն կարող եք նաև ավարտել VBA կոդով:

1, Գնացեք այն աշխատաթերթը, որը ցանկանում եք ավտոմատ կերպով տեղադրել հաջորդականության համարները:

2. Աջ կտտացրեք թերթիկի ներդիրին և ընտրեք Դիտել կոդը համատեքստի ընտրացանկից ՝ դուրս եկած պատուհանում Microsoft Visual Basic հավելվածների համար պատուհանը, խնդրում ենք պատճենեք և տեղադրեք հետևյալ ծածկագիրը Մոդուլի դատարկ պատուհանում:

VBA կոդ. Տողերի տեղադրումը կամ ջնջումը ավտոմատ համարի տողեր.

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160612
    Dim I As Integer
    I = 1
    Application.EnableEvents = False
    For I = 1 To 20
        Range("A" & I).Value = I
    Next
    Range("A21").Value = ""
    Application.EnableEvents = True
End Sub

3, Դրանից հետո պահեք և փակեք այս կոդը, երբ առաջին համարը 1 մուտքագրեք A1 բջիջ, 1-ից մինչև 20 հաջորդականության համարները ինքնաբերաբար կլրացվեն: Եթե ​​ընդգրկույթից շարքեր եք տեղադրում կամ ջնջում, սերիայի համարը միանգամից ինքնաբերաբար կհամարվի:

ՆշումՎերոհիշյալ ծածկագրում `նամակը A նշում է սյունակի տառը, որը ցանկանում եք լրացնել հաջորդականության համարը, 1 20- ին այն տողերն են, որոնք ցանկանում եք համարակալել, և A21 ձեր վերջին համարակալված բջիջի կողքին գտնվող բջիջն է: Դուք կարող եք փոխել դրանք, ինչպես ձեզ հարկավոր է:


Տեղադրեք փամփուշտներ կամ համարակալման ցուցակ բջիջների սյունակում

Excel- ի համար նախատեսված գործիքներ's Տեղադրեք փամփուշտ եւ եսներդիր համարակալում առանձնահատկությունները կարող են օգնել արագորեն ներմուծել գնդիկավոր և համարակալման ցանկ բջիջների սյունակում: Կտտացրեք Excel- ի համար Kutools ներբեռնելու համար:

Excel- ի համար նախատեսված գործիքներ. Excel- ի ավելի քան 300 հարմարավետ հավելումներով, 30 օրվա ընթացքում անվճար փորձեք առանց սահմանափակումների: Ներբեռնեք և անվճար փորձեք հիմա:


Դեմո. 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 ներքևում
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (6)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ինձ մոտ դա չի ստացվում: Այն ինձ թույլ չի տա մեկից ավելի տողով աղյուսակ տեղադրել: Եթե ​​ես առանց դրա շարունակեմ, այն չի փոխում թվերը տող ջնջելուց կամ ավելացնելուց հետո։ Խնդրում եմ, խորհուրդ տուր. Շնորհակալություն
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
շատ շատ շնորհակալություն! http://www.extendoffice.com<br /> :D
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Պարզապես այն, ինչ ես փնտրում էի, շնորհակալություն!!
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
շնորհակալություն....
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Եթե ​​ես ջնջեմ տողը, կա՞ արդյոք հնարավորություն ստորև նշված թվերը սերիական են
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
կա որևէ բանաձև
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր

Հետեւեք մեզ

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