Olá amigos,
Muitas vezes estamos desenvolvendo uma rotina, sistema ou aplicação com o VBA, que exige que tenhamos de selecionar uma determinada pasta, seja para abrir um determinado aquivo ou para salvar os arquivos da rotina em determinada pasta.
Para resolver este problema temos a rotina abaixo que faz a exibição da caixa de seleção e atribui o endereço a uma variável
Sub Localizar_Caminho()
Dim strCaminho As String
With Application.FileDialog(msoFileDialogFolderPicker)
'Permitir mais de uma pasta
.AllowMultiSelect = False
'Mostrar janela
.Show
If .SelectedItems.Count > 0 Then
strCaminho = .SelectedItems(1)
End If
End With
Atribuir caminho a variável
modFileBrowser = strCaminho
End Sub
Esta é uma maneira prática de conseguir o caminho (path) de uma pasta existente no computador usando uma “Caixa de Diálogo”.
Peço que deixe seus comentários, opiniões e dúvidas para que assim possamos evoluir com o tema e enriquecer nossas discussões.
Um abraço!
Douglas Godoy
Parabéns!
Eu sabia extrair o caminho de arquivos.
A sua postagem facilitou o meu trabalho.
Que bom que facilitou, obrigado pelo comentário.
Muito bom!
Como já mencionado, simples e direto, resolveu uma encrenca antiga minha.
Grato pro compartilhar o seu conhecimento!
Olá Dirceu, obrigado pelo seu comentário e pela sua visita, se puder inscreva-se no meu canal. Obrigado!! Abraço
Douglas Godoy
Também gostaria de agradecer pelo empenho e gentileza em nos deixar seu conhecimento como dica para nós eternos aprendizes.
Obrigado meu caro, é um prazer poder compartilhar conhecimento e ajudar as pessoas.
Abraços
Douglas
Valeu !!!!
Simples direto e prático
Samir, muito obrigado pela visita e comentário.
Um abraço!
Douglas
Não estou conseguindo fazer funcionar =(
Eduarda,
Me envia um email para ver se consigo te ajudar, ou enviar por aqui mesmo…
Abs
DG
Muito obrigado pela dica douglas! parabens pelo blog
Eu que agradeço pela visita e comentário! Seja bem vindo!