Início![[Resolvido]Ao ocorrer erro (código) Empty](https://2img.net/i/empty.gif)
andre.lr 22/11/2011, 17:21Amigos!
Gostária de saber qual é o código VB para a macro "Ao ocorrer erro"
Obrigado!
Gostária de saber qual é o código VB para a macro "Ao ocorrer erro"
Obrigado!
2 participantes
[Resolvido]Ao ocorrer erro (código)
andre.lr- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 222
Registrado : 17/10/2011
criquio- Moderador Global
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11229
Registrado : 30/12/2009
Converta a macro para vba e terás o código para ser alterado como necessitar e usar como precisar.
.................................................................................
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |
andre.lr- Avançado
- Respeito às regras :
Sexo :
Localização :
Mensagens : 222
Registrado : 17/10/2011
lol lol lol ... lol
nunca tinha me tocado que dava pra fazer isso meu!
e eu xorando toda hora pedindo códigos !!!
vlw criquio já consegui converter.... mas só pra constar ai o código!
=======================
Option Compare Database
Function Macro1()
On Error GoTo Macro1_Err
On Error Resume Next
Macro1_Exit:
Exit Function
Macro1_Err:
MsgBox Error$
Resume Macro1_Exit
End Function
nunca tinha me tocado que dava pra fazer isso meu!
e eu xorando toda hora pedindo códigos !!!
vlw criquio já consegui converter.... mas só pra constar ai o código!
=======================
Option Compare Database
Function Macro1()
On Error GoTo Macro1_Err
On Error Resume Next
Macro1_Exit:
Exit Function
Macro1_Err:
MsgBox Error$
Resume Macro1_Exit
End Function