S
Sonja
Hi Strive4peace 
Thanks SO much for your help !
I tried pasting your code into the code builder - is the following correct ?
Private Sub MsgBox_Click()
Select Case MsgBox( _
"Additions cannot be changed, Are you sure you want to save ?" _
, vbYesNo _
, "Continue with Save?")
Case vbYes
'statements
Case vbNo
'statements
End Select
End Sub
It gives me an error "Run time error '438'
Object doesn't support this property or method
When I hit debug, the code builder comes up with the following text
highlighted:
Select Case MsgBox( _
"Additions cannot be changed, Are you sure you want to save ?" _
, vbYesNo _
, "Continue with Save?")
Thanks again for your help - it is really appreciated
Sonja.
Thanks SO much for your help !
I tried pasting your code into the code builder - is the following correct ?
Private Sub MsgBox_Click()
Select Case MsgBox( _
"Additions cannot be changed, Are you sure you want to save ?" _
, vbYesNo _
, "Continue with Save?")
Case vbYes
'statements
Case vbNo
'statements
End Select
End Sub
It gives me an error "Run time error '438'
Object doesn't support this property or method
When I hit debug, the code builder comes up with the following text
highlighted:
Select Case MsgBox( _
"Additions cannot be changed, Are you sure you want to save ?" _
, vbYesNo _
, "Continue with Save?")
Thanks again for your help - it is really appreciated
Sonja.