Add character before 1st letter of string

[al007]

How can I add character e.g: ' before 1st letter of words in selected
cells (multiple selection).
Can anybody help pls ( as I would like to convert some numbers into
text format)
Thxs

 

[Leith Ross]

Hello al007,

Here's how...

Code
-------------------

Sub Test()

Dim Rng As Range

Set Rng = Application.Selection

For Each Cell In Rng
Cell.Value = "'" & Cell.Value
Next Cell

End Sub