Category: VBA

Use next VBA code into any event  .. Response = MsgBox(prompt:=”Are you sure to delete this invoice .. “, Buttons:=vbYesNo) If Response <> vbYes Then Exit Sub ‘your next action after confirm message like… DoCmd.RunMacro...

Use .. Private Sub Form_Close() Dim strFile As String strFile = “target file .. like c:\x.txt” Shell strFile End Sub

Use one from …. DoCmd.OpenQuery “Q_run_payments”, , acReadOnly DoCmd.OpenQuery “yourQueryName”, acViewNormal, acEdit CurrentDb.OpenRecordset(“yourQueryName”) CurrentDb.Execute “qryAddLoginfoRow”  

Private Sub Form_AfterUpdate() If CurrentProject.AllForms(“F_purchasing”).IsLoaded = True Then Forms.F_purchasing.Requery End If End Sub ##Or Private Sub Form_AfterUpdate() If CurrentProject.AllForms(“F_purchasing”).IsLoaded = True Then Forms.F_purchasing.tot_.Requery End If End Sub