>I have RTF text (like: {\rtf1\ansi\ansicpg1252\deff0\deftab720{\fonttbl{\f0\fswiss MS Sans Serif;}...) in a field. I am trying to write automation code to paste that text into Word as formatted text.
>
>I can get the text, unformatted, to paste and I can get the RTF code itself (like above) to paste, but not the formatted text that the code represents. If I try using the clipboard, it seems like the clipboard does not recognize that the text is RTF code - so I do not get the Paste Special option for "Formatted Text (RTF)" in Word as I would if I just did Ctrl-C in the RTF ActiveX control. Using .TextRange.PasteSpecial(,,,,wdPasteRTF) returns an error.
Roger,
If you do it via clipboard word would get as a plain text. Instead temporarily write it to a file and open the file in word :
lcRTF = mytable.myfield
lcFiel = "c:\mypath\myrtf.rtf"
handle=fcreate(lcFile)
=fwrite(handle,lcRTF,len(lcRTF))
=fclose(handle)
oWord = createobject("Word.Application")
with oWord
.Documents.Open(lcFile)
endwith
Cetin