Nokia C3: How delete rows between two inputs numbers on Excel?

How delete rows between two inputs numbers on Excel?
Hi
I need help with a small macro. I need to enter two numbers in message boxes , and then delete the rows between the two input numbers. If the second number is entered as 'last row' , then it would delete between the first number entered and the bottom row , whatever number row it may be. Can someone help with some code? Grateful for any help.
Reply With Quote
#2
Old 04-01-2012
Alfons Alfons is offline
Member

Join Date: Nov 2010
Posts: 410
Re: How delete rows between two inputs numbers on Excel?
Try the below mentioned code and let me know whether it is helpful or not.

Code:

Sub rowKiller()
Dim n1 As String, n2 As String, s As String
n1 = Application.InputBox(prompt:="enter first row", Type:=2)
n2 = Application.InputBox(prompt:="enter last row", Type:=2)
If n2 = "last row" Then
n2 = CStr(Rows.Count)
End If
s = n1 & ":" & n2
Rows(s).Delete
End Sub