How to make a macro run on the next cell

[gmoexcel]

I created a macro to delete the first 9 characters of a cell in a
particular column, now I want the macro to work on the rest of the
cells in that column down to cell 650. How do I do this??

 

[Dave Peterson]

Try recording a macro when you:
Select the range
data|text to columns
fixed width
(draw a line after the 9th character and remove any that excel guessed at)
Choose to skip the first field

I think you'll find this kind of macro works faster than looping through the
cells.

 

[Guest]

This is just sample code. I will start with Z100. This changes one cell:


Sub Macro1()
Dim s As String
s = Cells(100, 26).Value
Cells(100, 26).Value = Right(s, Len(s) - 9)
End Sub

This starts with row 100 and runs down another 650 cells:


Sub macro2()
Dim s As String
For i = 100 To 750
s = Cells(i, 26).Value
Cells(i, 26).Value = Right(s, Len(s) - 9)
Next
End Sub