Визначте кількість аркушів за допомогою VBA

Anonim

Як за допомогою макросу дізнатися, скільки аркушів є

Багато макросів призначені для проходження всіх аркушів у книзі для виконання певного завдання. Для цього створіть цикл, в якому аркуші папки проходять один за одним.

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

Підпозиція кількість таблиць фіксоване ()
Dim A As String
Яскраве число як ціле число
Count = ActiveWorkbook.Worksheets.Count
A = MsgBox ("Ця книга містить" & номер & _
"Робочі аркуші.", VbOKOnly, "Кількість таблиць")
End Sub

Після запуску Excel відображатиме кількість аркушів у невеликому вікні, як показано на малюнку нижче.

Порада: Якщо ви хочете дізнатися, як вводити та запускати макроси в Excel, ви знайдете короткий опис тут: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html