Визначте каталог поточної книги

Anonim

Макрос показує шлях до сховища

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

Щоб визначити шлях до поточної книги, застосуйте властивість до об’єкта ActiveWorkbook у. Наступний макрос показує, як це виглядає на практиці:

Підпоказати каталог зберігання ()
Затемнити каталог як рядок
Каталог = ActiveWorkbook.Path
Якщо каталог "" Тоді
MsgBox "Нижче наведено книгу" & _
"Каталог збережено:" & vbLf & каталог
Інакше
MsgBox "Поточна книга ще не створена" & _
"збережено".
Закінчити Якщо
End Sub

Після запуску макрос відображає шлях до активної книги у вікні. У наступній книзі показано, як може виглядати результат:

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

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