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]Fechar formulário Via VBA

    tiagofeitosa
    tiagofeitosa
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 31/01/2013

    [Resolvido]Fechar formulário Via VBA Empty Fechar formulário Via VBA

    Mensagem  tiagofeitosa em 1/2/2013, 04:14

    Amigos,

    Alguém pode me ajudar?

    Criei um fomrulário de pesquisa para um formulário de cadastro, até ai tudo bem, mas quero que depois que sair do ultimo campo ele feche o proprio formulario. Coloquei o código seguinte, mas está depurando bem no DoCmd.

    Nome do Formulário "FrmHelp"



    Private Sub ConfirmaEnderecoHelp_LostFocus()

    If Me.ConfirmaEnderecoHelp = "Sim" Then
    Forms![FrmCadastroALunos]![TXTcep] = Forms![FrmCadastroALunos]![CEPAluno]
    Forms![FrmCadastroALunos]![txtnumero] = Forms![FrmCadastroALunos]![txtNumeroAluno]
    Forms![FrmCadastroALunos]![txtcomplemento] = Forms![FrmCadastroALunos]![txtcomplementoAluno]
    End If

    DoCmd.Close acForm, FrmHelp, acSaveYes

    Desde já obrigado
    Leandro
    Leandro
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1599
    Registrado : 12/11/2009

    [Resolvido]Fechar formulário Via VBA Empty Re: [Resolvido]Fechar formulário Via VBA

    Mensagem  Leandro em 1/2/2013, 10:43

    Não esqueça as aspas no nome do form:

    DoCmd.Close acForm, "FrmHelp", acSaveYes

    tiagofeitosa
    tiagofeitosa
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 31/01/2013

    [Resolvido]Fechar formulário Via VBA Empty Re: [Resolvido]Fechar formulário Via VBA

    Mensagem  tiagofeitosa em 1/2/2013, 13:30

    Leandro,

    OBrigado por me ajudar com uma coisa tão simples...


    Acho que ainda assim estou "comendo bola" em alguma coisa aqui...


    Private Sub Texto6_GotFocus()

    DoCmd.Close acForm, "FrmHelp", acSaveYes

    End Sub

    Esse código ta depurando, consegue enxergar algo errado ai?


    O que eu preciso é que esse formulario feche automaticamente apos eu selecionar os campos, tem alguma sugestão melhor?

    Obrigado
    Leandro
    Leandro
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1599
    Registrado : 12/11/2009

    [Resolvido]Fechar formulário Via VBA Empty Re: [Resolvido]Fechar formulário Via VBA

    Mensagem  Leandro em 1/2/2013, 15:02

    Coloque no evento ao Sair do campo somente isso:

    DoCmd.Close acForm, "FrmHelp"

    tiagofeitosa
    tiagofeitosa
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 31/01/2013

    [Resolvido]Fechar formulário Via VBA Empty Re: [Resolvido]Fechar formulário Via VBA

    Mensagem  tiagofeitosa em 1/2/2013, 16:13

    Mamão!

    Eu tava comento bola aqui com o comando...

    Cara, muito obrigado mesmo!!!!
    Leandro
    Leandro
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1599
    Registrado : 12/11/2009

    [Resolvido]Fechar formulário Via VBA Empty Re: [Resolvido]Fechar formulário Via VBA

    Mensagem  Leandro em 1/2/2013, 16:20

    Que bom que conseguiu!! Obrigado pelo retorno, continue assim.

    klaytontome
    klaytontome
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 32
    Registrado : 19/03/2017

    [Resolvido]Fechar formulário Via VBA Empty Re: [Resolvido]Fechar formulário Via VBA

    Mensagem  klaytontome em 30/7/2019, 00:08

    valew ajudou aqui!rs.. vlw

    Conteúdo patrocinado

    [Resolvido]Fechar formulário Via VBA Empty Re: [Resolvido]Fechar formulário Via VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 15/11/2019, 08:43