Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Erro de execução 430

Esclarecimentos e dúvidas sob o Modelo de Aplicativo de Cadastro em VBA no Microsoft Excel publicado no site e blog http://www.tomasvasquez.com.br
macburn
Manda bem
Manda bem
Mensagens: 135
Registrado em: Qua Jul 07, 2010 7:31 pm

Erro de execução 430

Mensagem por macburn »

Olá pessoal,

Como vai, tudo bem? Então, está ocorrendo este erro de execução 430, gostaria de saber se alguém tem alguma idéia do que seja.

Abraços pessoal.
Anexos
erro 430.JPG
erro 430.JPG (12.95 KiB) Exibido 7602 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


macburn
Manda bem
Manda bem
Mensagens: 135
Registrado em: Qua Jul 07, 2010 7:31 pm

Re: Erro de execução 430

Mensagem por macburn »

Olá pessoal, bom dia,

Então, fiz as alterações no cadastro V3 para esta aplicação. Uma coisa interessante é o seguinte, em determinadas máquinas aqui do trabalho, funciona normalmente, mas em algumas não funciona, dá essa mensagem. Conto com a experiência dos nobres colegas.

Abraços

[REMOVIDO]


Avatar do usuário
Mauro Coutinho
Jedi
Jedi
Mensagens: 1561
Registrado em: Sáb Mar 13, 2010 8:10 pm
Localização: São José dos Pinhais - Pr

Re: Erro de execução 430

Mensagem por Mauro Coutinho »

mac, não tenho acesso ao 4shared no serviço, então faça o seguinte, quando a parecer a tela de erro, clique em "Depurar" e será levado até a linha que está gerando o erro (destacada e amarelo), dependendo do erro, é exibido umas linhas antes, se for este o caso, va teclando F8 até chegar na linha de erro.
Localizado o mesmo poste aqui quais linhas geram o erro.

[]s


macburn
Manda bem
Manda bem
Mensagens: 135
Registrado em: Qua Jul 07, 2010 7:31 pm

Re: Erro de execução 430

Mensagem por macburn »

Grande Mauro,

Como vai essa força. Beleza, fiz como havia sugerido.

Abraços
Anexos
erro depurado
erro depurado
erro 430 depurado.JPG (71.12 KiB) Exibido 7565 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
Mauro Coutinho
Jedi
Jedi
Mensagens: 1561
Registrado em: Sáb Mar 13, 2010 8:10 pm
Localização: São José dos Pinhais - Pr

Re: Erro de execução 430

Mensagem por Mauro Coutinho »

Mac, como na planilha "Cadastro_Medicoes.xls" em "Pasta" o caminho está definido da Rede, e isto não tem como eu simular, apaguei o mesmo, e quando esta celula está em branco o caminho da pasta "Dados.xls" é definido como estivesse no mesmo diretorio, sendo aassim não tive nenhum erro, provavelmente o erro esteja no caminho da rede que definiu, apague e teste sem a rede e veja se da erro.

Outra coisa,, sua planilha dados depois ddo registro 2393 tem varias linhas em branco passando para a linha 2612 e depois pula novamente, corrija isto tambem.

[]s


macburn
Manda bem
Manda bem
Mensagens: 135
Registrado em: Qua Jul 07, 2010 7:31 pm

Re: Erro de execução 430

Mensagem por macburn »

Boa Noite,

Como vai pessoal? Então, fiz as sugestões mas ainda não consegui êxito. Ainda está com o mesmo problema.
Obrigado pela atenção pessoal,

Abraços!


Avatar do usuário
Mauro Coutinho
Jedi
Jedi
Mensagens: 1561
Registrado em: Sáb Mar 13, 2010 8:10 pm
Localização: São José dos Pinhais - Pr

Re: Erro de execução 430

Mensagem por Mauro Coutinho »

Mac, apague o caminho a rede, deixe a celula em branco e coloque os dois arquivos no mesmo diretorio, se ocorrer o erro novamente, clique em Depurar e se a linha destacada em amarelo estiver novamente no mesmo lugar frmPesquisa.show, vá clicando F8 até chegar na linha que realmente esta com erro.

A linha destacada (frmPesquisa.show) só informa que o erro está em algum componente deste formulário.

[]s


macburn
Manda bem
Manda bem
Mensagens: 135
Registrado em: Qua Jul 07, 2010 7:31 pm

Re: Erro de execução 430

Mensagem por macburn »

Bom dia pessoal,

Então fiz como sugerido e quando ocorreu o erro, cliquei em F8.
Apareceu essa linha conforme figura.

Abraços pessoal
Anexos
Arquivo depurado_F8
Arquivo depurado_F8
depurado_F8.JPG (108.07 KiB) Exibido 7523 vezes


Avatar do usuário
Mauro Coutinho
Jedi
Jedi
Mensagens: 1561
Registrado em: Sáb Mar 13, 2010 8:10 pm
Localização: São José dos Pinhais - Pr

Re: Erro de execução 430

Mensagem por Mauro Coutinho »

Mac, você colocou os dois arquivos na mesma Pasta e apagou a informação do caminho de rede ?

Veja bem, pela nova tela que anexou não da para se ter ideia, tem de ir pressionando o F8 até chegar na linha que gera o erro, vá teclando devagar, pois quando chegar na linha de erro será exibido uma msg e voltara para o inicio.

[]s


macburn
Manda bem
Manda bem
Mensagens: 135
Registrado em: Qua Jul 07, 2010 7:31 pm

Re: Erro de execução 430

Mensagem por macburn »

Pessoal,

Boa tarde. Então fiz como você sugeriu Mauro, fui teclando F8 até a linha do erro e apareceu esta linha:

"Set conn = New ADODB.Connection"

Abraços pessoal.


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder