Astrid,

Bom Dia!

Você não precisa abrir uma pasta em um diretório para executar alguma ação nela (tipo abrir um arquivo, localizar um arquivo, criar um arquivo, apagar um arquivo, etc).

Você pode executar as ações utilizando-se das funções adequadas do VBA para isso, tais como DIR, CHDIR, MKDIR, RMDIR, CHDRIVE, etc. Dê uma examinada no Help do VBA que você vai ter uma ótima noção de como usar essas funções.

bom dia

Todos que são feras em VBA, tenho a necessidade de colocar uma macro em uma planilha com um botão onde eu possa abrir outra pasta e visualizar os arquivos que estão nesta pasta. exemplo, estou com a planilha de lançamentos aberta e nela tem o comando onde eu possa ver as planilhas que foram arquivadas em PDF. mais ou menos assim como o código abaixo, só que terá que abrir diretamente na pasta onde estão as planilhas arquivadas. Espero que alguém possa me ajudar.

Sub Abrir()
Application.Dialogs(xlDialogOpen).Show

End Sub

Veja se é isto :

        Sub Abrir_LocalPasta()

            Set fs = CreateObject("Scripting.FileSystemObject")
           
            MsgBox CurDir ' Só para certificar do Caminho atual
           
            'Coloque aqui o Caminho e Pasta que deseja abrir
            ChDir "D:MeusArquivos"
           
            MsgBox CurDir
           
            'Definido o diretorio, a caixa de dialogo abrirá no local definido acima
            FiletoOpen = Application _
            .GetOpenFilename("Excel (.xls), .xls", , "Selecione a planilha")
           
            If FiletoOpen <> False Then
                WdlFolder = fs.getParentFolderName(FiletoOpen)
                WdlNome = fs.GetFileName(FiletoOpen)
            Else
                Exit Sub
            End If
           
        End Sub

O código acima foi tirado do tópico abaixo, de uma olhada no mesmo, lembre-se de fazer uma pesquisa tambem, se utilizar a expressão "GetOpenFilename" encontrara varios outros posts.

Abrir planilha em outro diretório
viewtopic.php?f=10&t=2848&p=12814&hilit=GetOpenFilename#p12814

[]s

Show de bola, é exatamente o que eu procurava..., você conhece mesmo, obrigado!!!