How to make a macro run on the next cell
 

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??


--
gmoexcel
------------------------------------------------------------------------
gmoexcel's Profile: http://www.excelforum.com/member.php...o&userid=23324
View this thread: http://www.excelforum.com/showthread...hreadid=509496

How to make a macro run on the next cell
 

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.

gmoexcel wrote:

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??

--
gmoexcel
------------------------------------------------------------------------
gmoexcel's Profile: http://www.excelforum.com/member.php...o&userid=23324
View this thread: http://www.excelforum.com/showthread...hreadid=509496

--

Dave Peterson

How to make a macro run on the next cell
 

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

--
Gary's Student


"gmoexcel" wrote:


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??


--
gmoexcel
------------------------------------------------------------------------
gmoexcel's Profile: http://www.excelforum.com/member.php...o&userid=23324
View this thread: http://www.excelforum.com/showthread...hreadid=509496