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]Abri Formulário através de uma caixa de listagem

    avatar
    Misson Lira
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 335
    Registrado : 01/12/2016

    [Resolvido]Abri Formulário através de uma caixa de listagem Empty [Resolvido]Abri Formulário através de uma caixa de listagem

    Mensagem  Misson Lira 11/4/2017, 18:53

    Olá pessoal!!

    Pessoal to mais uma vez precisando da ajuda de vocês...

    Tem uma banco de dados que ele faz uma consulta de dividas de cliente.
    tem a tela de Consulta "FRM_MOV_Venda_ListaClienteDevedor" ela traz dados de clientes e traz valor de parcelas dos mesmo
    efetuando 2 clique no nome do cliente ele vai abri o formulario "FRM_MOV_Venda_QuitarParcelaCliente" para assim fazer pagamneto de parcelas do cliente...
    Mais ai onde ta o problema, o código que coloque para abri o exatamente no cliente correto não esta funcionando, já tem uma sema que venho tentando alternativas mais não consigo acerta.

    Peso ajuda de vocês na elaboração desse código, ou uma ideá que possa funcionar para abri o formulário na aba do cliente correto.

    desde já agradeço pela ajuda...
    Anexos
    [Resolvido]Abri Formulário através de uma caixa de listagem AttachmentConsulta de Cliente.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (438 Kb) Baixado 28 vez(es)
    avatar
    ifahidalgo
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 13/10/2011

    [Resolvido]Abri Formulário através de uma caixa de listagem Empty Re: [Resolvido]Abri Formulário através de uma caixa de listagem

    Mensagem  ifahidalgo 11/4/2017, 19:37

    no evento apos atualizar, da caixa de listagem coloque o sequinte

    crie um campo texto txtiddoregistro

    me.txtiddoregistro = me.nomedalista.Column(0) '0 indica a coluna onde está esse campo primario da tabela. 0 primeira coluna, 1 segunda e assim diante.

    no evento duplo clique na caixa de listagem coloque o seguinte
    DoCmd.OpenForm "nomedoform", acNormal


    no evento ao abrir do formulario coloque

    Private Sub Form_Open(Cancel As Integer)
    Dim strSql As String, rstTemp As DAO.Recordset

    Me.txtiddoregistro = Forms!formularioondeestaacaixadelistagem!txtiddoregistro 'transportar o codigo do formulário da caixa de listagem para o formulario de alteração
    DoCmd.Close acForm, "formulariodacaixadelistagem" 'fechar o formulario

    If (txtiddoregsitro <> "") Then
    strSql = "Select * from tabela where iddoregistro = int(val('" & txtiddoregistro & "'))"
    Set rstTemp = CurrentDb.OpenRecordset(strSql, dbOpenSnapshot)
    If Not rstTemp.EOF Then 'encontrando registro
    txtiditem = rstTemp("iditem")
    txtcodsiga = rstTemp("codsiga")
    txtdatanf = rstTemp("data")
    txtnotafiscal = rstTemp("notafiscal")
    txtquantentrada = rstTemp("quantentrada")
    'coloca os campos que estão na tabela nos respectivos campos textos
    End If
    End If
    End Sub
    avatar
    Misson Lira
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 335
    Registrado : 01/12/2016

    [Resolvido]Abri Formulário através de uma caixa de listagem Empty Re: [Resolvido]Abri Formulário através de uma caixa de listagem

    Mensagem  Misson Lira 7/5/2017, 03:50

    boa noite!

    Desculpa pela demora, estava impossibilitado de responder... Mais acabei fazendo os teste e deu certo.

    Muito Obrigado!
    avatar
    ifahidalgo
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 13/10/2011

    [Resolvido]Abri Formulário através de uma caixa de listagem Empty Re: [Resolvido]Abri Formulário através de uma caixa de listagem

    Mensagem  ifahidalgo 8/5/2017, 15:00

    Que bom que resolveu. se poder dá um joia ai. obrigado.

    Conteúdo patrocinado


    [Resolvido]Abri Formulário através de uma caixa de listagem Empty Re: [Resolvido]Abri Formulário através de uma caixa de listagem

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 21:39