Boa dia!!

Não olhei seu arquivo mas tente.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    TextBox1 = Format(TextBox1, "$#,##0.00")
End Sub

Boa dia!!

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    TextBox1 = Format(TextBox1, "$#,##0.00")
End Sub

Não deu não , o seu código não aparece a informação de numero armazenado como texto p; porem a soma em RELATÓRIO H8001 dá zero ,não sei se tem algo a ver mas o valor em TextBoxValV ; não é digitado ele é preenchido automaticamente , mas não deu.

ai tentei o seguinte ActiveCell.Offset(0, 5).Value = Format(TextBoxValV, "$#,##0.00") que não sei se foi certo mas foi a tentativa de onde o valor esta sendo inserido na plan como texto , converte-lo em numero , mas tbem não deu.

Um textbox por default formece valores como string; ao salvar esse valor em uma planilha, caso o excel interprete a informação como um valor irá salva-lo como tal.
Uma maneira pode ser utlilizar uma das funções de converção (como cDec ou cur)
Tente:ActiveCell.Offset(0, 5).Value = cCur(TextBox1.Value).
Obs.: Verifique tambem se as celulas que recebem os valores estao formatadas como numero e nao texto

Na mosca Reinaldo. Poderia só me traduzir o que é cCur e cDec , quando usar um e outro?

Claudinei, as diferenças básicas são em relação à range numerica atingida, e numero de virgulas.no modulo onde está o termo; Posicione o cursor sobre cCur(oucDec) e pressione F1, irá abrir o help onde tem info sobre essas e mais funções de converção.

Claudinei, sei que faz tempo mas esclarecendo:

cCur = convert to Currency (converter valor como moeda)
cDec = convert to Decimal (converter valores como decimal, ou seja, número acompanhado de casas decimais).

Espero ter ajudado.

Um abraço.