Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  FAQFAQ  BuscarBuscar  MembrosMembros  GruposGrupos  Registrar-seRegistrar-se  Login  

Compartilhe | 
 

 Abertura de arquivo

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
DAILEOM



Mensagens : 7
Data de inscrição : 23/02/2014

MensagemAssunto: Abertura de arquivo   Seg Mar 23, 2015 4:17 pm

Eu tenho um arquivo chamado "grafico.xlsm" no mesmo diretório da pasta do Excel aberta no momento
Preciso de uma macro que abra esse "grafico.xlsm" sem especificar o caminho inteiro onde ele está, pois estou sempre mudando o diretório.
Teria como ?
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: Abertura de arquivo   Ter Mar 24, 2015 3:02 pm

Bom dia!!

Código:
Sub AleVBA_1000()
'Fonte:http://www.globaliconnect.com/excel/index.php?option=com_content&view=article&id=185:excel-vba-workbooks-reference-open-add-name-save-activate-copy-a-close-workbooks-sendmail-method&catid=79&Itemid=475
'#####-----######
'Não tesatado
    Dim strPath As String
    strPath = ThisWorkbook.Path
    Workbooks.Open (strPath & "" & "grafico.xlsm")
End Sub

Obs: Eu espero que no diretório onde o arquivo esteja, você tenho permissão de uso do arquivo
Obs2: Eu espero que o arquivo em questão, não tenha proteção (senha)

No mais terá que tratar ambos os casos!!!!!!!!!!

Att
Voltar ao Topo Ir em baixo
Ver perfil do usuário
DAILEOM



Mensagens : 7
Data de inscrição : 23/02/2014

MensagemAssunto: Re: Abertura de arquivo   Ter Mar 24, 2015 5:49 pm

É isso mesmo !
Faltou só um "\" no meio das aspas, mas funcionou perfeitamente
Obrigado !
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: Abertura de arquivo   Qua Mar 25, 2015 2:09 am

Boa noite!!

Eu fico feliz em ajudar, obrigado pelo retorno!!


Att
Voltar ao Topo Ir em baixo
Ver perfil do usuário
Conteúdo patrocinado




MensagemAssunto: Re: Abertura de arquivo   Hoje à(s) 10:16 pm

Voltar ao Topo Ir em baixo
 
Abertura de arquivo
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» Escolher arquivo e copia-lo para outro lugar
» [DUVIDA] Manipulando arquivos externos em arquivo ZIP
» [Resolvido] busca de diretório e atributos de arquivo
» Gm ler som de um arquivo RAR
» Como inserir dados no MEIO de um arquivo txt

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: