Функция CurDir

  • Статья

Возвращает переменную типа Variant (String), представляющую текущий путь.

Синтаксис

CurDir [ (диск) ]

Необязательный аргументдиска — это строковое выражение, указывающее существующий диск. Если диск не указан или если drive является строкой нулевой длины (""), CurDir возвращает путь для текущего диска. На компьютерах Macintosh функция CurDir игнорирует любой указанный диск и просто возвращает путь для текущего диска.

Пример

В этом примере функция CurDir используется для возвращения текущего пути. На компьютерах Macintosh спецификации диска, переданные в CurDir, игнорируются. Имя диска по умолчанию — HD, а части pathname разделяются двоеточием, а не обратными косыми чертами. Похожим образом задаются папки Macintosh вместо \Windows.

' Assume current path on C drive is "C:\WINDOWS\SYSTEM" (on Microsoft Windows).
' Assume current path on D drive is "D:\EXCEL".
' Assume C is the current drive.
Dim MyPath
MyPath = CurDir    ' Returns "C:\WINDOWS\SYSTEM".
MyPath = CurDir("C")    ' Returns "C:\WINDOWS\SYSTEM".
MyPath = CurDir("D")    ' Returns "D:\EXCEL".

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.