Automatski označite i prebrojte iskorišteni raspon ćelija programa Excel s VBA

Makro "UsedRange" vam je potreban za označavanje ili prebrojavanje svih ćelija korištenih u tablici pomoću makronaredbe. Pomoću dva primjera pokazat ćemo vam kako to ispravno koristiti.

Ako želite obrađivati ćelije u tablicama pomoću makronaredbi, trebali biste se ograničiti na ćelije koje zapravo sadrže sadržaj. To je lakše i puno brže od pretraživanja svih ćelija u svim stupcima i retcima. Excel vam u tu svrhu nudi nekretninu UsedRange na. Odnosi se na sve korištene ćelije tablice i isporučuje a Domet-Objekt.

Upotrijebite UsedRange za označavanje korištenih Excel ćelija

Sljedeći makro prikazuje kako se svojstvo koristi u praksi:

Pod oznakomAllUsedCells ()
ActiveSheet.UsedRange.Select
Kraj podm

Sljedeća slika prikazuje kako može izgledati kada se makro koristi u tablici. Sve korištene ćelije označene su:

Makronaredba uvijek označava ćelije u aktivnoj tablici. Ako želite koristiti drugu tablicu, zamijenite objekt ActiveSheet pozivanjem na odgovarajuću tablicu.

Kako brojati korištene raspone ćelija u Excelu

Za brojanje broja ćelija u tablici koja sadrži formulu upotrijebite sljedeću makronaredbu:

Pod formuleCounting ()

Dim Cell As Range Dim Count kao Double Count = 0 Za svaku ćeliju u ActiveSheet.UsedRange. Stanice Ako ćelija. HasFormula Zatim brojač = brojač + 1 sljedeća ćelija MsgBox ("U aktivnoj tablici postoje ćelije" & Str $ (Brojač) & "s formulama.")

Kraj podm

Makro postavlja svojstvo UsedRange.Cells to omogućuje upućivanje na sve ćelije koje se koriste u tablici. Ako ćelija sadrži formulu, varijabla "Brojač" se povećava za 1. Rezultat se zatim ispisuje u prozoru poruke:

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

wave wave wave wave wave