Quote:
Originally Posted by Cosmo
This might work:
Code:
oRow.Cells(1).Range.FormattedText = DescriptionBox.TextRTF
|
This code is logically identical to the code segment I've just provided. I have made some progress, though not necessarily in the right direction. The following code does not produce a type-mismatch error, but it does the same thing it did initially (it dumps all the formatting info into the cell, which looks stupid)
Code:
oRow.Cells(1).Range.FormattedText.Text = Descriptionbox.TextRTF
When the user puts something like:
into the rich text box, it dumps this:
{\rtf1\ansi\ansicpg1252\deff0\deflang1033{\fonttbl {\f0\fnil\fcharset0 Tahoma;}{\f1\fnil\fcharset2 Symbol;}}
{\*\generator Riched20 12.0.6606.1000;}\viewkind4\uc1
\pard{\pntext\f1\'B7\tab}{\*\pn\pnlvlblt\pnf1\pnin dent0{\pntxtb\'B7}}\fi-360\li360\f0\fs17 This is an example\fs17
\par }
into the cell.