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 : 30
    Registrado : 06/06/2017

    [Resolvido]Inserir um valor negativo

    Mensagem  josé waldick em Qua 09 Ago 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 : 1043
    Registrado : 05/02/2010

    Inserir um valor negativo

    Mensagem  good guy em Ter 15 Ago 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 : 30
    Registrado : 06/06/2017

    Re: [Resolvido]Inserir um valor negativo

    Mensagem  josé waldick em Ter 15 Ago 2017, 20:37

    Ok!


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

    Respeito às Regras 100%

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

    Inserir um valor negativo

    Mensagem  good guy em Ter 15 Ago 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 : 30
    Registrado : 06/06/2017

    Re: [Resolvido]Inserir um valor negativo

    Mensagem  josé waldick em Ter 15 Ago 2017, 21:40

    Obrigado, meu amigo!


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

      Data/hora atual: Ter 21 Nov 2017, 17:35