formatar valores  [Resolvido]

Visual Basic for Aplication e macros no Excel.
Regras do fórum
Sua dúvida foi respondida? Marque como RESOLVIDO em seus tópicos, usando o botão com marca verde. Imagem

formatar valores

Mensagempor JoseR » Sex Jan 17, 2020 11:21 am

bom dia,
Tenho o seguinte valor numa célula do excel (plan1.range("b12") = 82,00 e quero transforma-lo em 00008200 usando vba (macro). mas não faço ideia de como transformar.
obrigado
JoseR
Membro
Membro
 
Mensagens: 8
Registrado em: Qui Dez 05, 2019 11:26 am
Has thanked: 0 time
Have thanks: 0 time

{ SO_SELECT }

Re: formatar valores

Mensagempor klarc28 » Sex Jan 17, 2020 11:28 am

Código: Selecionar todos
Sub FormatarNumero()

    Plan1.Range("B12").Select
    Selection.NumberFormat = "000000"
End Sub
É estudando que se consegue. Quando quiser agradecer, clique no joinha. Marque como resolvido na parte que resolveu sua dúvida.
klarc28
Membro
Membro
 
Mensagens: 1328
Registrado em: Sáb Dez 09, 2017 12:33 am
Has thanked: 33 times
Have thanks: 555 times

Re: formatar valores

Mensagempor JoseR » Sex Jan 17, 2020 1:10 pm

fiz aqui (82,00) e o resultado foi 000082 precisaria que ficasse 008200 (respeitasse as casa decimais)
JoseR
Membro
Membro
 
Mensagens: 8
Registrado em: Qui Dez 05, 2019 11:26 am
Has thanked: 0 time
Have thanks: 0 time

Re: formatar valores (Resolvido)  [Resolvido]

Mensagempor JoseR » Ter Jan 21, 2020 3:06 pm

consegui fazendo o seguinte código:

Replace("'" & Format((Plan1.Range("b12").Value), "00000.00"), ",", "")

obrigado
JoseR
Membro
Membro
 
Mensagens: 8
Registrado em: Qui Dez 05, 2019 11:26 am
Has thanked: 0 time
Have thanks: 0 time


Voltar para VBA & Macros

Quem está online

Usuários navegando neste fórum: ewshaka e 2 visitantes