Userform, transfer string to cell, preserve formatting

With this form, it allows cells to be modified (via a userform) to add certain characters such as Greek letters. It works quite well.
Is there a way to type in characters on the form and transfer to cell.
The criteria is that: Formatting in the cell needs to be preserved, such as text colour and font height.


MODULE CODE

Please Login or Register  to view this content.

CLASS MODULE ClassFormulasDelegate

Please Login or Register  to view this content.

CLASS MODULE ClassFormulasEvents

Please Login or Register  to view this content.

FORM CODE

Please Login or Register  to view this content.

I've gotten to the point where characters are automatically transferred to cell, as you type in the userform textbox.
The outstanding part is: Formatting in the cell needs to be preserved. I would allow only for the font property to be stored, forgetting about other properties. See "Sub transfer()" in form code. I'm guessing an array is needed to store font of each character.

MODULE

Please Login or Register  to view this content.

CLASS MODULE ClassFormulasDelegate

Please Login or Register  to view this content.

CLASS MODULE ClassFormulasEvents

Please Login or Register  to view this content.

CLASS MODULE clsTextBox

Please Login or Register  to view this content.

FORM CODE

Please Login or Register  to view this content.

This seems to work if it helps anyone.