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 najti zadnjo vrstico ali stolpec s podatki v Excelu?

V velikem delovnem listu, če želite določiti zadnjo vrstico ali stolpec, ki vsebuje hitro in enostavno vrednost, lahko preprosto povlečete drsnik, da jo najdeš. Ampak to bo boleče, če na vašem delovnem listu na tisoče podatkovnih vrstic. V tem članku bom govoril o nekaterih koristnih kodah VBA, ki jih boste lahko rešili.

Poiščite zadnjo vrstico ali stolpec s podatki z uporabo kode VBA

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


Poiščite zadnjo vrstico ali stolpec s podatki z uporabo kode VBA


Večina od nas lahko razmišljamo o iskanju zadnje celice s pritiskom na Ctrl + Konec tipke za iskanje zadnje vrstice in stolpca, vendar tipka za bližnjico ne bo našla natančne celice vrednosti, če obstajajo nekatere celice, ki imajo oblikovanje pod razponom podatkov. Zato tukaj uporabite naslednjo kodo VBA:

1. Aktivirajte delovni list, ki ga želite določiti v zadnji vrstici ali stolpcu s podatki.

2. Drži dol ALT + F11 tipke za odpiranje Okno Microsoft Visual Basic za aplikacije.

3. Nato kliknite Vstavi > Moduli, in prilepite naslednjo kodo v Okno modula.

VBA koda: 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 ključ za zagon te kode, in se bo pojavilo okno za potrditev, ki vam bo povedal številko vrstice uporabljenega območja. Prikaz slike:

doc-find-last-row1

5. Pojdite s klikom OK gumb, tokrat se prikaže naslednja vrstica vrstice z vrednostmi, kot je prikazano spodaj prikazano sliko:

doc-find-last-row1

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

VBA koda: 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 z orodji Kutools za Excel

Če želite neposredno poiskati in izbrati zadnjo vrstico ali stolpec s podatki v Excelu, Izberite Zadnji vrstni red in Izberite Zadnji stolpec pripomočki podjetja Kutools of Excel vam lahko pomaga. Prosimo, naredite na naslednji način.

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

1. Po namestitvi Kutools za Excel, če želite poiskati in izbrati zadnjo vrstico s podatki, kliknite Kutools > Izberite > Izberite Last Cell > Zadnji vrstni red. Prikaz slike:

Opombe: Za iskanje in izbiro zadnjega stolpca s podatki, kliknite Kutools > Izberite > Izberite Last Cell > Zadnji stolpec. Prikaz slike:

Potem se najde in izbere zadnja vrstica ali stolpec s podatki na trenutnem delovnem listu.

Nasvet.Če želite imeti brezplačen preskus tega pripomočka, pojdite na brezplačno prenesete programsko opremo najprej in pojdite, da uporabite operacijo v skladu z zgornjimi koraki.


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

Kutools za Excel vključuje več kot 300 priročno orodje Excel. Prosti brez omejitev v 60 dneh. Prenesite brezplačen preskus zdaj!




Priporočena orodja za produktivnost za Excel

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.

Be the first to comment.