Find and Replace with formatting

[celmg]

I'm trying to replace the occurrences of "#" to a superscript number sign? Is this doable?

 

[Andrew Poulsom]

Do you mean make the # superscript?

 

[celmg]

Yes, make the # superscript.

 

[Andrew Poulsom]

I don't know how without VBA, but here is a macro:

Sub Test()
    Dim Rng As Range
    Dim c As Range
    Dim x As Integer
    Set Rng = Selection.SpecialCells(xlCellTypeConstants, 2)
    For Each c In Rng
        x = InStr(1, c.Value, "#")
        If x > 0 Then
            c.Characters(Start:=x, Length:=1).Font.Superscript = True
        End If
    Next c
End Sub

If you select a single cell and run the code it will convert all text cells on the sheet. If you select a range and run the code it will convert the text cells in the selected range.