MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

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]< (Menor que ...)

    avatar
    iGuihP
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 02/05/2019

    [Resolvido]< (Menor que ...) Empty [Resolvido]< (Menor que ...)

    Mensagem  iGuihP em Qua 22 Maio 2019 - 22:21

    Olá.. bom, eu estou projetando um sisteminha, nele eu queria que quando colocassem "PRAZO DO CONTRATO" e "PRAZO EM ABERTO" (No caso ele vai subtrair) e vai sobrar "PRAZO RESTANTE À PAGAR", quando prazo restante á pagar fosse menor que 16 ele bloqueia
    No caso eu fiz desse jeito:


    If Me.PEA1.Value < "16" Then
    MsgBox "Não disponivel"
    Me.Undo
    End If



    Funcionou, porém só até prazo "9", ele não deixou eu colocar o prazo 16 ao 9.
    Se eu coloco 8, vai normal.. eu queria bloquear também.


    Alguém help-me?


    Última edição por iGuihP em Qua 22 Maio 2019 - 22:28, editado 2 vez(es)
    avatar
    iGuihP
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 02/05/2019

    [Resolvido]< (Menor que ...) Empty Re: [Resolvido]< (Menor que ...)

    Mensagem  iGuihP em Qui 23 Maio 2019 - 0:15

    Resolvido!
    Percebi que havia um erro no meio do código.

      Data/hora atual: Sex 14 Ago 2020 - 2:32