Need macro to insert text string while inside cell (formula)

[KHashmi316]

I need a macro that will insert a text string (specifically "<br><br") while I'm editing the formula content of a cell.

I got this far:

Sub text()

ActiveCell.FormulaR1C1 = "<br><br>"

End Sub

But this simply replaces a cell's content. I need the macro to insert the text string where the cursor is in the cell (formula).

Sorry if the solution to this problem is simple. I don't have much expereince with macro programming.

Thx for any info you can provide.

-KH

[BrianB]

Like this :- ??
ActiveCell.Value = "<br>" & ActiveCell.Formula & "<br>"