COPIAR TEXTO DO RICH TEXTBOX COM FORMAT
Boa tarde, estou usando um controle richtxt com formato de font, negrito, sublinhado e cor, preciso transportar o texto formatado para um arquivo do word existente, atravez de indicadores, exemplo:
Dim objDoc As Word.Document, objWord As Word.Application
Set objWord = New Word.Application
Set objDoc = objWord.Documents.Open(App.path & [Ô]\arquivodoword[Ô], , True)
objDoc.Activate
objDoc.Bookmarks([Ô]camponoword[Ô]).Range.Text = richTexto.text
a questao é q o texto perde a formatação (cor, negrito, sublinhado....)
alguem sabe como fazer isso
desde já agradeço.
Dim objDoc As Word.Document, objWord As Word.Application
Set objWord = New Word.Application
Set objDoc = objWord.Documents.Open(App.path & [Ô]\arquivodoword[Ô], , True)
objDoc.Activate
objDoc.Bookmarks([Ô]camponoword[Ô]).Range.Text = richTexto.text
a questao é q o texto perde a formatação (cor, negrito, sublinhado....)
alguem sabe como fazer isso
desde já agradeço.
ninguem sabe?
é fácil abra um documento do word vá em macros e gravar macro, depois formate da forma desejada e pare a gravação de macro, vá novamente em macro clique em editar a macro que criou e copie o código lá existente.
Com macros o formato fica em texto digitado, no meu caso o texto é variavel, pois o usuario pode digitar no RichTexto:
Balão na cor [txt-color=#0000f0]AZUL[/txt-color]. ou Balão na cor [txt-color=#e80000]vermelha[/txt-color]
O que eu quero é q no word a palavra azul sai na cor azul e em negrito e com a palavra vermelho a mesma coisa.
Balão na cor [txt-color=#0000f0]AZUL[/txt-color]. ou Balão na cor [txt-color=#e80000]vermelha[/txt-color]
O que eu quero é q no word a palavra azul sai na cor azul e em negrito e com a palavra vermelho a mesma coisa.
Desculpe a insistencia é que ainda nao encontrei, alguem sabe?
se você salvar no richtext como rtf, poderá abrir coma mesma formatação
Não é salvar, é assim:
Tenho um contrato digitado no word, nesse contrato tenho indicadores, nesses indicadores via o codigo do vb antes mencionado, insiro textos vindos de varios richtext do vb q estao formatados de acordo com o gosto de cada cliente, porem a propriedade richtext.text nao traz o texto formatado.
Tenho um contrato digitado no word, nesse contrato tenho indicadores, nesses indicadores via o codigo do vb antes mencionado, insiro textos vindos de varios richtext do vb q estao formatados de acordo com o gosto de cada cliente, porem a propriedade richtext.text nao traz o texto formatado.
então colega no word salve como rtf ou formato rich text, e abra diretamente no richtextbox o que vai te mostrar o texto formatado.
isso se for o caso de você querer mostrar o texto formatado no rich textbox
ou seja depois de criar o contrato salve-o como richtext e tudo dará certo
RichTextBox1.LoadFile [Ô]c: este.rtf[Ô]isso se for o caso de você querer mostrar o texto formatado no rich textbox
ou seja depois de criar o contrato salve-o como richtext e tudo dará certo
Tópico encerrado , respostas não são mais permitidas