Add formatted symbol after text, keeping character formats of pre-existing text

Viewed 2613

I want to insert a red tick (or down arrow) after the existing text in a cell.

How do I insert the characters and retain the pre-existing character formats in the cell? Where I have bold, underlined or coloured only some of the words inside those cells.

The generally suggested code reverts all customised character formatting of the original cell contents to the cell font format.

ActiveCell.FormulaR1C1 = ActiveCell & " P "
2 Answers
Related