MaximoAccess

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

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Inserir um valor negativo

    Compartilhe
    avatar
    josé waldick
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 35
    Registrado : 06/06/2017

    [Resolvido]Inserir um valor negativo

    Mensagem  josé waldick em 9/8/2017, 21:27

    Como faço para inserir um valor negativo?
    Código:
    Dim dblValor As Double
    On Error Resume Next
    dblValor = Replace(Replace(Me!saldoanterior.Text, ".", ""), ",", "")
    Me!saldoanterior = Format(dblValor / 100, "R$ #,##0.00")
    Me!saldoanterior.SelStart = Len(Me!saldoanterior)


    .................................................................................
    Deus é bom e fiel!
    avatar
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1137
    Registrado : 05/02/2010

    Inserir um valor negativo

    Mensagem  good guy em 15/8/2017, 16:53

    Olá José,

    Veja se é o que pretende com a função Abs.

    Código:

    Dim dblValor As Double
    On Error Resume Next
    dblValor = Replace(Replace(Me!saldoanterior.Text, ".", ""), ",", "")
    Me!saldoanterior = Abs(Format(dblValor / 100, "R$ #,##0.00"))
    Me!saldoanterior.SelStart = Len(Me!saldoanterior)
    avatar
    josé waldick
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 35
    Registrado : 06/06/2017

    Re: [Resolvido]Inserir um valor negativo

    Mensagem  josé waldick em 15/8/2017, 20:37

    Ok!


    .................................................................................
    Deus é bom e fiel!
    avatar
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1137
    Registrado : 05/02/2010

    Inserir um valor negativo

    Mensagem  good guy em 15/8/2017, 21:38

    Olá José,

    Estude outras funções correlatas aqui:

    [Você precisa estar registrado e conectado para ver este link.]
    avatar
    josé waldick
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 35
    Registrado : 06/06/2017

    Re: [Resolvido]Inserir um valor negativo

    Mensagem  josé waldick em 15/8/2017, 21:40

    Obrigado, meu amigo!


    .................................................................................
    Deus é bom e fiel!

      Data/hora atual: 23/6/2018, 15:04