Hello from Steved

I was kindly given the below code I copied it and alt F11
and pasted it.

I understand what it is supposed to do for example if cell
A1 says "City" it gets changed to "1-City"

The problem is I can not get it to work please help
Thankyou.

For x = 1 To 9
Cells(x, 1).Value = x & "-" & Cells(x, 1).Value
Next x