I want to be able to delete the contents of a range of cells
(A100:K200) based on the values I manually enter into cells A1 and B1,
everything to run in Sheet1. A1's entry is the first row of the range
to delete (A100:K100) and B1's entry is the last row of the range
(A200:K200). Can someone provide a fairly simple macro for this?
Thanks in advance.

Michael

To deleted entire rows, assuming by your example that A1 would be 100 and B1
would be 200.

Sub dele()
Dim x As Long, y As Long
x = Range("A1").Value
y = Range("B1").Value
Rows(x & ":" & y).Delete
End Sub

However, if you only want to clear contents of columns A - K of those rows
and A1 is A100 and B1 is K200, then:

Sub dele2()
Dim x As String, y As String
x = Range("A1").Value
y = Range("B1").Value
Range(x & ":" & y).ClearContents
End Sub


"Michael Lanier" <(E-Mail Removed)> wrote in message
news:05322cef-827a-4f7d-820e-(E-Mail Removed)...
>I want to be able to delete the contents of a range of cells
> (A100:K200) based on the values I manually enter into cells A1 and B1,
> everything to run in Sheet1. A1's entry is the first row of the range
> to delete (A100:K100) and B1's entry is the last row of the range
> (A200:K200). Can someone provide a fairly simple macro for this?
> Thanks in advance.
>
> Michael

Thanks so much for your help. I'll try it out when I get back on the
program tomorrow.

Michael