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

4 participantes

    [Resolvido]Selecionar todos os campos SIM/Não.

    XPTOS
    XPTOS
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 601
    Registrado : 20/01/2014

    [Resolvido]Selecionar todos os campos SIM/Não. Empty [Resolvido]Selecionar todos os campos SIM/Não.

    Mensagem  XPTOS 22/3/2015, 19:22

    Prezados,

    Peço a ajuda para o form anexo, pois preciso clicar no campo 00 da tabela e marcar todos os registros no formulario continuo.

    Estou usando o código abaixo, mas seleciona somente uma linha do registro.
    Código:
    CurrentDb.Execute "UPDATE tblAuditoriaRepasse SET Selecionar = 0;"

    Link: https://www.dropbox.com/s/74gixecr1m9ixvl/Banco%20de%20Dados.accdb?dl=0
    formiga10x
    formiga10x
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 818
    Registrado : 11/09/2013

    [Resolvido]Selecionar todos os campos SIM/Não. Empty Re: [Resolvido]Selecionar todos os campos SIM/Não.

    Mensagem  formiga10x 22/3/2015, 20:12

    Código:
    If Seleção16 = True Then

    DoCmd.RunCommand acCmdSaveRecord
    CurrentDb.Execute "UPDATE tblAuditoriaRepasse SET Selecionar = true;"
    DoCmd.Requery

    Else

    DoCmd.RunCommand acCmdSaveRecord
    CurrentDb.Execute "UPDATE tblAuditoriaRepasse SET Selecionar = false;"
    DoCmd.Requery

    End If


    .................................................................................
    Abraço
    Formiga10x

    Sempre que possível poste o bd ou parte dele, com uma explicação bem clara e objetiva do que quer.
    “Um homem não está acabado quando enfrenta a derrota. Ele está acabado quando desiste - Richard Nixon”
    Formiga10x

    "Lembro do exato momento em que me dei conta que boa parte de minha vida foi dedicada a localizar erros em meus próprios programas."
    - Maurice Vicent Wilkes
    XPTOS
    XPTOS
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 601
    Registrado : 20/01/2014

    [Resolvido]Selecionar todos os campos SIM/Não. Empty Re: [Resolvido]Selecionar todos os campos SIM/Não.

    Mensagem  XPTOS 22/3/2015, 20:43

    Olá, 

    Agora funcionou legal sem a mensagem de erro de gravação.

    Obs: Percebi que o código seleciona toda a tabela, porém, se eu quiser filtrar o form e selecionar só os registros filtrados é possível?

    Grato,
    formiga10x
    formiga10x
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 818
    Registrado : 11/09/2013

    [Resolvido]Selecionar todos os campos SIM/Não. Empty Re: [Resolvido]Selecionar todos os campos SIM/Não.

    Mensagem  formiga10x 22/3/2015, 20:46

    Sim é, e para isto faça a utilização da clausura Where após true / false especificando o(s) critérios


    .................................................................................
    Abraço
    Formiga10x

    Sempre que possível poste o bd ou parte dele, com uma explicação bem clara e objetiva do que quer.
    “Um homem não está acabado quando enfrenta a derrota. Ele está acabado quando desiste - Richard Nixon”
    Formiga10x

    "Lembro do exato momento em que me dei conta que boa parte de minha vida foi dedicada a localizar erros em meus próprios programas."
    - Maurice Vicent Wilkes
    XPTOS
    XPTOS
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 601
    Registrado : 20/01/2014

    [Resolvido]Selecionar todos os campos SIM/Não. Empty Re: [Resolvido]Selecionar todos os campos SIM/Não.

    Mensagem  XPTOS 22/3/2015, 21:51

    a expressão ficou assim CurrentDb.Execute "UPDATE tblAuditoriaRepasse SET Selecionar = true WHERE Like [Forms]![frmPesquisarAuditRepSubFormSelectregOS]![txtPesquisar] & " * ");"
    , mas apresenta mensagem tipo de dados incompativel
    Roberto_1977
    Roberto_1977
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 831
    Registrado : 01/10/2013

    [Resolvido]Selecionar todos os campos SIM/Não. Empty Re: [Resolvido]Selecionar todos os campos SIM/Não.

    Mensagem  Roberto_1977 23/3/2015, 09:02

    Bom dia,

    Experimenta assim:

    CurrentDb.Execute "UPDATE tblAuditoriaRepasse SET Selecionar = true WHERE Like ( '" & Me.txtPesquisar & "' & " * ");"

    Ps: Não testado.

    Abraço... Cool


    .................................................................................
    Para saber como marcar tópico como [Resolvido] Click Aqui Cool
    XPTOS
    XPTOS
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 601
    Registrado : 20/01/2014

    [Resolvido]Selecionar todos os campos SIM/Não. Empty Re: [Resolvido]Selecionar todos os campos SIM/Não.

    Mensagem  XPTOS 23/3/2015, 11:12



    Prezado,

    obrigado pela dica, porém, o erro ainda persiste: Tipo de dados inválido.

    Não está selecionando o que eu filtro atraves do campo Convênio.

    Atenciosamente,

    Segue link: [url=https://www.dropbox.com/s/74gixecr1m9ixvl/Banco de dados.accdb?dl=0]https://www.dropbox.com/s/74gixecr1m9ixvl/Banco%20de%20Dados.accdb?dl=0[/url]
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4730
    Registrado : 06/11/2009

    [Resolvido]Selecionar todos os campos SIM/Não. Empty Re: [Resolvido]Selecionar todos os campos SIM/Não.

    Mensagem  Assis 23/3/2015, 11:35

    Bom dia

    Será que serve assim.
    Marca tudo, ou
    Desmarca todos.

    Aguardo

    Link

    https://dl.dropboxusercontent.com/u/8169944/Assis%20Banco%20de%20Dados.zip


    .................................................................................
    *** Só sei que nada sei ***
    XPTOS
    XPTOS
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 601
    Registrado : 20/01/2014

    [Resolvido]Selecionar todos os campos SIM/Não. Empty Re: [Resolvido]Selecionar todos os campos SIM/Não.

    Mensagem  XPTOS 23/3/2015, 11:47

    Olá, bom dia,

    Serviu perfeitamente.

    Obrigado Assis, formiga10x e Roberto_1977

      Data/hora atual: 5/12/2022, 19:02