Як створити папки за допомогою vba (з прикладом)

Ви можете використовувати оператор MkDir , щоб створити папку за допомогою VBA.

Ось поширений спосіб використання цього твердження на практиці:

 SubCreateFolder ()
    MkDir " C:\Users\Bob\Desktop\My_Data "
End Sub

Цей конкретний макрос створить папку під назвою My_Data на робочому столі мого комп’ютера.

У наступному прикладі показано, як використовувати цю функцію на практиці.

Приклад: створення папки за допомогою VBA

Припустімо, мій робочий стіл зараз містить дві папки:

Припустімо, я хочу за допомогою VBA створити папку під назвою My_Data на робочому столі.

Для цього я можу створити такий макрос:

 SubCreateFolder ()
    MkDir " C:\Users\Bob\Desktop\My_Data "
End Sub

Коли я запускаю цей макрос і відкриваю Провідник файлів, щоб перейти на робочий стіл, я бачу, що ця нова папка була створена:

Я бачу, що нову папку під назвою My_Data було створено саме в тому місці, яке я вказав.

Зверніть увагу: якщо ця папка вже існувала в цьому місці, і я запустив цей макрос, я отримав би таке повідомлення про помилку:

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

Я міг би створити папку з іншою назвою або створити папку в іншому місці, щоб уникнути цієї помилки.

Додаткові ресурси

У наступних посібниках пояснюється, як виконувати інші типові завдання у VBA:

VBA: Як підрахувати кількість аркушів у робочій книзі
VBA: як отримати дані з іншої книги
VBA: як видалити аркуш, якщо ім’я містить певний текст