Página 1 de 1

Macro - Divide o Número da Célula por Mil

Enviado: 14 Jan 2019 às 10:00
por JacqueGomes6
Boa tarde pessoal,

Estou montando uma macro para organizar as informações de todas as abas de uma planilha.
Após organizar as informações nas colunas corretas, preciso substituir os espaços para que eu consiga somar os números das células. Quando faço isso "à mão" (entro em substituir, colo o espaço e coloco substituir tudo) dá certo. Quando faço pela macro, ela divide os números das células por mil.

Podem me ajudar, por favor, a fazer com que a macro não divida os números por mil?
Será que isso pode ser por conta da configuração dos separadores de milhares em inglês (vírgula) e português (ponto)?

Cells.Replace What:=" ", Replacement:="", LookAt:=xlPart, SearchOrder:= _
xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

Re: Macro - Divide o Número da Célula por Mil

Enviado: 14 Jan 2019 às 12:18
por Jimmy
Olá Jacques,

Não podemos olhar a macro porque ela não veio. Você mandou o arquivo no formato XLSX!!!

Se mandar, poderemos olhar o que a macro faz e descobrir o problema.
Se não puder mandar por questões de sigilo, posso te dar uma ideia, meio que no chute, para você tentar.
Código: Selecionar todos
Sub asd()
Range("C4").Value = Replace(Range("C4").Value, " ", "")
End Sub
  • Digite em C4 um valor cheio de espaços no início, meio e fim.
  • Rode a macro
  • Verifique como ficou a célula C4
Jimmy San Juan

Re: Macro - Divide o Número da Célula por Mil

Enviado: 14 Jan 2019 às 12:20
por babdallas
Veja se é isto.