Saznajte broj redaka i stupaca u tablici pomoću VBA makronaredbe

Sadržaj

Kako pomoću VBA makronaredbe saznati koliko se redaka i stupaca koristi u Excel tablici

Ovisno o verziji programa Excel, u tablici se nudi različit broj redaka i stupaca. Kako možete reći u makronaredbi kada želite ponoviti sve retke ili stupce tablice?

Dok je u Excelu do uključujući verziju 2003. bilo samo 256 stupaca i 65.536 redaka, od Excela 2007. dostupno je 16.384 stupaca i 1.048.576 redaka.

U Excelu postoje i različiti formati za pohranu za dvije različite proračunske tablice: XLS i XLSX. No, nije slučaj da XLSX datoteka mora automatski imati radne listove veće veličine. Čak i u programima Excel 2007 i Excel 2010, kada se datoteka otvori u načinu kompatibilnosti, dostupne su samo ranije dimenzije tablice.

Stoga, ako želite odrediti u makronaredbi koliko redaka i stupaca ima radni list, trebali biste izravno upitati ovaj broj. Sljedeći makro prikazuje kako to učiniti

PodredakRundKolumni broj ()
MsgBox ActiveSheet.Cells.Rows.Count & "Redci" & _
ActiveSheet.Cells.Columns.Count & "Stupci."
Kraj podm

Ako pozovete makronaredbu s XLS radnim listom, Excel će vam pokazati odgovarajući broj redaka i stupaca, kao što je prikazano na sljedećoj slici:

Ako pokrenete makro iz programa Excel 2007 ili Excel 2010 bez načina kompatibilnosti, dijaloški okvir prikazuje veće dimenzije tablice:

U VBA petljama koje će se provlačiti kroz sve ćelije tablice stoga možete koristiti dva svojstva ROWS.COUNT i COLUMNS.COUNT kako je opisano za određivanje dimenzija radnog lista.

Može proći dosta vremena (osobito u programima Excel 2007 i Excel 2010) da se kroz makronaredbu prođe kroz sve teoretski dostupne ćelije. Ako želite ograničiti samo petlje na područje koje se koristi, preporučujemo da umjesto toga koristite svojstvo USEDRANGE.

Za unos makronaredbe pritisnite kombinaciju tipki ALT F11 u Excelu. Time se pokreće VBA editor u svim verzijama programa Excel. Tamo odaberite naredbu INSERT - MODULE i unesite makro. Za pokretanje makronaredbe aktivirajte kombinaciju tipki ALT F8 u Excelu.

Vi ćete pomoći u razvoju web stranice, dijeljenje stranicu sa svojim prijateljima

wave wave wave wave wave