Hi there,

I thought that this would be easy, what I want to do is remove Data
Validation from ranges in a number of sheets.

I recorded the macro below - but it won't run - runtime error 1004

Application.Goto Reference:="R1C1"
ActiveCell.SpecialCells(xlCellTypeAllValidation).S elect
With Selection.Validation
.Delete
.Add Type:=xlValidateInputOnly, AlertStyle:=xlValidAlertStop,
Operator _
:=xlBetween 'BUGS OUT HERE
.IgnoreBlank = True
.InCellDropdown = True
.ShowInput = True
.ShowError = True
End With
Cells.Select
Range("B5").Activate
Selection.EntireRow.Hidden = False
Range("H1:H4").Select
Selection.ClearContents
Rows("1:4").Select
Range("B1").Activate
Selection.EntireRow.Hidden = True

Any help would be appreciated

Thank you
--
Mifty