Hello from Steved
I am getting
Compile error:
Expected Identifier

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

Please help me I am trying my best to learn

Thankyou.

Steve,

Worked when I gave the Sub a name, and declared the variable x
''''''''''''''''
Sub test()
Dim x As Long
For x = 1 To 9
Cells(x, 1).Value = x & "-" & Cells(x, 1).Value
Next x
End Sub
'''''''''''''''''''
hth
--

steveB

(Remove 'NOSPAM' from email address if contacting me direct)


"Steved" wrote in message
...
Hello from Steved
I am getting
Compile error:
Expected Identifier

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

Please help me I am trying my best to learn

Thankyou.

Hello SteveB
Thankyou.

Now that it is working I would like to make a change,
as I have over 5000 rows.
Using your code would it be possible to customize it.
Col A , Col B, Col C the columns I use
Col A is only the column that requires the code to work in.

What I require it to do is as laid out below please.
Col A

City Change this to 1-City
Roskill Change this to 2-Rosk
Papakura Change this to 3-Papa
Wiri Change this to 4-Wiri
North Shore Change this to 5-Shor
Orewa Change this to 6-Orew
Swanson Change this to 7-Swan
Panmure Change this to 8-Panm
Waiheke Change this to 9-Waih

The issue is that any of the above could be anywhere in
Col A.

Thankyou.








-----Original Message-----
Steve,

Worked when I gave the Sub a name, and declared the
variable x
''''''''''''''''
Sub test()
Dim x As Long
For x = 1 To 9
Cells(x, 1).Value = x & "-" & Cells(x, 1).Value
Next x
End Sub
'''''''''''''''''''
hth
--

steveB

(Remove 'NOSPAM' from email address if contacting me
direct)


"Steved" wrote in
message
...
Hello from Steved
I am getting
Compile error:
Expected Identifier

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

Please help me I am trying my best to learn

Thankyou.



.

I have reposted this, please refer to the new posting.

Thankyou.

-----Original Message-----
Hello SteveB
Thankyou.

Now that it is working I would like to make a change,
as I have over 5000 rows.
Using your code would it be possible to customize it.
Col A , Col B, Col C the columns I use
Col A is only the column that requires the code to work
in.

What I require it to do is as laid out below please.
Col A

City Change this to 1-City
Roskill Change this to 2-Rosk
Papakura Change this to 3-Papa
Wiri Change this to 4-Wiri
North Shore Change this to 5-Shor
Orewa Change this to 6-Orew
Swanson Change this to 7-Swan
Panmure Change this to 8-Panm
Waiheke Change this to 9-Waih

The issue is that any of the above could be anywhere in
Col A.

Thankyou.








-----Original Message-----
Steve,

Worked when I gave the Sub a name, and declared the
variable x
''''''''''''''''
Sub test()
Dim x As Long
For x = 1 To 9
Cells(x, 1).Value = x & "-" & Cells(x, 1).Value
Next x
End Sub
'''''''''''''''''''
hth
--

steveB

(Remove 'NOSPAM' from email address if contacting me
direct)


"Steved" wrote in
message
.. .
Hello from Steved
I am getting
Compile error:
Expected Identifier

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

Please help me I am trying my best to learn

Thankyou.



.

.

Steved,

You need to give your subroutine a name -- that's the identifier the
compiler is looking for.

Sub MyRoutine()
....

By the way, you don't need the ".Value" on the right side of the equation.
This will work just as well, and may help you avoid problems in some
situations:

Cells(x, 1) = x & "-" & Cells(x, 1).Value

Good luck!

-- David



"Steved" wrote in message
...
Hello from Steved
I am getting
Compile error:
Expected Identifier

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

Please help me I am trying my best to learn

Thankyou.