Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
VB code Required-------!
Dear Friends,
I Want to delete a row based on the existence of a particular data. ie., If any cell in the active sheet consists " Problem " then it should delete the entire row....! Can any body help..? Thanks in Advance Regards Thyagaraj |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
VB code Required-------!
Sub DeleteRows()
Dim FirstInstance As Range Do Set FirstInstance = Cells.Find(What:=" Problem ", After:=ActiveCell, LookIn:=xlFormulas, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False, SearchFormat:=False) If Not FirstInstance Is Nothing Then FirstInstance.EntireRow.Delete Loop While Not FirstInstance Is Nothing End Sub HTH Die_Another_Day Thyagaraj wrote: Dear Friends, I Want to delete a row based on the existence of a particular data. ie., If any cell in the active sheet consists " Problem " then it should delete the entire row....! Can any body help..? Thanks in Advance Regards Thyagaraj |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Another VB Code Required | Excel Discussion (Misc queries) | |||
VB Code Required | Excel Discussion (Misc queries) | |||
help required in completing the code | Excel Discussion (Misc queries) | |||
Code help required | Excel Programming | |||
Code required please | Excel Programming |