Look at Application.SetOption :
http://msdn2.microsoft.com/en-gb/library/aa140014(office.10).aspx
For example in my application I get the user's original options when the application starts, and sets them while they use my application.
Then set them back to the user's Original Settings (Have to set Global Variables):
Public gblnSave_Confirm_RecordChanges As Boolean
Public gblnSave_Confirm_DocumentDeletions As Boolean
Public gblnSave_Confirm_ActionQueries As Boolean
'++++++++++++++++++++++++++++++++++++++++
'Do this start of Application
'Get user's original options setters
Call GetOptionsForDb
'Set options to false for confirmation of record editions
Call SetOptionsForDb(False, False, False)
'+++++++++++++++++++++++++++++++++++++++++++
'Stick this in any module
Public Sub SetOptionsForDb(Confirm_RecordChanges As Boolean, Confirm_DocumentDeletions As Boolean, _
Confirm_ActionQueries As Boolean)
Application.SetOption "Confirm Record Changes", Confirm_RecordChanges
Application.SetOption "Confirm Document Deletions", Confirm_DocumentDeletions
Application.SetOption "Confirm Action Queries", Confirm_ActionQueries
End Sub
'+++++++++++++++++++++++++++++++++++++++
'Stick this in any module
Public Sub GetOptionsForDb()
'Get user's Original Settings
gblnSave_Confirm_RecordChanges = Application.GetOption("Confirm Record Changes")
gblnSave_Confirm_DocumentDeletions = Application.GetOption("Confirm Document Deletions")
gblnSave_Confirm_ActionQueries = Application.GetOption("Confirm Action Queries")
End Sub
'+++++++++++++++++++++++++
'On Exit Db set user's original Application setters
Call SetOptionsForDb(gblnSave_Confirm_RecordChanges, gblnSave_Confirm_DocumentDeletions, _
gblnSave_Confirm_ActionQueries)