Kā uzzināt faila lielumu, izmantojot VBA
Failam vienmēr ir noteikts apjoms datu nesējā, faila lielums. Ja izmantojat programmu Excel, varat to vaicāt, apskatot faila ierakstu direktorijā, ja fails nav atvērts.
Vēl viens veids, kā vaicāt šo informāciju, ir dialoglodziņa "Fails - rekvizīti" izmantošana. Šo ierakstu atradīsit cilnes "Vispārīgi" sadaļā "Izmērs".
Ja vēlaties nolasīt šo informāciju ar makro, šī funkcija jums palīdzēs FileLen. Šai funkcijai jūs nododat pilnu Excel darbgrāmatas faila nosaukumu. Rezultāts ir faila lielums baitos. Šis makro parāda, kā funkciju izmantot praksē:
Sub ShowFileSize ()
MsgBox "Pašreizējās darbgrāmatas lielums" & _
"is" & FileLen (ThisWorkbook.FullName) / 1024 & _
"KByte."
Beigt apakš
Kad tas sākas, programmā Excel tiek parādīts neliels logs, kas parāda pašreizējās darbgrāmatas faila lielumu. Šajā attēlā parādīts, kā izskatās šis logs:
Funkcija atgriež faila lielumu baitos. Tāpēc makro notiek konvertēšana uz KByte. Lai to izdarītu, faila lielums tiek dalīts ar skaitli 1024.
Padoms. Ja vēlaties uzzināt, kā programmā Excel ievadīt un sākt makro, īsu aprakstu atradīsit šeit: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
