Зміст
Іноді нам потрібно знати кількість рядків, що використовуються в таблиці Excel, щоб ми могли створити формулу або навіть макрос VBA. На щастя, є кілька досить простих способів зробити це, і Excel VBA є лише одним з них.Найпростіший спосіб дізнатися цю інформацію - перейти в нижню частину робочого аркуша і подивитися номер справа від останньої точки даних; однак з VBA цей розрахунок надзвичайно простий.
Інструкції
З VBA, дуже просто розрахувати кількість рядків в робочому аркуші Excel (BananaStock / BananaStock / Getty Images)-
Відкрийте аркуш Excel і редактор VBA, натиснувши "Alt + F11".
-
Запустіть новий файл проекту VBA, клацнувши правою кнопкою миші на робочій книжці, відображаючись у меню праворуч, і вибравши "Новий".
-
Запустіть нову функцію, набравши "Sub CountRows ()". Це повідомляє компілятору VBA, що існує нова підпрограма для файлу проекту. Якщо ви бажаєте перейменовувати підпрограму, змініть текст "CountRows" на будь-яке бажане ім'я, за яким повинні йти дужки, показані вище, наприклад "YourName ()".
-
Створіть на наступному рядку змінну, що містить текст "Розраховувати як довго".
-
Введіть наступний код:
Count = 0 Count = Count + 1 ActiveCell.Offset (1, 0) .Виберіть Loop Until IsEmpty (ActiveCell.Offset (0, 1))
Це інформує програму компілятора про те, що необхідно проаналізувати змінну Count, а потім підрахувати рядки всього аркуша. Код додає змінну до Total Count, а потім переходить до наступної комірки, якщо вона порожня. Коли вона досягає порожньої клітинки, виконання припиняється.
-
Активуйте текстове поле, додавши новий рядок з текстом "MsgBox Count". У цьому вікні відобразиться спливаюче вікно, у якому буде вказано загальну кількість рядків. Щоб зробити вікно трохи більш корисним, можна ввести будь-який додатковий текст. Перейменувати рядок на:
MsgBox "Існує" [кількість номерів] "рядків"
За потребою можна змінити текст у лапках.
-
Нарешті, введіть "End Sub" у новому рядку, щоб вийти з функції підпрограми.
Планування макросу
-
Поверніться на аркуш Excel і збережіть його.
-
Виділіть клітинку першого стовпця, яка містить найбільшу кількість даних. Цей стовпець не повинен містити порожніх клітинок від верхнього до нижнього.
-
Відкрийте меню "Інструменти" і виберіть "Макроси", щоб відобразити діалогове вікно, що містить всі макроси, запрограмовані для робочого аркуша.
-
Виберіть макрос, створений у розділі 1, з назвою "CountRows" або будь-якою іншою назвою, яку ви вказали, і натисніть "Виконати". Після завершення макрос буде відображати спливаюче текстове поле, яке повідомляє вам кількість заповнених рядків
Запуск макросу
Як
- Якщо вам просто потрібно отримати число, легше і простіше вважати рядки за допомогою формули. У порожній комірці введіть "= COUNT (A: A, IF (A> 0,1,0))", де A - стовпець, кількість рядків якого підраховується.