Hello,

With Range("e5").Validation
.Add Type:=xlValidateWholeNumber, _
AlertStyle:=xlValidAlertInformation, _
Minimum:="5", Maximum:="10"
.InputTitle = "Integers"
.ErrorTitle = "Integers"
.InputMessage = "Enter an integer from five to ten"
.ErrorMessage = "You must enter a number from five to ten"
End With

This above code will Add Data Validation to a Cell.

Is their a way to then retrieve back what Type it is ?

For example from the above code it is being set to the Type of
"xlValidateWholeNumber". How can this later on be retreived so I can tell
what type it is ?

Something like strType = Cells(5,5).Validation.Type
'Notes this does not work but something like this is what I am looking for.

Any help would be greatly appreciated.

Thank you,
Jeff

You can get the type but it will come back as the number represented by the
constant. Whole number 1, Decimal 2, ...

Sub test()

MsgBox ActiveSheet.Range("E5").Validation.Type
End Sub
--
HTH...

Jim Thomlinson


"Jeff" wrote:

Hello,

With Range("e5").Validation
.Add Type:=xlValidateWholeNumber, _
AlertStyle:=xlValidAlertInformation, _
Minimum:="5", Maximum:="10"
.InputTitle = "Integers"
.ErrorTitle = "Integers"
.InputMessage = "Enter an integer from five to ten"
.ErrorMessage = "You must enter a number from five to ten"
End With

This above code will Add Data Validation to a Cell.

Is their a way to then retrieve back what Type it is ?

For example from the above code it is being set to the Type of
"xlValidateWholeNumber". How can this later on be retreived so I can tell
what type it is ?

Something like strType = Cells(5,5).Validation.Type
'Notes this does not work but something like this is what I am looking for.

Any help would be greatly appreciated.

Thank you,
Jeff