MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


4 participantes

    [Resolvido]Abrir pasta especifica via VBA

    lmaria123
    lmaria123
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 15
    Registrado : 10/05/2012

    [Resolvido]Abrir pasta especifica via VBA Empty Abrir pasta especifica via VBA

    Mensagem  lmaria123 10/5/2012, 12:46

    Olá,

    estou tendo problemas na execução de um módulo via macro.
    O código funciona perfeitamente quando rodado em VBA mas eu queria que um botão executasse esse módulo. Já tentei de todas as formas que eu conheço (que não são muitas) e sempre dá erro.

    A parte do módulo que eu quero executar no botão é:

    Sub testShellEXE()
    Dim lngx As Long
    lngx = fShellExe("C:\Users\Projetos", WIN_NORMAL)
    End Sub

    Já tentei trocar o Sub por Public Function e outras peripércias mas até agora nada.

    Quando eu uso a opção AbrirMódulo na macro, utilizando o procedimento que eu quero testShellEXE() eu recebo uma mensagem de erro dizendo que o nome do procedimento é inválido ou eu não abri o banco de dados.

    Alguém pode me dar um help?!




    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  JPaulo 10/5/2012, 14:46

    Ola Lídia, seja bem vinda ao fórum.

    Algumas perguntas;

    1º Nesse modulo existe alguma API para poder executar este fShellExe ?

    2º O que pretende fazer na realidade ?

    Nas macros, existe a opção de RunCode e não AbrirMódulo, para funfar tem de estar em Function.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Instruções SQL como utilizar...
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  JPaulo 10/5/2012, 14:59

    Se a intenção for abrir uma Pasta é mais simples ainda e não necessita de API;



    Public Function testShellEXE()
    Shell "C:\WINDOWS\explorer.exe """ & "Users\Projetos" & "", vbNormalFocus
    End Function


    Qualquer coisa dê um grito.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Instruções SQL como utilizar...
    lmaria123
    lmaria123
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 15
    Registrado : 10/05/2012

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  lmaria123 10/5/2012, 15:35

    Oi JPaulo,
    obrigada por responder!
    O que eu estou fazendo é tentar abrir uma pasta a partir de um botão.
    Esse código que você me passou só abre o endereço "meus documentos".
    Eu quero abrir uma pasta mais específica. Já tentei mudar o caminho mas não funcionou.
    O que eu faço?
    lmaria123
    lmaria123
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 15
    Registrado : 10/05/2012

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  lmaria123 10/5/2012, 16:04

    Então JPaulo,

    O código que vc me passou mostra a última pasta do caminho. Até aí eu consegui fazer e deu certo.
    Mas o que eu queria mesmo era abrir a última pasta do caminho.
    Como faz?
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  JPaulo 10/5/2012, 16:17

    E qual é a ultima pasta do seu caminho será a pasta Projetos ?


    Public Function testShellEXE()
    Shell "C:\WINDOWS\explorer.exe """ & "C:\Users\Projetos\" & "", vbNormalFocus
    End Function





    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Instruções SQL como utilizar...
    Gilberto Rocha
    Gilberto Rocha
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1027
    Registrado : 21/01/2010

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  Gilberto Rocha 10/5/2012, 16:54

    Só uma sugestão aos moderadores para mudar o título do tópico para facilitar a Busca, sugiro "Abrir pasta especifica via VBA"
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  JPaulo 10/5/2012, 17:04

    Caro topbr, a duvida deste tópico, prende-se em fazer correr uma função num modulo via Macro, abrir pasta especifica é o detalhe da duvida.

    De qualquer, obrigado pela intervenção.




    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Instruções SQL como utilizar...
    avatar
    Convidad
    Convidado


    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  Convidad 10/5/2012, 17:11


    JPaulo, por gentileza, renomeie o tópico como considerar mais adequado. Question

    lmaria123
    lmaria123
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 15
    Registrado : 10/05/2012

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  lmaria123 10/5/2012, 18:13

    É que a dúvida era como fazer a macro executar o código que eu tinha para abrir uma pasta específica.
    O código funcionava sozinho mas eu não conseguia implementá-lo em uma macro.

    Agora com o código que o JPaule me passou está funcionando perfeitamente, inclusive na macro e no botão de comando que usa a macro.

    Obrigada pela ajuda!
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  JPaulo 10/5/2012, 20:08

    Valew pelo retorno, o forum agradece.

    Precisando de novo estamos ae.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Instruções SQL como utilizar...
    avatar
    Dery_santos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 03/10/2016

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  Dery_santos 4/4/2019, 15:46

    Bom dia , sei que esse tópico ja esta fechado mas gostaria de saber se tem como usar a função like para o vba abrir um diretório que comece com um determinado caractere, tipo tenho o diretório c:\ 05013_2019 -arquivos digitalizados


    só que eu quero que ele abra a essa pasta que inicia com 05013_2019 independente do reste ante do nome da pasta o critério seria tipo Shell "C:\WINDOWS\explorer.exe """ & "c:\05013_2019*"
    tem como fazer isso?

    Grato
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  JPaulo 4/4/2019, 16:59

    Olá;

    Sim existe essa possibilidade;

    Num modulo cole e altere para os nomes corretos do caminho das pastas;

    Código:
    Public Function AbrePastaPelaParteDoNome(strPasta As String)
    Dim strCaminho$
    'para chamar a função é assim:
    'Call AbrePastaPelaParteDoNome("05013_2019")
    'pode usar no procedimento ao pressionar de um botão no formulario, por exemplo
    strCaminho = "C:\" & Dir("C:\" & strPasta & "*", vbDirectory)
        Shell "C:\WINDOWS\explorer.exe """ & strCaminho & "", vbNormalFocus
    End Function


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Abrir pasta especifica via VBA Folder_announce_new Instruções SQL como utilizar...
    avatar
    Dery_santos
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 63
    Registrado : 03/10/2016

    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  Dery_santos 4/4/2019, 20:30

    Muito obrigado mestre, vou testa re te aviso.

    Conteúdo patrocinado


    [Resolvido]Abrir pasta especifica via VBA Empty Re: [Resolvido]Abrir pasta especifica via VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 09:32