Thanks a lot!
I'm not clear how to use this. I made a macro as shown below: not sure that i incorporated the "settings" correctly. But how do i use it? if i first make a change to a cell, then there won't be any cells like it at that point. but if i first invoke the Macro, then how does it know what change to apply across multiple worksheets? also, can i control which worksheets it applies to? (i'd need it to apply to all but one sheet in a 25-sheet workbook.)
Apologies for my inexperience: thanks again for your help!
Sub allValids()
Dim iShts As Integer, rngVal As Range, i As Integer
Dim vType, vFormula1
iShts = Sheets.Count
Set shtCur = ActiveSheet
Set rngVal = Selection
vType = rngVal.Validation.Type
vFormula1 = rngVal.Validation.Formula1
For i = 1 To iShts
With Sheets(i).Range(rngVal.Address).SpecialCells(xlCellTypeSameValidation).Validation
.Delete
.Add Type:=vType, Formula1:=vFormula1
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="1,2,4"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
Next
End Sub
Bookmarks