Tenho um documento no Word 2003, no qual utilizo mala direta.
Esse documento faz recibos, até ai tudo OK.
O problema é o valor por extenso.
Já consigo calcular o valor por extenso baseado no campo valor do registro atual da mala direta.
Isso é feito pela seguinte macro:
Sub CalculaValorE()
ActiveDocument.FormFields("ValorE").Result = Extenso(ActiveDocument.MailMerge.DataSource.DataFields("Valor").Value)
'Extenso é uma função que transforma o valor em extenso
End Sub
Como faço essa macro ser executada cada vez em que eu mudar de registro no documento, ou se for possivel, jogar o campo por extenso quando eu mesclar para um novo documento.
Pergunta
jcs
Olá pessoal, uma boa tarde.
Tenho um documento no Word 2003, no qual utilizo mala direta.
Esse documento faz recibos, até ai tudo OK.
O problema é o valor por extenso.
Já consigo calcular o valor por extenso baseado no campo valor do registro atual da mala direta.
Isso é feito pela seguinte macro:
Sub CalculaValorE() ActiveDocument.FormFields("ValorE").Result = Extenso(ActiveDocument.MailMerge.DataSource.DataFields("Valor").Value) 'Extenso é uma função que transforma o valor em extenso End SubComo faço essa macro ser executada cada vez em que eu mudar de registro no documento, ou se for possivel, jogar o campo por extenso quando eu mesclar para um novo documento.
Editado por jcsLink para o comentário
Compartilhar em outros sites
0 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.