Как да броим редовете на работен лист на Excel с помощта на VBA макроси

Съдържание

• инструкции
• Планиране на макроса
• Изпълнението на макроса
• съвети

Понякога трябва да знаем броя на редовете, използвани в електронната таблица на Excel, за да можем да създадем формула или дори макрос VBA. За щастие има някои сравнително лесни начини да направите това и Excel VBA е само един от тях.Най-лесният начин да разберете тази информация е да отидете в долната част на работния лист и да видите номера отдясно на последната точка от данни; с VBA обаче това изчисление е изключително просто.

инструкции

С VBA е изключително лесно да се изчисли броят на редовете в работен лист на Excel (BananaStock / BananaStock / Getty Images)

Планиране на макроса

1. Отворете работния лист на Excel и редактора на VBA, като натиснете "Alt + F11".

2. Стартирайте нов VBA проект, като щракнете с десния бутон на мишката върху работната си книга, показана в менюто вдясно и изберете "New".

3. Стартирайте новата функция, като напишете "Sub CountRows ()". Това казва на компилатора на VBA, че има нова подпрограма за файла на проекта. Ако предпочитате да преименувате подпрограмата, променете текста "CountRows" на всяко желано име, което трябва да бъде последвано от показаните по-горе скоби, например "YourName ()".

4. Създайте променлива, включваща текста "Граф като дълъг" в следващия ред.

   
   

5. Въведете следния код:

   Count = 0 Count = Count + 1 ActiveCell.Offset (1, 0) .Изберете Loop До изчакване (ActiveCell.Offset (0, 1))

   Това информира компилаторната програма, че е необходимо да се анализира променливата Count и след това да се преброят редовете на целия работен лист. Кодът добавя променлива към общия брой и след това се премества в следващата клетка, стига да е празна. Когато достигне празна клетка, изпълнението спира.

6. Активирайте текстовото поле, като добавите нов ред с текста "MsgBox Count". Това ще покаже изскачащ прозорец, който ви показва общия брой редове. За да направите полето малко по-полезно, можете да въведете допълнителен текст. Преименувайте реда на:

   MsgBox "Има" [count number] "редове"

   Можете да промените текста в кавички по желание.

7. Накрая въведете "End Sub" в нов ред, за да излезете от функцията за подпрограма.

Изпълнението на макроса

1. Върнете се във вашия работен лист на Excel и го запазете.

   
   

2. Маркирайте клетката от първата колона, която съдържа най-голям брой данни. Тази колона не трябва да съдържа празни клетки от върха до дъното.

3. Отворете менюто "Инструменти" и изберете "Макроси", за да се покаже диалогов прозорец, който съдържа всички макроси, програмирани за работния лист.

4. Изберете макроса, създаден в секция 1, с името "CountRows" или всяко друго име, което сте му дали, и натиснете "Run". Когато приключи, макросът ще покаже изскачащо текстово поле, което ви показва броя на запълнените редове

съвети

• Ако просто трябва да получите номер, по-лесна и по-проста алтернатива е да преброите редовете с помощта на формула. В празна клетка въведете "= COUNT (A: A, IF (A> 0,1,0))", където A е колоната, чийто брой редове се отчита.