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]Ao marcar receber todos, ele marca todas as contas como recebidas

    avatar
    digitaltec
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 106
    Registrado : 09/05/2020

    [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas Empty [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas

    Mensagem  digitaltec 3/7/2020, 19:42

    Olá tenho um form continuo que nele abre as contas a pagar do dia quero criar um botao que ao clicar ele marque todas os campos recebidos de todo formulário que esta aberto. Coloquei no btão ao clicar me.pago.value = -1 mais ele só marca o primeiro quero que ele marque todos. Desde ja agradeço a atenção de todos
    avatar
    digitaltec
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 106
    Registrado : 09/05/2020

    [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas Empty Re: [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas

    Mensagem  digitaltec 4/7/2020, 00:07

    Segue exemplo para ajudar aos colegas a entender melhor eu desejo ao clicar em pagar todos, todos que tem pago ele fique como marcado no caso ele receba -1 que é o seu código para ficar marcado seria isso, alguma luz ? : )
    Anexos
    [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas Attachmentexemplo.jpg
    Você não tem permissão para fazer download dos arquivos anexados.
    (40 Kb) Baixado 10 vez(es)
    Celso Roberto
    Celso Roberto
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1076
    Registrado : 01/03/2014

    [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas Empty Re: [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas

    Mensagem  Celso Roberto 4/7/2020, 00:28

    Olá..

    Adapte a sua necessidade alterando para o nome do seu formulario

    Código:
    Me.NomeDoSeuFormulario.Form.RecordsetClone.MoveFirst
        Do While Not Me.NomeDoSeuFormulario.Form.RecordsetClone.EOF
            Me.NomeDoSeuFormulario.Form.RecordsetClone.Edit
            Me.NomeDoSeuFormulario.Form.RecordsetClone!Pago = True
            Me.NomeDoSeuFormulario.Form.RecordsetClone.Update
            Me.NomeDoSeuFormulario.Form.RecordsetClone.MoveNext
        Loop
            Me.NomeDoSeuFormulario.Requery
            Exit Sub

    Aguardamos retorno

    Abraços


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    digitaltec gosta desta mensagem

    avatar
    digitaltec
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 106
    Registrado : 09/05/2020

    [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas Empty Re: [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas

    Mensagem  digitaltec 4/7/2020, 00:53

    Olá Celso obrigado pela ajuda, coloquei o codigo no botao pagartodos e deu um erro de metodo ou mebro segue foto do erro
    Anexos
    [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas Attachmenterro.jpg
    Você não tem permissão para fazer download dos arquivos anexados.
    (53 Kb) Baixado 7 vez(es)
    Celso Roberto
    Celso Roberto
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1076
    Registrado : 01/03/2014

    [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas Empty Re: [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas

    Mensagem  Celso Roberto 4/7/2020, 01:08

    Olá..

    Altere para

    Código:
    Me.Form.RecordsetClone.MoveFirst
        Do While Not Me.Form.RecordsetClone.EOF
            Me.Form.RecordsetClone.Edit
            Me.Form.RecordsetClone!Pago = True
            Me.Form.RecordsetClone.Update
            Me.Form.RecordsetClone.MoveNext
        Loop
            Me.Requery
            Exit Sub

    Se der erro, anexe seu exemplo para que possamos verificar

    Aguardamos retorno


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    digitaltec gosta desta mensagem

    avatar
    digitaltec
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 106
    Registrado : 09/05/2020

    [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas Empty Re: [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas

    Mensagem  digitaltec 4/7/2020, 01:18

    Resolvido
    Criei tbm o outro botao para desmarcar todos apenas mudei de true para false
    Muito obrigado : )
    Celso Roberto
    Celso Roberto
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1076
    Registrado : 01/03/2014

    [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas Empty Re: [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas

    Mensagem  Celso Roberto 4/7/2020, 01:28

    Olá..

    Fico feliz por ter ajudado. cheers cheers

    Obrigado pelo retorno

    Abraços e sucesso


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    Conteúdo patrocinado


    [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas Empty Re: [Resolvido]Ao marcar receber todos, ele marca todas as contas como recebidas

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 27/5/2022, 04:47