View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Ron de Bruin Ron de Bruin is offline
external usenet poster
 
Posts: 11,123
Default Delete Rows containing pop-up entry

Hi

unfortunately I have to work with Excel97


After I have finish the new version with a Date tab for filtering on
months ,Year, week numbers, weekdays, ................
I will see if I can fix the problems in Excel 97.

--
Regards Ron de Bruin
http://www.rondebruin.nl



"CLR" wrote in message
...
Thanks much Ron..........unfortunately I have to work with Excel97 here.
But, I've downloaded your Add-in and will put it to good use at home.

Thanks again,
Vaya con Dios,
Chuck, CABGx3



"Ron de Bruin" wrote:

For a Add-in solution see
http://www.rondebruin.nl/easyfilter.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl



"CLR" wrote in message
...
Thanks ever so much Guys....Paul B, Jason, and JE.......all three
worked
fine-fine-superfine. I think I will go with Jason's tho, because it
seems
to
work with either numbers or case-senitive text.

Thanks again for the rapid and working responses......any one of which
would
have served me, but it's always nice having a choice.

Vaya con Dios,
Chuck, CABGx3


"CLR" wrote:

Hi All......

I got this from a search of this group, and it works fine.

Hi Lawlerd, this code was posted by Frank Kabel, it should do what
you
you need, it will delete every row with the word 'total' in column
A...

Sub delete_rows()
Dim RowNdx As Long
Dim LastRow As Long
LastRow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).row
For RowNdx = LastRow To 1 Step -1
If Cells(RowNdx, "A").Value = "total" Then
Rows(RowNdx).Delete
End If
Next RowNdx
End Sub

My question is, can it be modified to give me a pop-up requesting a
value
to
search for and delete the rows containing it, instead of a hard-coded
"total"?

Many TIA's
Vaya con Dios,
Chuck, CABGx3