Конструкція оператора For Each мови vba.

Якщо оператор With використовується для виконання декількох дій для одного об’єкта, то оператор For Each використовується для виконання одного і того ж набору дій для декількох об’єктів. Оператор For Each, як правило, використовувати для перегляду елементів масиву або колекції.

Оператор For Each має наступний формат:

For Each елемент In колекція(масив)

....Next елемент

Елемент – це ідентифікатор змінної-інтерпретатора; колекція – ідентифікатор колекції або масиву.

У коді процедури Колекції переглядаються аркуші активної книги і на екран по черзі виводиться № аркуша та його ім’я.

Приклад використання оператора For Each.

Public Sub Колекції()

Dim Аркуш As Worksheet

Dim Nomer As Integer

Nomer = 0

For Each Аркуш In ActiveWorkbook.Worksheets

Nomer = Nomer + 1

MsgBox ("Ім’я аркуша: ") & Nomer & " " & Аркуш.Name

Next Аркуш

End Sub

Управління файлами за допомогою vba

Управління файлами включає дії, такі як копіювання файлів, видалення невживаних файлів для звільнення області дискової пам’яті, переміщення файлів з одного диска на інших і створення або видалення каталогів диска. Управління файлами включає також такі види обробки, як проглядання списку файлів в теці для визначення розміру файлу або дати і часу, коли цей файл був модифікований востаннє.

У нижчеприведеній таблиці вказані функції, оператори і методи управління файлами. У першому стовпці таблиці знаходиться ключове слово VBA, в другому - указується, чи призначено ключове слово для функції, оператора або об’єктного методу. У третьому стовпці міститься короткий опис призначення кожної функції, оператора або методу.

Ім’я	Категорія			Призначення
ChDir		Оператор	Змінює поточний каталог
ChDrive	Оператор			Змінює поточний драйвер диска
CurDir	Функція			Повертає поточний каталог
Dir	Функція			Повертає ім’я каталога або файлу, співпадаюче з певним ім’ям файлу, передаваним як строковий аргумент. Призначена для знаходження одного або декількох файлів на диску.
FileCopy	Оператор			Копіює файл
FileDateTime	Функція			Повертає значення типу Date, що містить дату і час, коли цей файл був змінений останній раз.
FileLen	Функція			Повертає довжину файлу в байтах
GetAttr	Функція			Повертає число, що представляє об’єднані атрибути файлу або каталога диска, такі як System, Hidden і так далі
GetOpenFileName	Метод			Відображає Excel-диалоговое вікно Open і повертає ім’я файлу, вибране користувачем. У Word немає.
GetSaveAsFileName	Метод			Відображає Excel-диалоговое вікно Save As і повертає ім’я файлу, вибране користувачем. У Word немає.
Kill	Оператор			Видаляє файли з драйвера диска.
MkDir	Оператор			Створює каталог диска.
Name	Оператор			Перейменовує або переміщає файл.
RmDir	Оператор			Видаляє каталог диска.
SetAttr	Оператор			Встановлює атрибути файлу.