ErrorTitle Property
Returns or sets the title of the data-validation error dialog box. Read/write String.
Example
This example adds data validation to cell E5.
With Range("e5").Validation
.Add xlValidateWholeNumber, _
xlValidAlertInformation, xlBetween, "5", "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