LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3
Default Deleting rows that meet criteria

Hi, I know little about VBA but know a macro can really speed up a
tedious weekly task, if only I can figure out how to write it.
What I need: I have a report imported into Excel. This report
contains several headers that are repeated throughout and I want to
delete those rows. From browsing the newsgroup I found this sample
code:

Public Sub SelectiveDelete()
Dim LRowData As Long, ir As Long


With Sheets("Sheet1")
' detect last row of data in column A
LRowData = .Cells(Rows.Count, "A").End(xlUp).Row


' scan list testing if the value is in range
For ir = LRowData To 1 Step -1
If Trim(.Cells(ir, 1).Value) = "A/C No" Or _
Trim(.Cells(ir, 1).Value) = "Report Total" Or _
InStr(1, Trim(.Cells(ir, 2).Value), "@") 0 Or _
Len(Trim(.Cells(ir, 2).Value)) = 0 _
Then .Rows(ir).Delete Shift:=xlUp
Next ir
End With

End Sub

This works except that I will need to add more Value Lines with my
criteria; I know how to do that.
However, I do not need to look for anything in Column B yet if I get
rid of those lines, it comes up with a syntax error. What do I need
for the last three lines if all I want is to delete rows that have
specific values in Column A as in the two lines with Trim....

Also, it appears that one of the rows that is imported that I want to
delete has a character that looks like a check box in it (and that is
all) Anyone know how to type this in Excel?

Thanks for any help, Bevin B.

 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Counting characters in multiple rows when rows meet specific criteria news.virginmedia.com Excel Worksheet Functions 3 June 28th 08 09:03 PM
count rows that meet certain criteria klp Excel Discussion (Misc queries) 3 August 28th 07 05:10 PM
Need help please for deleting rows that does not meet several criteria Alib Excel Programming 2 March 3rd 07 03:33 PM
Deleting/IDing Rows that Don't Meet Criteria LittleAndLost Excel Worksheet Functions 1 November 3rd 04 07:21 PM
Deleting/IDing Rows that Don't Meet Criteria LittleAndLost Excel Worksheet Functions 2 November 3rd 04 01:32 PM


All times are GMT +1. The time now is 07:05 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"