Sadržaj
Kada imate malu podatkovnu tablicu s nekoliko stupaca, možete ih jednostavno sve prebrojati. Ali za veliku podatkovnu tablicu prilično je teško prebrojati sve stupce bez greške. Osim toga, neki stupci mogu sadržavati podatke, dok neki stupci mogu biti potpuno prazni. Stoga je brojanje svih stupaca s podacima u slučaju velike podatkovne tablice prilično teško. U ovom ćete članku naučiti 2 načina za jednostavno prebrojavanje stupaca s podacima pomoću VBA u Excelu.
Preuzmite radnu bilježnicu za vježbe
Možete preuzeti Excel datoteku sa sljedeće veze i vježbati uz it.
Brojanje stupaca s podacima.xlsm
2 načina za brojanje stupaca s podacima pomoću VBA u Excelu
1 Prebrojite sve stupce u radnom listu s podacima pomoću jednostavnog VBA koda
Možemo vidjeti 3 stupca u sljedećoj podatkovnoj tablici. Sada ćemo koristiti VBA kod za određivanje broja korištenih stupaca u jednom Excel radnom listu.
❶ Prije svega, pritisnite ALT + F11 za otvaranje VBA editora.
❷ Nakon toga kreirajte novi modul iz Insert > Modul.
❸ Nakon toga kopirajte sljedeću VBA skriptu.
4528
❹ Zatim se vratite u VBA uređivač i pritisnite CTRL + V da ga zalijepite.
❺ Sada spremite VBA kod pritiskom na gumb CTRL + S .
❻ Za pokretanje VBA koda idite na karticu Razvojni programer i kliknite na Makronaredbe . Ili jednostavno pritisnite F5 tipka.
Pojavit će se dijaloški okvir Makro .
❼ Sve što trebate učiniti je kliknuti na gumb Pokreni .
Sada ćete vidjeti da se pojavio dijaloški okvir. Što kaže da je broj stupaca s podacima 3.
Pročitajte više: Kako izbrojati broj stupaca u Excelu (3 jednostavna Metode)
2. Prebrojite sve stupce u zadanom rasponu s podacima pomoću Excel VBA koda
Sljedeći VBA kod omogućit će vam da prebrojite sve stupce s podacima u danom rasponu.
Da biste upotrijebili kôd,
❶ Najprije otvorite VBA uređivač pritiskom na ALT + F11.
❷ Zatim idite na Umetni > Module za stvaranje novog modula.
❸ Nakon toga kopirajte sljedeću VBA skriptu.
9397
❹ Vratite se na VBA uređivač i pritisnite CTRL + V da ga zalijepite.
❺ Sada spremite kod pritiskom na CTRL + S.
❻ Idite na karticu Razvojni programer i pritisnite Makronaredbe da biste otvorili Makronaredbe prozor.
Ili jednostavno samo pritisnite F5 tipka za korištenje dijaloškog okvira Makro .
❼ Iz dijaloškog okvira odaberite naziv funkcije CountColumnsInARange i pritisnite Pokreni gumb.
Na kraju će se pojaviti mali dijaloški okvir koji kaže da je ukupan broj stupaca 3.
Pročitajte više: Kako brojati stupce za VLOOKUP u Excelu (2 metode)
Više VBA kodova za brojanje stupaca u Excelu
1. KoristitiMetoda VBA Range.End za vraćanje zadnjeg korištenog broja stupca
Da biste dobili zadnji korišteni broj stupca u Excel proračunskoj tablici,
❶ Prvo otvorite VBA uređivač pritiskom na ALT + F11.
❷ Zatim idite na Umetni > Module za stvaranje novog modula.
❸ Kopirajte sljedeći VBA kod:
7262
❹ Zalijepite i spremite kod u VBA uređivaču.
❺ Pritisnite tipku F5 za pokretanje gornjeg koda.
Dobit ćete zadnji stupac broj u skočnom dijaloškom okviru kao na slici ispod:
Pročitajte više: Kako brojati stupce dok se ne postigne vrijednost u Excelu
2. Koristite metodu Range.Find za vraćanje zadnjeg korištenog broja stupca u Excelu
Ako tražite VBA kodove za vraćanje zadnjeg korištenog broja stupca, slijedite korake u nastavku :
❶ Prvo pritisnite ALT + F11 da biste otvorili VBA editor.
❷ Nakon toga kreirajte novi modul iz Insert > Modul.
❸ Kopirajte sljedeći VBA kod:
2800
❹ Zatim se vratite u VBA uređivač i pritisnite CTRL + V da ga zalijepite.
❺ Sada spremite VBA kod pritiskom na gumb CTRL + S .
Sada pritisnite tipku F5 za pokretanje gornjeg koda.
Dobit ćete zadnji korišteni broj stupca u skočnom dijaloškom okviru kao na slici ispod:
Stvari koje treba zapamtiti
- Pritisnite ALT + F11 da otvorite VBA uređivač.
- Možete pritisnuti ALT +F8 za korištenje dijaloškog okvira Makronaredbe .
- Za pokretanje VBA koda pritisnite F5.
Zaključak
Ukratko, razgovarali smo o 2 načina brojanja stupaca s podacima pomoću VBA u Excelu. Preporučamo vam da preuzmete radnu bilježnicu za vježbanje priloženu uz ovaj članak i s njom vježbate sve metode. I ne ustručavajte se postaviti pitanja u odjeljku za komentare u nastavku. Pokušat ćemo odgovoriti na sve relevantne upite što je prije moguće. Posjetite našu web stranicu ExcelWIKI da biste istražili više.
