Thread: Delete Row
View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
news.microsoft.com[_11_] news.microsoft.com[_11_] is offline
external usenet poster
 
Posts: 1
Default Delete Row

Sub Macro22()
Dim iRow as long
iRow = Range("Row").Value
Rows(Row).Delete
End Sub

HTH
--
AP

"JohnUK" a écrit dans le message de news:
...
Hi,
I am looking for a way to delete a row depending on a number in a range.
For
example, if 124 was in the range, I would then want to delete row 124.
My Poor attempt:

Sub Macro22()
Row = Range("Row").Value
Rows(" & Row & ").Select
Selection.Delete
End Sub

Any help greatly appreciated
Regards
John