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


3 participantes

    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido

    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1042
    Registrado : 23/08/2010

    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido Empty [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido

    Mensagem  Mylton 4/6/2024, 09:47

    Bom dia.
    No anexo tenho uma listBox no form Frm_Dash_Processos que busca os dados da Cons_List_declinado.
    Quando dou um clique abre o form Frm_Cadastro_Processo.
    Entretanto não no registro escolhido.

    Tentei esses códigos abaixo:
    Private Sub List_Declinado_Click()
       Dim Id_Processos As Integer
       Dim Processo As String
       
       ' Verifica se algum item está selecionado no ListBox
       If List_Declinado.ListIndex <> -1 Then
           ' Obtém o ID e o número do processo selecionado
           Id_Processos = List_Declinado.Column(0)
           Numero = List_Declinado.Column(1)
           
           ' Abre o formulário usando o ID do processo
           DoCmd.OpenForm "Frm_Cadastro_Processo", , , "Id_Processos = " & Id_Processos
           
           ' Ou você pode usar o número do processo se preferir
           ' DoCmd.OpenForm "NomeDoSeuForm", , , "Numero = '" & numeroProcesso & "'"
       End If
    End Sub

    e esse

    Private Sub List_Declinado_Click()
    Dim intrecord As Integer
    intrecord = Me!List_Declinado.Column(0) 'coluna zero, é a chave primária
    DoCmd.OpenForm "Frm_Cadastro_Processo"
    Forms![Frm_Cadastro_Processo].SetFocus
    'Forms!Frm_Cadastro_Processo!Id_Processos.Enabled = True
    'DoCmd.GoToControl "Txt_Id_Processos"
    'DoCmd.FindRecord intrecord
    End Sub


    O primeiro não mostra nada.
    O segundo mostra, mas com registro equivocado.
    Algúem poderia dizer onde errei?
    Obrigado.
    Anexos
    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido AttachmentTeste1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (181 Kb) Baixado 16 vez(es)
    Jungli
    Jungli
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 715
    Registrado : 07/05/2010

    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido Empty Re: [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido

    Mensagem  Jungli 5/6/2024, 02:02

    Boa noite,

    O primeiro campo da sua consulta é o campo Numero, então, você tem que filtrar por ele.

    DoCmd.OpenForm "Frm_Cadastro_Processo", , , "Numero='" & intrecord & "'"

    Abs.


    .................................................................................
    "Somos o que repetidamente fazemos.
    A excelência, portanto, não é um feito,
    mas um hábito."

    Aristóteles
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3501
    Registrado : 13/12/2016

    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido Empty Re: [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido

    Mensagem  Alexandre Fim 5/6/2024, 12:52

    Bom dia,

    1 - Mude o campo da consulta conforme abaixo:

    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido Proces15

    2 - Ajuste o código da linha em azul:

    Private Sub List_Declinado_Click()
    Dim intrecord As Integer
    intrecord = Me!List_Declinado.Column(0) 'coluna zero, é a chave primária
    DoCmd.OpenForm "Frm_Cadastro_Processo", , , "Id_Processos = " & intrecord
    Forms![Frm_Cadastro_Processo].SetFocus
    End Sub



    É isso

    Boa sorte

    Att,

    Alexandre Fim


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido Setinf11
    Sistemas e Tecnologia Ltda
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1042
    Registrado : 23/08/2010

    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido Empty Re: [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido

    Mensagem  Mylton 5/6/2024, 13:24

    Bom dia
    Alexandre e Jungli
    Obrigado
    Assim q chegar em casa testo e aviso.
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1042
    Registrado : 23/08/2010

    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido Empty Re: [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido

    Mensagem  Mylton 6/6/2024, 21:56

    Funcionou. Obrigado Alexandre e Jungli.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3501
    Registrado : 13/12/2016

    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido Empty Re: [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido

    Mensagem  Alexandre Fim 6/6/2024, 22:01

    Valeu Mylton !!
    O fórum agradece.
    Sucesso !!!


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido Setinf11
    Sistemas e Tecnologia Ltda

    Conteúdo patrocinado


    [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido Empty Re: [Resolvido]ListBox abre cadastro no Form mas não no registro escolhido

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/12/2024, 02:23