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]Selecione tudo com campo sim não

    avatar
    Maria José Soares
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 290
    Registrado : 23/11/2011

    [Resolvido]Selecione tudo com campo sim não Empty [Resolvido]Selecione tudo com campo sim não

    Mensagem  Maria José Soares 18/1/2014, 00:16

    Gente boa noite..

    Eu tenho um formulário onde filtro dados entre datas em um sub formulário e ao filtrar esses dados tenho no formulário principal um campo do tipo sim/não... Bem! Eu queria que após filtrar esses dados ao clicar no botão sim/não no formulário principal ele selecionasse todas as informações filtradas... Será que alguém pode me dar mais essa forçinha??? Eu achei algo aqui no forum mas não contemplou minha necessidade...

    Desde já agradeço muito a atenção de todos...


    Bjão

    Download at SpeedyShare
    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]Selecione tudo com campo sim não Empty Re: [Resolvido]Selecione tudo com campo sim não

    Mensagem  criquio 18/1/2014, 00:53

    Tente algo assim no evento "Ao clicar" ou no evento "Após atualizar" do Sim/Não do formulário principal:

    Código:
    Me.NomeDoSimNãoDoSubForm.Value = Me.NomeDoSimNãoDoFormPrincipal.Value

    Se funcionar a contento, ao marcar o Sim/Não principal, marcará todos os do subform e ao desmarcar o principal, deverá desmarcar todos os do subform.


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

    avatar
    Maria José Soares
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 290
    Registrado : 23/11/2011

    [Resolvido]Selecione tudo com campo sim não Empty Selecione tudo com campo sim não

    Mensagem  Maria José Soares 18/1/2014, 11:49

    Criquio bom dia querido!!!!

    Criquio eu tentei da forma que vc me orientou e deu o erro abaixo. Mas ai fiquei pensando! Será que eu não deveria orientar ao nome do subformulario e depois ao nome do botão e todos com a "!" (Me!sub_formulário!sim.value) ai deu certo, mas em partes por que so seleciona a primeira linha...
    O que será que to fazendo de errado...

    Valeu pela atenção querido...

    Bjão

    [Resolvido]Selecione tudo com campo sim não V12p

    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]Selecione tudo com campo sim não Empty Re: [Resolvido]Selecione tudo com campo sim não

    Mensagem  criquio 18/1/2014, 12:39

    Talvez assim:

    Código:
        Dim rs As Recordset

        Set rs = Me.query_subformulário.Form.RecordsetClone

        Do While Not rs.EOF
            rs.Edit
            rs!sim.Value = Me.SelTodos.Value
            rs.Update
            rs.MoveNext
        Loop

        rs.Close
        Set rs = Nothing

        Me.query_subformulário.Form.RecordSource = Me.query_subformulário.Form.RecordSource


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

    avatar
    Maria José Soares
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 290
    Registrado : 23/11/2011

    [Resolvido]Selecione tudo com campo sim não Empty Selecione tudo com campo sim não

    Mensagem  Maria José Soares 18/1/2014, 16:14

    Criquio ta resolvidíssimo... Muito bom... Valeu querido... Muito obrigada mesmo...
    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]Selecione tudo com campo sim não Empty Re: [Resolvido]Selecione tudo com campo sim não

    Mensagem  criquio 18/1/2014, 23:15

    Grato pelo retorno. O fórum 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.


    Conteúdo patrocinado


    [Resolvido]Selecione tudo com campo sim não Empty Re: [Resolvido]Selecione tudo com campo sim não

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 13:53