MaximoAccess

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

Obrigado

Administração do MaximoAccess

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


    [Resolvido]Como tirar msg de erro de execução.

    avatar
    motavg
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 28/01/2019

    [Resolvido]Como tirar msg de erro de execução. Empty [Resolvido]Como tirar msg de erro de execução.

    Mensagem  motavg em 28/4/2019, 17:05

    Bom dia, amigos.

    Tenho algumas dúvidas, que talvez sejam bobas.

    Exemplo, eu tenho relatório que já mando direto para imprimir em pdf. Aí ele abre a caixa de dialogo do windows perguntando qual local quero salvar.
    Se eu cancelar o mesmo, ele dá erro de execução, tem como retirar "erro". Pois o usuário pode querer cancelar e iria abrir essa msg do visual basic para depurar sem necessidade o mesmo podendo fazer alguma besteira nos códigos.

    [Resolvido]Como tirar msg de erro de execução. Erro_d10
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 834
    Registrado : 22/11/2016

    [Resolvido]Como tirar msg de erro de execução. Empty Re: [Resolvido]Como tirar msg de erro de execução.

    Mensagem  IvanJr. em 28/4/2019, 21:05

    Basta fazer o tratamento do erro. Coloque aqui o código usado no seu botão imprimir para fazermos o ajuste.


    .................................................................................
    Sempre tente entender o código, não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    motavg
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 28/01/2019

    [Resolvido]Como tirar msg de erro de execução. Empty como tirar msg de erro de execução

    Mensagem  motavg em 28/4/2019, 22:04

    Antes era assim que estava:

    Código:
    Private Sub btnRelLucroMes_Click()
    DoCmd.OpenReport "RelLucro"
    End sub


    Coloquei dessa forma. Seria assim?

    Código:
    Private Sub btnRelLucroMes_Click()
    On Error GoTo btnRelLucroMes_Click_Err

    [b]DoCmd.OpenReport "RelLucro"[/b]

    btnRelLucroMes_Click_Exit:
        Exit Sub

    btnRelLucroMes_Click_Err:
        MsgBox Error$
        Resume btnRelLucroMes_Click_Exit
    End Sub


    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 834
    Registrado : 22/11/2016

    [Resolvido]Como tirar msg de erro de execução. Empty Re: [Resolvido]Como tirar msg de erro de execução.

    Mensagem  IvanJr. em 28/4/2019, 23:18

    Código:
    Private Sub btnRelLucroMes_Click()
    On Error GoTo btnRelLucroMes_Click_Err

    DoCmd.OpenReport "RelLucro"

    btnRelLucroMes_Click_Exit:
        Exit Sub

    btnRelLucroMes_Click_Err:
        If Err.Number <> 2212 then MsgBox Error$
        Resume btnRelLucroMes_Click_Exit
    End Sub


    .................................................................................
    Sempre tente entender o código, não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    motavg
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 53
    Registrado : 28/01/2019

    [Resolvido]Como tirar msg de erro de execução. Empty Como tirar msg de erro de execução.

    Mensagem  motavg em 1/5/2019, 03:55

    Muito obrigado!!!!
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 834
    Registrado : 22/11/2016

    [Resolvido]Como tirar msg de erro de execução. Empty Re: [Resolvido]Como tirar msg de erro de execução.

    Mensagem  IvanJr. em 1/5/2019, 14:50

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    Sempre tente entender o código, não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    Conteúdo patrocinado

    [Resolvido]Como tirar msg de erro de execução. Empty Re: [Resolvido]Como tirar msg de erro de execução.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/8/2019, 13:04