MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    Mover um form diretamente para um registro da tabela vinculada

    Compartilhe

    acgiese
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 18/05/2015

    Mover um form diretamente para um registro da tabela vinculada

    Mensagem  acgiese em Seg 01 Jun 2015, 21:48

    Caros Amigos,
    Estou com uma problema que não estou conseguindo resolver...
    Tenho um form frm_Comparecimentos_Cadastro_CB cuja tabela origem é tbl_Comparecimentos_CB:
    Campos chave: ChaveComparecimento e ChaveAssistido
    Demais Campos: DataComparecimento e mais um campo do tipo S/N;
    Localizo um registro usando o DLookup: NumRec = DLookup("[ChaveComparecimento]", "tbl_Comparecimentos_CB", "[ChaveAssistido]= " & Me.Texto35)
    Quando a função DLookup acima localiza o número do registro (NumRec) que satisfaz o critério acima,
    preciso que o form se posicione no registro NumRec !!
    Pela opções que pesquisei, só tem MoveFirst, MoveLast, MoveNext e MovePrevious !!
    A função: DoCmd.GoToRecord acDataForm, "frm_Comparecimentos_cadastro_CB", , NumRec dá erro dizendo que a
    tabela não está aberta, muito embora eu tenha usado os comandos abaixo:
    Dim dbs As DAO.Database
    Dim rst As DAO.Recordset
    Set dbs = CurrentDb
    Set rst = dbs.OpenRecordset("tbl_Comparecimentos_CB")

    Outros comandos que tentei:
    DoCmd.GoToRecord , , , NumRec
    DoCmd.GoToRecord acDataForm, "tbl_Comparecimentos_CB", acGoTo, NumRec
    DoCmd.GoToRecord , , acGoTo, NumRec

    Alguém consegue decifrar isso?
    Agradeço desde já qualquer cooperação !

    cleverson_manaus
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 620
    Registrado : 23/09/2011

    Re: Mover um form diretamente para um registro da tabela vinculada

    Mensagem  cleverson_manaus em Ter 02 Jun 2015, 13:43

    Altera os nomes.


    DoCmd.OpenForm "Cadastro_Parcelas"
    Forms!Cadastro_Paout rcelas.Nome_Cliente.Value = Me.Cliente.Value

    Abraços

    Cleverson


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.]

    "É fazendo que se aprende a fazer aquilo que se deve aprender a fazer."(Aristóteles)
    - Dúvida resolvida!!! Tópico resolvido!!!!

    acgiese
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 18/05/2015

    Resposta

    Mensagem  acgiese em Qua 03 Jun 2015, 03:59

    Caro Cleverson,
    Agradeço a contribuição mas infelizmente não funcionou!
    Continuo tentando..
    Abraço

      Data/hora atual: Sex 09 Dez 2016, 09:35