This form as 3 option buttons with procedures. It has a cancel and okay.
The user clicks each option button and it runs the procedures. The 3rd
option button requires the option click and the okay button and it should
close the form.

When I run this form it stops at the Fprocess1 = True & Fprocess2 = True &
Fprocess3 = True Then Unload Me line.

I thought the cancel button should be able to clear out of everything?

For the last option button I have to click option plus okay. It would be
better if I clicked the last option button and it did its thing then I pushed
okay and it closed. How can I change to do this?

However as it stands now when I run this form I get this error message:
At this point I get a Run time error #13 type mismatch.
All the macros in all the subs run without an error.

I would really like the cancel button to be able to close out anywhere in
the process as an alternative.
Thanks,
Private Sub cmdOkay_Click()
If Fprocess1 = True & Fprocess2 = True & Fprocess3 = True Then Unload Me


Private Sub cmdCancel_Click()
Unload Me
End Sub

-------------these are my three option buttons that when clicked do a series
of macros
Private Sub ReformatDepts_Click()
Fprocess3 = False
If optReformatDepts.Value = True Then
Call SSPproject.ReformatDepts.SortDivDept
Call SSPproject.ReformatDepts.HideCellsNtoX
End If
Fprocess3 = True
End Sub


Private Sub optCkforDupes_Click()
Dim nResult As Long
Fprocess1 = False
If optCkforDupes.Value = True Then
nResult = MsgBox(prompt:="From: " & frRptDate & vbNewLine & "To: " &
toRptDate, Buttons:=bvOKCancel, Title:="report Date")
End If
If nResult = vbOK Then
Call createXLdb1.deleteDateRow1
Call createXLdb1.CkforDupes
End If
Fprocess1 = True
End Sub

Private Sub optSaveIndesign_Click()
Fprocess2 = False
If optSaveIndesign.Value = True Then
Call saveIndesign.saveIndesign
End If
Fprocess2 = True
End Sub