MACRO NO WORD.....AJUDA..!!

PASCOAL 14/03/2010 07:49:01
#336910
Tenho essa rotina abaixo para fazer a macro no word mas esta dando um erro que o campo é string e to mandando numerico, como faço ?

With OLE1
.CreateEmbed Caminho & [Ô]Contratos\Contrato_Orto_Ortodonto.DOC[Ô]
.object.Activate
With .object.Application.Selection.Find
.Execute _
[Ô]MyNomePaciente[Ô], _
False, False, False, False, _
True, True, 1, False, _
My_Nome_R_Paciente, 2

.Execute _
[Ô]MyValorManuten1[Ô], _
False, False, False, False, _
True, True, 1, False, _
Format(Str(MyVallorMensal), [Ô]###,#0.#0[Ô]), 2
End With
.DoVerb vbOLEOpen
End With

Como de devo fazer?

Obrigado
DAVERSON 14/03/2010 15:53:24
#336932 Resposta escolhida

Format(CStr(MyVallorMensal), [Ô]###,#0.#0[Ô]), 2
PASCOAL 14/03/2010 16:54:06
#336934
OLHA O ERRO QUE ESTA DANDO AINDA
DAVERSON 16/03/2010 16:50:53
#337104

CStr(Format((MyVallorMensal), [Ô]###,#0.#0[Ô]) )
PASCOAL 16/03/2010 22:41:57
#337128
CONTINUA COM O MESMO ERRO

OBRIGADO
Tópico encerrado , respostas não são mais permitidas
Voltar