Try:

Sub clear_inputs_new()
ActiveSheet.Range("I11:I114,AD11:AD114").value = ""
End Sub

unhide all columns wrote:

THis macro seems to be clearing all items from the sheet
I only need it to clear the rows i have listed
Sub clear_inputs_new()
'
' clear_inputs Macro
'
ActiveWindow.ScrollRow = 1
Range("I11:I114").Select
Selection.ClearContents
Range("AD11:AD114").Select
Selection.ClearContents
End Sub

--

Dave Peterson