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

Kako oštevilčiti vrstice po samodejnem vstavljanju ali brisanju vrstic v Excelu?

Recimo, da imam v stolpcu oštevilčene vrstice od 1 do 20, zdaj, ko vstavim ali izbrišem vrstico iz obsega podatkov, želim, da se seznam številk samodejno preštevilči. Ali je to nalogo mogoče dokončati v Excelu?

Številčite vrstice po samodejnem vstavljanju ali brisanju vrstic s formulami

Številčite vrstice po samodejnem vstavljanju ali brisanju vrstic s kodo VBA


Številčite vrstice po samodejnem vstavljanju ali brisanju vrstic s formulami

Dejansko vam lahko funkcija vrstice v Excelu pomaga, da po vstavljanju ali brisanju vrstic samodejno preštevilčite vrstice, naredite naslednje:

1. Vnesite to formulo: = VRSTICA () - 1 v celico A2 in nato povlecite ročico za polnjenje navzdol do celic, v katere želite oštevilčiti vrstice, glejte posnetek zaslona:

doc samodejno število vrstic 1

Opombe: Če se seznam številk začne v prvi celici, lahko formulo spremenite kot = ROW (), lahko formulo dodate ali odštejete, če se vaše številke ne ujemajo z dejansko vrstico, na primer, = VRSTICA () - 3, = ROW () + 10...

2. Nato ustvarite tabelo za ta obseg podatkov, izberite obseg podatkov in kliknite Vstavi > Tabela, nato pa v Ustvari tabelo pogovorno okno, preverite Moja tabela ima glave če so v vašem obsegu glave, si oglejte posnetek zaslona:

doc samodejno število vrstic 2

3. In nato kliknite OK, tabela je bila ustvarjena naenkrat in zdaj, ko vstavite ali izbrišete vrstice v obsegu tabel, se številke vrstic vedno samodejno posodobijo, glejte posnetek zaslona:

doc samodejno število vrstic 3


Številčite vrstice po samodejnem vstavljanju ali brisanju vrstic s kodo VBA

Razen zgornje metode formule jo lahko dokončate tudi s kodo VBA.

1. Pojdite na delovni list, v katerega želite samodejno vstaviti zaporedne številke.

2. Z desno miškino tipko kliknite jeziček lista in izberite Ogled kode iz kontekstnega menija v izpuščenem Microsoft Visual Basic za aplikacije okno, kopirajte in prilepite naslednjo kodo v prazno okno modula.

Koda VBA: Samodejno številčenje vrstic po vstavitvi ali brisanju vrstic:

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. Nato shranite in zaprite to kodo. Ko vnesete prvo številko 1 v celico A1, se zaporedne številke od 1 do 20 samodejno napolnijo. Če iz obsega vstavite ali izbrišete vrstice, bo številka serije hkrati samodejno preštevilčena.

Opombe: V zgornji kodi črka A označuje črko stolpca, v katero želite vnesti zaporedno številko, 1 V 20 je vrstice, ki jih želite oštevilčiti, in A21 je sklic na celico poleg vaše zadnje oštevilčene celice. Lahko jih spremenite po potrebi.


V stolpce celic vstavite oznake ali seznam oštevilčenja

Kutools za Excel's Vstavi oznako in jaznsert oštevilčenje funkcije vam lahko pomagajo hitro vstaviti označene in oštevilčene sezname v stolpec celic. Kliknite za prenos Kutools za Excel!

Kutools za Excel: z več kot 300 priročnimi dodatki za Excel, brezplačno preizkusite brez omejitev v 30 dneh. Prenesite in brezplačno preskusite zdaj!


Predstavitev: oštevilčite vrstice po samodejnem vstavljanju ali brisanju vrstic na Excelovem delovnem listu


Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%

  • Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
  • Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
  • Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
  • Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
  • Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
  • Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
  • Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
  • Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
  • Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.
zavihek kte 201905

Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
dno pisarniške mize
Komentarji (6)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
Meni ne deluje. Ne bo mi dovolil vstaviti tabele za več kot eno vrstico. Če nadaljujem brez nje, po brisanju ali dodajanju vrstice ne spremeni številk. Prosim za nasvet. Hvala!
Ta komentar je moderator na spletnem mestu minimiziral
zelo zelo hvala! http://www.extendoffice.com<br /> :D
Ta komentar je moderator na spletnem mestu minimiziral
Ravno to kar sem iskal hvala!!
Ta komentar je moderator na spletnem mestu minimiziral
Hvala....
Ta komentar je moderator na spletnem mestu minimiziral
če izbrišem vrstico, ali obstaja možnost, da nastavite spodnje številke, ki so serijsko
Ta komentar je moderator na spletnem mestu minimiziral
obstaja kakšna formula?
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL