Thread: Using IsError
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Mike H Mike H is offline
external usenet poster
 
Posts: 11,501
Default Using IsError

Hi,

One way

If Not IsDate(lstTo) Or Not IsDate(lstFrom) Then
MsgBox "You must enter 2 dates!"
ElseIf CDate(lstTo) < CDate(lstFrom) Then
MsgBox "The 'To' date should not be before the 'From' date!"
End If

Mike

"Merlynsdad" wrote:

I have two list boxes for users to select dates, and want to use IsError to
generate a msgbox if the user tries to run the code without selecting a date.
The current code is:

If CDate(lstTo) < CDate(lstFrom) Then
MsgBox "The 'To' date should not be before the 'From' date!"
End If

This covers the user entering the dates backwards, but how do I make this
work if the user omits the dates completely?