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

5 participantes

    [Resolvido]Comparar dois valores e apagar o menor

    avatar
    peixeweb
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 03/02/2011

    [Resolvido]Comparar dois valores e apagar o menor Empty [Resolvido]Comparar dois valores e apagar o menor

    Mensagem  peixeweb 11/4/2011, 22:31

    Como faço para o access Comparar 02 valores, apagar o menor e colocar o maior no lugar do mesmo ?

    ex: tenho cammpo a1 e a2 , guando a2 for > a1 ele apaga o que tem em a1 automaticamento e colocar o que tem em a2.....
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido]Comparar dois valores e apagar o menor Empty Re: [Resolvido]Comparar dois valores e apagar o menor

    Mensagem  vieirasoft 12/4/2011, 00:28

    If a2.Value>a1.Value Then
    a1.Value=a2.Value
    End If

    Pode fazer através de um botão de comando ou outro evento.

    Não esqueça de prever erros.O que lhe passei é síntese apenas
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]Comparar dois valores e apagar o menor Empty Re: [Resolvido]Comparar dois valores e apagar o menor

    Mensagem  Dilson 12/4/2011, 12:51

    Olá,

    Título do tópico foi modificado para facilitar a ferramenta de buscas.

    Cumprimentos.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8272
    Registrado : 05/11/2009

    [Resolvido]Comparar dois valores e apagar o menor Empty Re: [Resolvido]Comparar dois valores e apagar o menor

    Mensagem  Alexandre Neves 12/4/2011, 21:46

    Boa noite,

    Se forem muitos registos, utilize
    Currentdb.execute "UPDATE Tabela SET a1=a2 WHERE a2>a1;"
    Cumprimentos,
    avatar
    peixeweb
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 03/02/2011

    [Resolvido]Comparar dois valores e apagar o menor Empty Comparação

    Mensagem  peixeweb 15/4/2011, 15:38

    Oi amigos gostaria de mais detalhes...como usar principalmente o ultimo codico 'seria em apos atualizar sou leigo" a função teria q limpa o campo e colocar o outro dado no luguar o primeiro codico colocar mas não limpa o campo acoplado...tem que limpa....
    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]Comparar dois valores e apagar o menor Empty Re: [Resolvido]Comparar dois valores e apagar o menor

    Mensagem  criquio 15/4/2011, 17:12

    Uma dúvida: vai apenas colocar o valor de a2 em a1 quando for maior? Então se a1 for maior que a2 não iguala? Ou essa hipótese não existirá?


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


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 03/02/2011

    [Resolvido]Comparar dois valores e apagar o menor Empty atribuir valores

    Mensagem  peixeweb 18/4/2011, 13:45

    oi bom dia....

    não essa hipóteses não existe....sempre que a2 for maior vai pro luguar do menor e o que tem em a1 tem apagar automaticamente e receber o valor de a2, por favor me responda com riqueza de detalhes, em que opção entra no formulario e como fazer.....obrigado....
    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]Comparar dois valores e apagar o menor Empty Re: [Resolvido]Comparar dois valores e apagar o menor

    Mensagem  criquio 18/4/2011, 14:04

    Uma segunda pergunta: existem muitos registros a serem alterados na tabela ou você vai precisar disso para registros que ainda serão adicionados? Para o primeiro caso, basta colocar a sugestão do Alexandre em prática, em um evento que melhor lhe convier. Para o segundo caso, a dica do Vieira vai funcionar a contento, acredito.


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


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 03/02/2011

    [Resolvido]Comparar dois valores e apagar o menor Empty códico

    Mensagem  peixeweb 18/4/2011, 15:01

    fiz mas não deu certo...explicando...

    Private Sub Recuperação1Simestre_AfterUpdate()
    CurrentDb.Execute "UPDATE Tabela SET Méd1=Recuperação1Simestre WHERE Méd1End Sub

    Méd1 tem o resultado de de duas notas dividido olhe : Méd1: ([1ª N]+[2ª N])/2 em propiedade de formulario/dados, não deu erro e nem fez, tinha que limpa o dado do campo e colocar a maior....
    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]Comparar dois valores e apagar o menor Empty Re: [Resolvido]Comparar dois valores e apagar o menor

    Mensagem  criquio 18/4/2011, 15:19

    Esse método que está usando seria para atualizar os registros da tabela, mas ao que parece você quer fazer essa mudança no registro corrente no formulário. Aí seria a dica do Vieira.


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


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 03/02/2011

    [Resolvido]Comparar dois valores e apagar o menor Empty códico

    Mensagem  peixeweb 18/4/2011, 15:35

    não deu certo...sou principiante...não seu como fazer.. obs...

    Private Sub Recuperação1Simestre_AfterUpdate()
    If Recuperação1Simestre.Value > Méd1.Value Then
    Recuperação1Simestre.Value = Méd1.Value
    End If
    End Sub


    não deu erro e nem fez....estou em apos atualiza o campo reculperação1simestre vou mandar a tabela e o formulario
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido]Comparar dois valores e apagar o menor Empty Re: [Resolvido]Comparar dois valores e apagar o menor

    Mensagem  vieirasoft 18/4/2011, 21:18

    Boa tarde

    Amigo, faça isso por exemplo a partir de outro campo no evento ao sair desse campo
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7305
    Registrado : 11/05/2010

    [Resolvido]Comparar dois valores e apagar o menor Empty Re: [Resolvido]Comparar dois valores e apagar o menor

    Mensagem  vieirasoft 19/4/2011, 21:14

    E aí amigo, deu certo?

      Data/hora atual: 27/1/2023, 05:01