Função CurDir

Devolve uma Variante (Cadeia) que representa o caminho atual.

Sintaxe

CurDir [ (unidade) ]

O argumentode unidade opcional é uma expressão de cadeia que especifica uma unidade existente. Se não for especificada nenhuma unidade ou se a unidade for uma cadeia de comprimento zero (""), CurDir devolve o caminho para a unidade atual. No Macintosh, o CurDir ignora qualquer unidade especificada e simplesmente devolve o caminho para a unidade atual.

Exemplo

Este exemplo utiliza a função CurDir para devolver o caminho atual. No Macintosh, as especificações de unidade fornecidas ao CurDir são ignoradas. O nome da unidade predefinido é HD e as partes do nome do caminho são separadas por dois pontos em vez de barras invertidas. Da mesma forma, especificaria pastas macintosh em vez de \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".

Confira também

• Funções (Visual Basic for Applications)

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.