Dim TranDate as Date

TranDate = [Forms]![ReceivedForm]![DatePaid] and gives me an Invalid Use of Null error if there is nothing in the field, which is possible so I need to get around it by either bypassing or envoking a message that there is no date

Thanks
Ed

if isnull([Forms]![ReceivedForm]![DatePaid]) then
msgbox "No date" ' or whatever you want to do here
else
TranDate = [Forms]![ReceivedForm]![DatePaid]
End if

Or you could not specify a data type. In that case, Access will treat it as a type Variant, which can contain a Null.

Then you would test for the null value, converting it to some impossible value, otherwise using it as a date.

For instance,

If IsNull(VariableName) Then
DateValue = CDate(0) ' or some other impossible vallue
Else
If IsDate(VariableName) Then
DateValue =VariableName
End If
End If

Thanks all ... as usual it worked perfectly