Preskoči na glavno vsebino

Kako najti zadnjo vrstico ali stolpec s podatki v Excelu?

Če želite na velikem delovnem listu hitro in enostavno določiti zadnjo vrstico ali stolpec, ki vsebuje vrednosti, preprosto povlecite drsnik, da ga najdete. Boleče pa bo, če bo na vašem delovnem listu na tisoče podatkovnih vrstic. V tem članku bom govoril o uporabni kodi VBA, s katero boste lahko rešili to nalogo.

Poiščite zadnjo vrstico ali stolpec s podatki s pomočjo kode VBA
Poiščite in izberite zadnjo vrstico ali stolpec s podatki s Kutools za Excel


Poiščite zadnjo vrstico ali stolpec s podatki s pomočjo kode VBA

Večina od nas morda razmišlja, da bi s pritiskom našla zadnjo celico Ctrl + Konec tipke, da poiščete zadnjo vrstico in stolpec, vendar bližnjična tipka ne bo našla natančne celice vrednosti, če je nekaj celic z oblikovanjem pod obsegom podatkov. Torej, tukaj uporabite naslednjo kodo VBA:

1. Aktivirajte svoj delovni list, za katerega želite določiti zadnjo vrstico ali stolpec s podatki.

2. Držite tipko ALT + F11 tipke za odpiranje Okno Microsoft Visual Basic for Applications.

3. Nato kliknite Vstavi > Moduliin prilepite naslednjo kodo v Okno modula.

Koda VBA: poiščite zadnjo vrstico s podatki

Sub sblastRowOfASheet()
'Update 20140603
Dim xLastRow As Long
xLastRow = Application.ActiveSheet.Cells.SpecialCells(xlLastCell).Row
MsgBox "Last Used Row: " & xLastRow
Do While Application.CountA(ActiveSheet.Rows(xLastRow)) = 0 And xLastRow <> 1
    xLastRow = xLastRow - 1
Loop
MsgBox "Last Row with Data: " & xLastRow
End Sub

4. In nato pritisnite F5 tipko za zagon te kode in pojavilo se bo pozivno polje, ki vam bo sporočilo številko vrstice uporabljenega obsega. Oglejte si posnetek zaslona:

doc-najdi-zadnja-vrstica1

5. Pojdi na klik OK , tokrat je bila prikazana zadnja številka vrstice z vrednostmi, kot je prikazano na sliki spodaj:

doc-najdi-zadnja-vrstica1

Opomba: Če želite poiskati zadnji stolpec s podatki, uporabite to kodo:

Koda VBA: poiščite zadnji stolpec s podatki

Sub sblastcolumnOfASheet()
'Update 20140603
Dim xLastcolumn As Long
xLastcolumn = Application.ActiveSheet.Cells.SpecialCells(xlLastCell).Column
MsgBox "Last Used column: " & xLastcolumn
Do While Application.CountA(ActiveSheet.Columns(xLastcolumn)) = 0 And xLastcolumn <> 1
    xLastcolumn = xLastcolumn - 1
Loop
MsgBox "Last column with Data: " & xLastcolumn
End Sub

Poiščite in izberite zadnjo vrstico ali stolpec s podatki s Kutools za Excel

Če želite neposredno najti in izbrati zadnjo vrstico ali stolpec s podatki v Excelu, se Izberite Zadnja vrstica in Izberite Zadnji stolpec gospodarske javne službe Kutools v Excelu vam lahko pomaga. Naredite naslednje.

Pred vložitvijo vloge Kutools za ExcelProsim najprej ga prenesite in namestite.

1. Če želite najti in izbrati zadnjo vrstico s podatki, kliknite Kutools > Izberite > Izberite Zadnja celica > Zadnja vrstica. Oglejte si posnetek zaslona:

Opombe: Za iskanje in izbiro zadnjega stolpca s podatki kliknite Kutools > Izberite > Izberite Zadnja celica > Zadnji stolpec

Nato se poišče in takoj izbere zadnja vrstica ali stolpec s podatki na trenutnem delovnem listu.

  Če želite imeti brezplačno (30-dnevno) preskusno različico tega pripomočka, kliknite, če ga želite prenestiin nato nadaljujte z uporabo postopka v skladu z zgornjimi koraki.


Poiščite in izberite zadnjo vrstico ali stolpec s podatki s Kutools za Excel


Najboljša pisarniška orodja za produktivnost

Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...

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!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations