Thread
:
For..Next loop error
View Single Post
#
7
Posted to microsoft.public.excel.programming
Ian_Limbo[_2_]
external usenet poster
Posts: 7
For..Next loop error
If i am deleting rows in a column, which is what appears to be happening,
where does the column limit problem come in?
"Don Guillett" wrote:
Maybe because there are no more columns after 255???
--
Don Guillett
SalesAid Software
"Ian_Limbo" wrote in message
...
I am attempting to compress a column of data by deleting blank cells that
has
lots of gaps in it. It errors at no. 256 on the for loop.
The code i am using is:
Sub CommandButton1_Click()
Dim i As Double
Dim cellcontent As String
Range("A2").Select
MsgBox "Cell selected"
For i = 2 To 2150 Step 1
cellcontent = Sheets("Selection List").Cells(1, i)
Do While ActiveCell.Value = ""
Selection.Delete
Loop
ActiveCell.Offset(1, 0).Select
Next i
MsgBox "Selection list complete"
End Sub
All help is gratefully received (this is my first attempt at VBA)
Ian
Reply With Quote
Ian_Limbo[_2_]
View Public Profile
Find all posts by Ian_Limbo[_2_]