Автоматично позначати та підраховувати використаний діапазон комірок Excel за допомогою VBA

Вам потрібен макрос "UsedRange", щоб позначити або підрахувати всі клітинки, які використовуються в таблиці за допомогою макросу. На двох прикладах ми покажемо вам, як це правильно використовувати.

Якщо ви хочете обробляти клітинки у своїх таблицях за допомогою макросів, вам слід обмежитися клітинками, які насправді містять вміст. Це простіше і набагато швидше, ніж пошук у всіх клітинках у всіх стовпцях і рядках. Excel пропонує вам цю власність UsedRange у. Він відноситься до всіх використаних осередків таблиці та містить a Діапазон-Об'єкт.

Використовуйте UsedRange для позначення використаних клітинок Excel

Наступний макрос показує, як використовувати властивість на практиці:

Sub MarkAllUsedCells ()
ActiveSheet.UsedRange.Select
End Sub

Наступний малюнок показує, як він може виглядати, коли макрос використовується у таблиці. Усі використані клітинки позначені:

Макрос завжди позначає клітинки в активній таблиці. Якщо ви хочете використовувати іншу таблицю, замініть об’єкт ActiveSheet посилаючись на відповідну таблицю.

Як підрахувати використані діапазони комірок в Excel

Щоб підрахувати кількість клітинок у таблиці, що містить формулу, скористайтеся таким макросом:

Підформули підрахунку ()

Затемнити клітинку як діапазон Підрахувати кількість подвійних підрахунків = 0 для кожної клітинки в ActiveSheet.UsedRange. Клітинки Якщо клітинка. HasFormula Тоді Лічильник = Лічильник + 1 Наступна клітинка MsgBox ("У активній таблиці є клітинки" & Str $ (Лічильник) & "з формулами.")

End Sub

Макрос задає властивість UsedRange.Cells що дає можливість посилатися на всі комірки, які використовуються в таблиці. Якщо клітинка містить формулу, змінна "Лічильник" збільшується на 1. Результат потім виводиться у вікно повідомлення:

Ви допоможете розвитку сайту, поділившись сторінкою з друзями

wave wave wave wave wave