TextBox_BeforeUpdate, TextBox_Change

I have a userform that takes cell contents, allows editing in the userform and transfers contents back to the cell as you type. The font is preserved as well.
It works except for the instance described: If part of the string is selected/highlighted and the user types in character/s to overwrite the text, the fonts are lost.
I wanted to account for this by using the ".SelLength" property to back-calculate the fonts (.SelLength counts the number of characters highlighted).
The issue is that the information is lost on a "TextBox_Change" event (.SelLength goes to zero).
I have tried to resolve by using the "TextBox_BeforeUpdate" method but don't know how to do it.

Will it be possible?


FORM CODE

Please Login or Register  to view this content.

CLASS MODULE clsTextBox

Please Login or Register  to view this content.

I will leave out BeforeUpdate then.
With the Keydown event, I need help with the code.

This has given me something to work with. I will spend some time looking into it further.

How can I pass the value of "MyTextBox.SelLength" in the class module to the code in the form (to "Sub transfer()").

But how sir?

Thank you very much.
Yes, most of the code is written by others.

See the attached for solution.
I have two change events in the class module, one as per post #9. I had to use two Subs to transfer.