A használt Excel cellatartomány automatikus megjelölése és számlálása a VBA segítségével

Szüksége van a "UsedRange" makróra, hogy megjelölje vagy megszámolja a táblázatban használt összes cellát makró használatával. Két példa segítségével megmutatjuk, hogyan kell ezt helyesen használni.

Ha makrókkal szeretné feldolgozni a táblázatok celláit, akkor a ténylegesen tartalmat tartalmazó cellákra kell korlátozódnia. Ez egyszerűbb és sokkal gyorsabb, mint az összes oszlop és sor összes cellájában történő keresés. Az Excel erre a célra kínálja az ingatlant UsedRange nál nél. A táblázat összes használt cellájára vonatkozik, és a Hatótávolság-Tárgy.

A UsedRange használatával jelölje meg a használt Excel -cellákat

Az alábbi makró bemutatja a tulajdonság gyakorlati használatát:

Sub MarkAllUsedCells ()
ActiveSheet.UsedRange.Select
End Sub

Az alábbi ábra bemutatja, hogyan nézhet ki, ha a makrót egy táblázatban használják. Minden felhasznált cella meg van jelölve:

A makró mindig megjelöli az aktív táblázat celláit. Ha másik táblát szeretne használni, cserélje ki az objektumot ActiveSheet táblázatra hivatkozva.

Hogyan kell megszámolni a használt cellatartományokat az Excelben

A képletet tartalmazó táblázat celláinak számításához használja a következő makrót:

RészképletekCounting ()

A cella halványítása tartományként A Dim számolás dupla számként = 0 az ActiveSheet.UsedRange minden cellájához. Sejtek Ha sejt. HasFormula Then Counter = Counter + 1 Next cell MsgBox ("Vannak" & Str $ (Counter) & "cellák képletekkel az aktív táblázatban.))

End Sub

A makró beállítja a tulajdonságot UsedRange.Cells amely lehetővé teszi a táblázatban használt összes cellára való hivatkozást. Ha egy cella képletet tartalmaz, a "Számláló" változó 1 -gyel növekszik. Az eredmény egy üzenetablakban jelenik meg:

Segít a fejlesztés a helyszínen, megosztva az oldalt a barátaiddal

wave wave wave wave wave