Notifications
Clear all

Caminho de rede

5 Posts
3 Usuários
0 Reactions
1,118 Visualizações
(@ravargon)
Posts: 15
Active Member
Topic starter
 

Boa tarde,

Já faz algum tempo que busco na internet uma explicação/solução para um problema que tenho em alguns arquivos de rede.

Fiz algumas planilhas que se conversam, uma buscando informação na outra, principalmente com códigos VBA. Essas planilhas são alimentadas por pessoas diversas e colocadas em rede.

O problema é que em algumas máquinas da empresa devo fazer o endereçamento como "\192.168.1.2CONTROLES", enquanto em outras só é possível utilizar "\nomedoservidorCONTROLES".

Dessa forma, os códigos só podem ser rodados a partir de máquinas específicas, pois em outras retorna com erro de caminho.

Alguém já passou por isso ou tem alguma dica de como resolver.

Agradeço a ajuda
Ramon Varela

 
Postado : 18/01/2016 11:56 am
(@mprudencio)
Posts: 2749
Famed Member
 

Nao da para padronizar???

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 18/01/2016 12:48 pm
(@ravargon)
Posts: 15
Active Member
Topic starter
 

Bom dia Marcelo,
O problema é exatamente este. Não estou conseguindo padronizar, pois algumas máquinas entendem um modo de endereçamento e outras outro modo. Nenhum deles é entendido por todas.
Alguma ideia do que pode estar causando isso?

 
Postado : 19/01/2016 6:06 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

ravargon,

Bom dia!

Como solução paliativa, você pode fazer um pequeno tratamento de erro, dentro da rotina onde pega o caminho da rede, da seguinte forma:

'Antes da linha onde pega o caminho
On Error Goto OutroCaminho
'Aqui entra a sua linha de código normal com um dos caminhos e os demais códigos abaixo dela
 "\192.168.1.2CONTROLES"
.
.
.
.
'Aqui, ao final, entra o tratamento de erro
OutroCaminho:
'Aqui você repete as linhas de execução normal do seu código, colocando antes, o outro caminho que às vezes é pego pela máquina local
"\nomedoservidorCONTROLES"
'E os demais códigos logo abaixo
.
.
.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 19/01/2016 6:22 am
(@ravargon)
Posts: 15
Active Member
Topic starter
 

Olá Wagner,

Da forma como você sugeriu me deu um erro em outra linha do código, não sei porque. No entanto consegui contornar o problema utilizando o seguinte:

        On Error Resume Next
        Workbooks.Open Filename:="\192.168.1.2ControlesDocumento.xlsx"
        Workbooks.Open Filename:="\servidordadosCONTROLESDocumento.xlsx"

Vou sinalizar como resolvido com a ressalva de que apenas contornamos o problema. Não pudemos entender porque ele ocorre.

Obrigado pela ajuda
Ramon Varela

 
Postado : 19/01/2016 6:42 pm