How to insert data into a cell that is already populated?

[RobbieL]

Hi,

I have a list of 2700 cells with references in. For reporting purposes, I need these references to begine with "ID" however at present they do not.

How can I insert ID at the beginning of each reference without doing it manually?

E.g. Instead of 1234567 it shoudl read ID 1234567 and so on.

Thanks in advance

 

[MartinL]

Are the cells in random places or in a single column/row

 

[RobbieL]

They are in a single column (A)

 

[Legacy 68668]

try

Sub test()
    With Range("a2", Range("a" & Rows.Count).End(xlUp))
        .Value = Evaluate("if(" & .address & "<>"""",""ID ""&" & .address & ","""")")
    End With
End Sub

 

[MartinL]

If you are not happy with VBA
In a blank column type ="ID "&A1
copy this down to the bottom then copy and paste special Values over the top

 

[RobbieL]

Many thanks for all your help!!

It is much appreciated as always.