There is a syntax error, it stops on the On error go to errorhandler line.
At one point there was a mention about needing a select in the case but now
it doesn't do that.
THANKS!

Sub optCkforDupes_Click()
Dim nResult As Long
Debug.Print frRptDate
Debug.Print toRptDate
On Error GoTo ErrHandler
Fprocess1 = False
On Error GoToErrHandler
If optCkforDupes.Value = True Then
nResult = MsgBox(prompt:="From: " & FrReptDate & vbNewLine & "To: " &
ToReptDate, Buttons:=bvOKCancel, Title:="report Date")

End If
If nResult = vbOK Then

Call createXLdb.CkforDupes
Fprocess1 = True

End If
Exit Sub
ErrHandler:
Case 9
Resume
Case Else
MsgBox Err.Number & " " & Err.Description
End Select
End Sub