Thread: End of Sheet
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips Bob Phillips is offline
external usenet poster
 
Posts: 10,593
Default End of Sheet

LastRow = Cells(Rows.Count,"A").End(xlUp).Row

when deleteing, work bottonm up

For i = LastRoiw to 1 Step -1
If Cells(i,"A").Value = "£" Or _
Cells(i,"A").Value = "*" Then
Rows(i).delete
End If
Next i

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"RSteph" wrote in message
...
Is there any kind of End of Sheet indicator (like an EOF value) With VBA

with
Excel? I've got a .csv file that lists a number of purchases. There are
certain rows that I want to remove from the file, some sub total rows and
what not.

The easiest way I can think of to handle that is to cycle through column

'C'
(where the order number is located) and if that column is blank, or has an

*
in it, then I know I can delete it. The size of the file will vary

depending
on the date range that was used in creating the .csv. So I was wondering

if
there was an easy way to figure out where the last row with any data in it
is, or if I need to just use a row number that I know will never be

reached
(i.e. 2000)?

Thank you in advance for any help offered.