Notifications
Clear all

Comando VBA para Abrir Pasta

4 Posts
3 Usuários
0 Reactions
1,731 Visualizações
 caje
(@caje)
Posts: 97
Trusted Member
Topic starter
 

Boa Tarde a Todos do Forum.

Tenho a seguinte duvida gostaria de criar uma Macro para abrir uma Pasta especifica .

Exemplo Abrir a Pasta C:EXEMPLO

Encontrei Exemplos onde consigo abrir o Arquivo porém gostaria de abrir apenas a pasta.

Exemplos Encontrados

Sub Exemplo()
Workbooks.Open _
        "C:Exemploteste.xlsb"
        Windows("Exemplo.xlsb").Activate
End Sub

Nesse exemplo consigo abrir o arquivo teste.xlsb mas o que quero realmente é apenas abrir a Pasta Exemplo.

Se alguem tiver alguma Dica Agradeço.

 
Postado : 21/02/2014 11:19 am
(@gtsalikis)
Posts: 2373
Noble Member
 

Sub Abrir_Pasta_GT()
Shell "C:WindowsSystem32explorer.exe C:Exemplo", 1
End Sub

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 21/02/2014 12:14 pm
 caje
(@caje)
Posts: 97
Trusted Member
Topic starter
 

Cara muitíssimo Obrigado gtsalikis

Ajudou bastante só vou complementar a sua resposta que as vezes o explorer.exe pode estar na pasta C:Windows em vez de estar na C:WindowsSystem32 que foi o que aconteceu aqui.

Mas Novamente Muito Obrigado de Certinho aqui para aquilo que precisava.

 
Postado : 21/02/2014 1:26 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Caso seja necessário reabrir o tópico, o autor poderá enviar uma MP para um dos moderadores solicitando o desbloqueio.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 21/02/2014 5:20 pm