Нуждаете се от макроса "UsedRange", за да маркирате или преброите всички клетки, използвани в таблица, използвайки макрос. Използвайки два примера, ще ви покажем как да го използвате правилно.
Ако искате да обработвате клетки в таблиците си с помощта на макроси, трябва да се ограничите до клетките, които действително съдържат съдържание. Това е по -лесно и много по -бързо от търсенето във всички клетки във всички колони и редове. Excel ви предлага имота за тази цел UsedRange в. Той се отнася до всички използвани клетки на таблица и доставя a Обхват-Обект.
Използвайте UsedRange, за да маркирате използваните клетки на Excel
Следният макрос показва как да използвате имота на практика:
Sub MarkAllUsedCells ()
ActiveSheet.UsedRange.Select
End Sub
Следващата фигура показва как може да изглежда, когато макросът се използва в таблица. Всички използвани клетки са маркирани:
Макросът винаги маркира клетките в активната таблица. Ако искате да използвате друга таблица, заменете обекта ActiveSheet като се обърнете към съответната таблица.
Как да преброите използваните диапазони от клетки в Excel
За да преброите броя клетки в таблица, съдържаща формула, използвайте следния макрос:
Под формулиCounting ()
Dim Cell As Range Dim Count като Double Count = 0 За всяка клетка в ActiveSheet.UsedRange. Клетки Ако клетка. HasFormula Тогава Counter = Counter + 1 Следваща клетка MsgBox ("Има" & Str $ (Counter) & "клетки с формули в активната таблица.")
End Sub
Макросът задава свойството UsedRange.Cells това дава възможност за препращане към всички клетки, които се използват в таблицата. Ако клетка съдържа формула, променливата "Counter" се увеличава с 1. След това резултатът се извежда в прозорец за съобщение:
