Як дізнатися розмір файлу за допомогою VBA
Файл завжди має певний обсяг на носії даних, розмір файлу. Під час використання Excel ви можете запитати це, переглянувши запис файлу в каталозі, якщо файл не відкритий.
Інший спосіб запитувати цю інформацію - скористатися діалоговим вікном "Файл - Властивості". Ви знайдете цей запис у розділі "Розмір" на вкладці "Загальні".
Якщо ви хочете прочитати цю інформацію за допомогою макросу, функція вам допоможе FileLen. Ви передаєте цій функції повне ім’я файлу книги Excel. Результатом є розмір файлу в байтах. Наступний макрос показує, як використовувати цю функцію на практиці:
Sub ShowFileSize ()
MsgBox "Розмір поточної книги" & _
"is" & FileLen (ThisWorkbook.FullName) / 1024 & _
"KByte".
End Sub
Коли він запускається, Excel відображає невелике вікно, яке показує розмір файлу поточної книги. Наступна ілюстрація показує, як виглядає це вікно:
Функція повертає розмір файлу в байтах. Тому перетворення в KByte відбувається в макросі. Для цього розмір файлу ділиться на число 1024.
Порада: Якщо ви хочете дізнатися, як вводити та запускати макроси в Excel, ви знайдете короткий опис тут: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html