message box syntax error P.S.

[Janis]

I don't know what vbCritical style is for. I don't really want a style with
any buttons. I just want a flag message that says the date of the report so
that the user knows if he happens to be on the wrong wksheet.

tnx,

 

[JE McGimpsey]

I don't know what vbCritical style is for. I don't really want a style with
any buttons.

Take a look at the MsgBox topic in VBA Help!!!

I just want a flag message that says the date of the report so
that the user knows if he happens to be on the wrong wksheet.

Hmm... and then deletes the line anyway, even if it's the wrong
worksheet?

Perhaps it would make more sense to use something like

Private Sub Okay_Click()
Dim nResult As Long
If optionButton1.Value = True Then
nResult = MsgBox(prompt:="From: " & frRptDate & _
vbNewLine & "To: " & toRptDate, _
Buttons:=vbOKCancel, _
Title:="Report Date")
If nResult = vbOK Then
deleteDateRow1
ckForDupesMac
End If
Else
optionbutton2.Value = True
'xxxxxxx()
End If
End Sub