Função ActDir

Nota: A função, método, objeto ou propriedade descrito neste tópico é desativada se o Microsoft Jet Expression Service estiver a funcionar em modo sandbox, o que impede a avaliação de expressões potencialmente inseguras. Para obter mais informações sobre o modo sandbox, procure "modo sandbox" em Ajuda.

Devolve uma variante(String)representando o caminho atual.

Sintaxe

CurDir [ (unidade) ]

A unidade opcionalargumento é um expressão de cadeia que especifica uma unidade existente. Se não for especificada nenhuma unidade ou se a unidade for uma corda de comprimento zero (""), o 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

Nota: Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.

Este exemplo utiliza a função CurDir para retornar o caminho atual. No Macintosh, as especificações de condução dadas ao CurDir são ignoradas. O nome de unidade padrão é "HD" e partes do nome do pathname são separadas por cólons em vez de costas. Da mesma forma, especificaria as 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".

Precisa de mais ajuda?

Aumente os seus conhecimentos do Office
Explore as formações
Seja o primeiro a obter novas funcionalidades
Adira ao Office Insider

As informações foram úteis?

Obrigado pelo seu feedback! Parece que poderá ser benéfico reencaminhá-lo para um dos nossos agentes de suporte do Office.

×