Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete Row
Hi,
I'd like to find a cell with the content "This cell" and then I'd like to delete the row (not only the content of the cell). This is what I've got: Sub DeleteRow() With Worksheets(1).Range("A1:H100") Set C = .Find("This Cell", LookIn:=xlValues) ' Rows(???).Select ' ??? How to select the row to delete ??? Selection.Delete Shift:=xlUp End With End Sub Thanks and regards, Armin |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete Row
Sub DeleteRow()
With Worksheets(1).Range("A1:H100") Set C = .Find("This Cell", LookIn:=xlValues) if not c is nothing then c.EntireRow.Delete End if End With End Sub -- Regards, Tom Ogilvy "Armin Ronacher" wrote in message ... Hi, I'd like to find a cell with the content "This cell" and then I'd like to delete the row (not only the content of the cell). This is what I've got: Sub DeleteRow() With Worksheets(1).Range("A1:H100") Set C = .Find("This Cell", LookIn:=xlValues) ' Rows(???).Select ' ??? How to select the row to delete ??? Selection.Delete Shift:=xlUp End With End Sub Thanks and regards, Armin |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete Row
Tom,
thanks, this is exactly what I was looking for. Regards Armin Ronacher "Tom Ogilvy" schrieb im Newsbeitrag ... Sub DeleteRow() With Worksheets(1).Range("A1:H100") Set C = .Find("This Cell", LookIn:=xlValues) if not c is nothing then c.EntireRow.Delete End if End With End Sub -- Regards, Tom Ogilvy "Armin Ronacher" wrote in message ... Hi, I'd like to find a cell with the content "This cell" and then I'd like to delete the row (not only the content of the cell). This is what I've got: Sub DeleteRow() With Worksheets(1).Range("A1:H100") Set C = .Find("This Cell", LookIn:=xlValues) ' Rows(???).Select ' ??? How to select the row to delete ??? Selection.Delete Shift:=xlUp End With End Sub Thanks and regards, Armin |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macro to delete sheets and saves remaining file does not properly delete module | Excel Programming | |||
Macro to delete sheets and saves remaining file does not properly delete module | Excel Programming | |||
Macro to delete sheets and saves remaining file does not properly delete module | Excel Programming | |||
Macro to delete sheets and saves remaining file does not properly delete module | Excel Programming | |||
Delete every 3rd row, then delete rows 2-7, move info f/every 2nd row up one to the end and delete the row below | Excel Programming |