VBA version of Data validation

[RobSully]

I am currently using data validation a date column that checks entered dates fall within 90 days before or after the entry date. The problem is that on occasion rows get deleted and the workbooks get many hands in them and throw off the validation. How would you go about using VBA as a check on the date just entered. Currently I just use a warning as there are occasions to date outside this range I am just looking to slow down the entry and have person double check an odd date.

 

[Andrew Poulsom]

You could use the Worksheet_Change event procedure, but if you are going to use VBA it may be more effective to restore the data validation when the workbook opens.

 

[par60056]

you could create a simple change event function on the entry sheet.

Something like this:

Private Sub Worksheet_Change(ByVal Target As Range)


If Target.Column = 4  and Target.Value <> "" Then
    If (Abs(Target.Value - Now()) > 90) Then
        Target.Interior.Color = 65535
    End If
End If
End Sub

 

[RobSully]

You could use the Worksheet_Change event procedure, but if you are going to use VBA it may be more effective to restore the data validation when the workbook opens.

Thank You that worked really well, I should of thought of that ... Yesterday may have been worse than I thought