CurDir 函數

會傳回代表目前路徑的 Variant (String) 。

語法

CurDir [ (磁盘驅動器) ]

選擇性 磁碟驅動器自變數 是指定現有磁碟驅動器的 字串表達 式。 如果未指定磁碟驅動器，或磁碟驅動器是長度為零的字串 (“”) ，CurDir 會傳回目前磁碟驅動器的路徑。 在Macintosh上， CurDir 會 忽略任何指定的 磁碟驅動器 ，而只會傳回目前磁碟驅動器的路徑。

範例

此範例會使用 CurDir 函式傳回目前的路徑。 在 Macintosh 上，會忽略提供給 CurDir 的磁碟驅動器規格。 默認磁碟驅動器名稱為 HD，路徑名稱的部分會以冒號分隔，而不是反斜杠。 同樣地，您會指定 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".

另請參閱

• 函式 (Visual Basic for Applications)

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。