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


    [Resolvido]Caixa de Seleção

    avatar
    emacsabino
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 29/08/2011

    [Resolvido]Caixa de Seleção Empty Caixa de Seleção

    Mensagem  emacsabino 17/1/2012, 22:15

    Boa noite, pessoal já tou com três dias batendo cabeça para resolver um problema, eu tenho um formulário onde tem uma caixa de marcação(Checkbox), eu queria que toda vez que eu abrisse o formulário a caixa estivesse desmarcada, mas que isso fosse em todos os registros. Já tentei até criar um macro para desmarcar todos na tabela mas não consegui, então qualquer solução é válida, sendo que pode ser para desmarcar na tabela via formulário ou no formulário em todos os registros que forem passando de uma só vez. Alguém pode me ajudar?
    avatar
    Convidad
    Convidado


    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  Convidad 17/1/2012, 22:28

    Olá

    Private Sub Form_Load()
    Application.CurrentDb.Execute ("UPDATE NomeDaTabela SET tab_NomeDaTabela.NomeDoControle = 0)
    End Sub
    avatar
    emacsabino
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 29/08/2011

    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  emacsabino 17/1/2012, 22:32

    Amigo fiz o que você falou, só que aparece a mensagem,
    erro de compilação
    erro de sintax
    avatar
    Convidad
    Convidado


    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  Convidad 17/1/2012, 22:36

    Desculpe, faltou o aspas antes do parêntese final.

    Tente assim:

    Application.CurrentDb.Execute ("UPDATE NomeDaTabela SET tab_NomeDaTabela.NomeDoControle = 0")
    avatar
    emacsabino
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 29/08/2011

    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  emacsabino 17/1/2012, 22:45

    fiz o que colocou e agora tá aparecendo isso:
    Erro em tempo de execução '3061'
    Parâmetros insuficientes. Eram esperados 1.
    avatar
    Convidad
    Convidado


    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  Convidad 17/1/2012, 23:00

    Cole aqui código que inseriu.

    Pode tentar sem os parênteses:

    Application.CurrentDb.Execute "UPDATE NomeDaTabela SET tab_NomeDaTabela.NomeDoControle = 0"
    avatar
    emacsabino
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 29/08/2011

    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  emacsabino 17/1/2012, 23:03

    O código foi colocado assim:
    Private Sub Form_Load()

    Application.CurrentDb.Execute "UPDATE Questões SET tab_Questões.Escolher =0"


    End Sub

    Questões é o nome da tabela, Escolher é o campo da tabela a qual coloquei a caixa para marcar

    Tá aparecendo o mesmo erro que te informei anteriormente
    avatar
    Convidad
    Convidado


    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  Convidad 17/1/2012, 23:14

    Tente:

    CurrentDb.Execute "UPDATE Questões SET Questões.Escolher = 0"
    avatar
    emacsabino
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 29/08/2011

    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  emacsabino 17/1/2012, 23:19

    Meu amigo, se você fosse meu vizinho, a gente ia tomar agora meia caixa de cerveja e comer uma boa picanha com macaxeira. Valeu cara, tava quebrando cabeça com isso e você vem e resolve meu problema. Um abraço e que Deus te abençoe sempre
    avatar
    emacsabino
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 190
    Registrado : 29/08/2011

    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  emacsabino 17/1/2012, 23:20

    Resolvido
    avatar
    Convidad
    Convidado


    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  Convidad 17/1/2012, 23:25

    Pô, que pena que não somos vizinhos!

    Agradeço o retorno. Abraço!

    Conteúdo patrocinado


    [Resolvido]Caixa de Seleção Empty Re: [Resolvido]Caixa de Seleção

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/5/2024, 22:34