Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako lahko samodejno številko preštevite po filtru v Excelu?

Kot smo vsi vedeli, bodo po filtriranju podatkov s seznama serijskih številk številke vrstic na delovnem listu prikazane enake kot prvotne številke, ne bodo preštevilčene samodejno. Toda včasih želite preštevilčiti vrstice kot zaporedje v filtriranem delovnem listu kot prikazane naslednje posnetke. In ta članek, bom govoril o tem, kako auto število ali preštevilčiti po filtru v Excelu.

Samodejno število ali preštevilčite po filtru s kodo VBA

Samodejno število ali preimenovanje po filtru s programom Kutools for Excel

doc-renumber-filter-1 -2 doc-renumber-filter-2

Samodejno število ali zaporedje zaporednih številk po filtru:

Kutools za ExcelJe Vstavi številko zaporedja pripomoček vam lahko pomaga hitro vstaviti edinstvene zaporedne številke v obseg celic ali filtriranega seznama, lahko pa tudi vstavi zaporedje v združene celice, kot jih potrebujete.

doc-renumber-filter-8-8

Kutools za Excel: z več kot 200 priročnimi dodatki Excel, lahko brezplačno poskusite brez omejitev v dnevih 60. Prenesite in brezplačno preizkusite zdaj!


Samodejno število ali preštevilčite po filtru s kodo VBA


V statusu filtriranja ne morete uporabiti ročice samodejnega izpolnjevanja, da zapolnite zaporedje številk, lahko jih preprosto izpolnite s tipkanjem številk eno za drugim. Toda to bo dolgočasno in dolgotrajno, če je potrebno preštevilčiti veliko celic. Tukaj bom predstavil kodo VBA za rešitev te naloge.

1. Drži dol ALT + F11 tipke in odpre Okno Microsoft Visual Basic za aplikacije.

2. Kliknite Vstavi > Moduliin prilepite naslednji makro v Okno modula.

VBA koda: samodejno število ali preštevilčite po filtru

Sub Renumbering()
	'Updateby20141028
	Dim Rng As Range
	Dim WorkRng As Range
	On Error Resume Next
	xTitleId = "KutoolsforExcel"
	Set WorkRng = Application.Selection
	Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	Set WorkRng = WorkRng.Columns(1).SpecialCells(xlCellTypeVisible)
	xIndex = 1
	For Each Rng In WorkRng
		Rng.Value = xIndex
		xIndex = xIndex + 1
	Next
End Sub

3. Po lepljenju kode pritisnite F5 ključ, da zaženete to kodo, in se bo pojavilo odzivno okno, ki vas bo opomnilo, da izberete celice celic, ki jih želite samodejno šteti, ali preštevilčite vrstice, si oglejte sliko zaslona:

doc-renumber-filter-3

4. Nato kliknite OKin vaše izbrane celice območja so bile preštevilčene zaporedoma kot spodaj prikazano sliko:

doc-renumber-filter-3

Opombe: Ta koda bo uničila prvotne številke vrstice serije, ko prekličete funkcijo filtriranja. Torej najprej morate varnostno kopirati podatke.


Samodejno število ali preimenovanje po filtru s programom Kutools for Excel

Če ste namestili Kutools za Excel, s svojo močno Vstavite številko zaporedja funkcijo, lahko hitro in enostavno vstavite zaporedne številke v filtrirane podatke.

Kutools za Excel : z več kot 300 priročnimi dodatki Excel, lahko brezplačno poskusite brez omejitev v dnevih 60.

Po namestitvi Kutools za Excel, storite naslednje:

1. Izberite celice, ki jih želite preštevilčiti za filtrirane podatke.

2. Nato kliknite Kutools > Vstavi > Vstavite številko zaporedja, si oglejte sliko zaslona:

doc-renumber-filter-3

3. Potem pa je izšlo Vstavi številko zaporedja pogovorno okno, kliknite New gumb, si oglejte posnetek zaslona:

doc-renumber-filter-3

4. In nato ustvarite številke seznama zaporedij, kot jih potrebujete v levem spodnjem delu, si oglejte posnetek zaslona:

doc-renumber-filter-3

5. Po nastavitvi zaporedja kliknite Dodaj gumb in element zaporedja je bil dodan v pogovorno okno, glejte sliko zaslona:

doc-renumber-filter-3

6. In nato kliknite Fill Range, in filtrirani podatki so bili preštevilčeni takoj. Prikaz slike:

doc-renumber-filter-3

Prenesite in brezplačno preizkusite Kutools za Excel zdaj!


Demo: samodejno število ali preimenovanje po filtru s programom Kutools for Excel

Kutools za Excel: z več kot 200 priročnimi dodatki Excel, lahko brezplačno poskusite brez omejitev v dnevih 60. Prenesite in brezplačno preizkusite zdaj!


Povezani članek:

Kako se samodejno združijo celice v Excelu?


Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.