[Resolvido]Formatar campo para envio de e-mail

Ola,

Preciso formatar um campo  Valor do Risco no qual insiro os dados no formulario e clico em enviar email.

ele nao está indo formatado e nem com separadores.

Na tabela ele está como u. monetaria.

Dim OutApp As Object
Dim OutMail As Object

Set OutApp = CreateObject("Outlook.Application")

OutApp.Session.Logon

Set OutMail = OutApp.CreateItem(0)
With OutMail
.To = Me.txtpara
.Subject = "Solicitação de Cotação - " & "Pedido:" & Forms!Frm_Pedido!Pedido
.Body = "Prezado Prestador" & vbCrLf & vbCrLf _
           & vbCrLf & "Dados do Pedido" & vbCrLf _
 & "Pedido:  " & Forms!Frm_Pedido!Pedido & vbCrLf _
 & "Valor do Risco: " & Forms!Frm_Pedido!Valor_risco & vbCrLf _

 .Send
End With

Set OutMail = Nothing
Set OutApp = Nothing
hora_envio_email = Date

End Sub

Bom dia !

Poderia disponibilizar o projeto ?

Danilo,

Consegui,

Retirei o que estava antes e coloquei ele formatando e funcionou.

& "Valor do Risco: " & Format(Forms!Frm_Pedido!Valor_risco, "#,##0.00") & vbCrLf _

Ótimo parabéns!