MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


    [Resolvido]Ir para registro novo de um subformulário

    avatar
    hronconi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 06/12/2012

    [Resolvido]Ir para registro novo de um subformulário Empty Ir para registro novo de um subformulário

    Mensagem  hronconi 8/12/2012, 21:00

    Boa noite,


    Estou querendo posicionar o controle em um novo registro de um subformulário e já tentei adaptar aos códigos disponibilizados pelo colega Jpaulo, mas sem sucesso.

    Meu código é :
    Código:
    Private Sub Btn_Atualiza_Click()
        SetToZero
        DelCCSaldo
        DoCmd.OpenQuery ("GrCCSaldo")
        DoCmd.OpenQuery ("GrCCSaldo2")
        DoCmd.OpenQuery ("AtCCSaldo2")
        Form_SubContaCorrente.Requery
    '    DoCmd.GoToControl "SubContaCorrente"
    '    DoCmd.GoToRecord , , acNewRec
    End Sub
    Está dando erro nas duas linhas que estão como comentário.

    Como posso resolver esta questão.

    Obrigado.

    Henrique Ronconi
    avatar
    hronconi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 06/12/2012

    [Resolvido]Ir para registro novo de um subformulário Empty RESOLVIDO

    Mensagem  hronconi 8/12/2012, 21:36

    Pessoal,

    Obrigado mas já resolví o problema.

    Eu estava já dentro do controle do subformulário, por isso é que dava erro.

    Resolví utilizando o código
    Código:
        Me.Recordset.AddNew

    Sds,

    Henrique Ronconi

      Data/hora atual: 27/4/2024, 10:00