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


2 participantes

    [Resolvido]Botão para abrir registro X

    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Botão para abrir registro X Empty Botão para abrir registro X

    Mensagem  andre.lr 21/11/2011, 18:56

    Amigos, tenho uma tabela e dois formulários gerados através dos dados fornecidos por ela, o formulário 1 não é continuo e eu entro com dados nele, o formulário 2 é continuo e não entra dados nele, só serve como um mapa aonde posso visualizar rápidamente alguns campos importantes.

    são os seguintes:

    Tabela: RG LA 23 SAP

    Formulário 1: RG LA 23 SAP

    Formulário 2: RG LA 30 Mapa


    O que eu necessito é colocar um botão no formulário 2, dentro do detalhe onde estão também os campos da tabela com um comando ao clicar que abra o formulário 1 exatamente no registro correspondente ao botão que eu apertar, ou seja cada linha do formulário 2 que é continuo vai ter os campos normais dela e um botão desse e ao clicar nele quero que chame o registro correspondente só que no formulário 1....

    é possível? espero não ter sido muito confuso! obrigado amigos! =]
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Botão para abrir registro X Empty Re: [Resolvido]Botão para abrir registro X

    Mensagem  criquio 21/11/2011, 19:05

    Tente algo assim:

    DoCmd.OpenForm "NomeDoForm1"
    DoCmd.GoToRecord acDataForm, "NomeDoFormulário", acGoTo, Me.Código


    .................................................................................
    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
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Botão para abrir registro X Empty Re: [Resolvido]Botão para abrir registro X

    Mensagem  andre.lr 21/11/2011, 19:44

    Resolvido, =] criei um campo chamado codigoID na tabela com numeração automática coloquei ele invisível nos 2 formulários e ficou assim!

    DoCmd.OpenForm "RG LA 23 SAP"
    DoCmd.GoToRecord acDataForm, "RG LA 23 SAP", acGoTo, Me.codigoID


    Obrigado Criquio!

    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Botão para abrir registro X Empty Re: [Resolvido]Botão para abrir registro X

    Mensagem  criquio 21/11/2011, 19:54

    Obrigado pelo retorno. O forum agradece.


    .................................................................................
    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
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Botão para abrir registro X Empty Re: [Resolvido]Botão para abrir registro X

    Mensagem  andre.lr 23/11/2011, 18:36

    Criquio, vou ter que reabrir esse tópico...
    eu tinha testado o botão no primeiro e no segundo registro e funcionou beleza por isso mesmo coloquei resolvido, agora criei o terceiro registro só para testar e está dando erro...

    Quando clico no botão do terceiro registro no mapa ele abre o quarto registro... esteja ele em branco ou não

    Quando clico no botão do quarto registro do quinto e todos em diante la no mapa, ocorre erro abaixo!

    Erro em tempo de execução '2105'

    Você não pode ir para o registro especificado.


    O código ficou como coloquei no post acima! Implementei ele em 3 mapas de 3 tabelas diferentes e todos estão acontecendo isso!


    Última edição por andre.lr em 24/11/2011, 10:26, editado 3 vez(es)
    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Botão para abrir registro X Empty Re: [Resolvido]Botão para abrir registro X

    Mensagem  andre.lr 23/11/2011, 18:54

    corrigindo,,, o botão do primeiro registro no mapa abre o registro 1 corretamente... o botão do segundo registro, também abre corretamente o registro 2, o terceiro botão abre o quarto registro,,,, o quarto botão abre o sexto registro,,, o quinto botão abre o sétimo registro,,, o sexto abre o oitavo,,, e o maiiiiis imprecionante o sétimo abre o sétimo corretamente, o oitavo e o nono também corretamente Neutral ?????? e também sempre que clico no ultimo botão do ultimo registro no mapa, ele da o erro que coloquei no post de cima!

    amigo que loucura será que eu coloquei nesse comando ein? já tentei mudar o campo codigoID que era numeração atumática e coloquei como texto, mas parece q da na mesma!!

    Me da uma luz amigo! obrigado!

    andre.lr
    andre.lr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 222
    Registrado : 17/10/2011

    [Resolvido]Botão para abrir registro X Empty Re: [Resolvido]Botão para abrir registro X

    Mensagem  andre.lr 24/11/2011, 10:53

    Nossa que burrice pra variar! já resolvi amigo!

    O problema é que em numeração automática quando vc deleta um registro o próximo que vc cria não assume o número daquele que você deletou... e daí o comando abria o registro do número que o campo codigoID autonumeração estava!! =P

    Corrigi colocando os dados de entrada do campo codigoID amarrados ao campo SAP da minha tabela, que é um campo que está com auto preenchimento através do comando =LocReg() no valor padrão e com a public function abaixo, eu tinha implementado esse código justamente pq a numeração automática é um saco quando vc deleta o registro fica um buraco na sequencia... com a locreg não pois o campo assume valores sequenciais não vinculados a tabela!!

    Public Function LocReg()
    On Error Resume Next

    Dim rs As DAO.Recordset
    Set rs = Me.RecordsetClone

    rs.MoveLast
    rs.Bookmark = Me.Bookmark

    If (Err <> 0) Then
    LocReg = rs.RecordCount + 1
    Else
    LocReg = rs.AbsolutePosition + 1
    End If


    Dessa forma os valores númericos que aparecem no campo codigoID sempre estão na sequência correta! Smile

    Resolvido denovo!! desculpe o transtorno!
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Botão para abrir registro X Empty Re: [Resolvido]Botão para abrir registro X

    Mensagem  criquio 24/11/2011, 17:34

    Acontece. É tentando que a gente aprende. Quem aprende errando aprende mais aprendido do que quem aprende copiando o certo Very Happy


    .................................................................................
    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.


    Conteúdo patrocinado


    [Resolvido]Botão para abrir registro X Empty Re: [Resolvido]Botão para abrir registro X

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 6/5/2024, 11:42