About Us

Karen

Thank you VERY much for your help

"StumpedAgain" wrote:

You could also do the following which looks for the bold format:

Sub ForKaren()

Dim curselection As Range

Set curselection = Range("E2") 'or wherever your values start

Do Until curselection = ""

If curselection.Font.Bold = True Then
Set curselection = curselection.Offset(1, 0)
Else:
Set curselection = curselection.Offset(1, 0)
curselection.Offset(-1, 0).EntireRow.Delete
End If

Loop

End Sub

--
-SA

"Karen" wrote:

Using Excel 2003

I have an Excel report that has over 2,000 rows. I want to delete the rows
where the text/numbers are NOT bold and keep the ones that ARE bold. Im not
sure if this is possible. If this cannot be done based on that criterion, the
rows I want to keep all have a number value in column E. Maybe it's possible
to isolate only the rows that have a value in column E. Im not sure how to
do this.

I would sort the records, but some of the cells I dont want are merged. At
least all of the rows I want to keep do not have any merged cells. Is this
possible? The range of data is A2:E2169.

Any help would be greatly appreciated €“ Thanks, Karen

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Sorting and Deleting Help	LOU	Excel Worksheet Functions	2	August 28th 07 09:42 PM
Deleting cell data without deleting formula	Tom Hall	Excel Discussion (Misc queries)	4	October 29th 06 04:07 PM
Deleting data by sorting dates	drc	Excel Discussion (Misc queries)	1	October 2nd 06 06:33 PM
Sorting and deleting empty cells	asianmike	Excel Discussion (Misc queries)	0	January 30th 06 05:08 PM
deleting values in a worksheet without deleting the formulas	patti	Excel Worksheet Functions	1	October 28th 05 09:49 PM

Menu

About Us