Hey im running into errors.... I think im on the right track.... let me konw what you think might be the issue.
Code:
Private Sub EXPORT_BUTTON_Click()
On Error GoTo Err_ERROR
If Frame95.Value = 1 And Frame108.Value = 1 And Frame114.Value = 1 Then
DoCmd.RunMacro.Macro1
ElseIf Frame95.Value = 1 And Frame108.Value = 1 And Frame114.Value = 2 Then
DoCmd.RunMacro.Macro2
ElseIf Frame95.Value = 1 And Frame108.Value = 2 And Frame114.Value = 1 Then
DoCmd.RunMacro.Macro3
ElseIf Frame95.Value = 1 And Frame108.Value = 2 And Frame114.Value = 2 Then
DoCmd.RunMacro.Macro4
ElseIf Frame95.Value = 2 And Frame108.Value = 1 And Frame114.Value = 1 Then
DoCmd.RunMacro.Macro5
ElseIf Frame95.Value = 2 And Frame108.Value = 1 And Frame114.Value = 2 Then
DoCmd.RunMacro.Macro6
ElseIf Frame95.Value = 2 And Frame108.Value = 2 And Frame114.Value = 1 Then
DoCmd.RunMacro.Macro7
ElseIf Frame95.Value = 2 And Frame108.Value = 2 And Frame114.Value = 2 Then
DoCmd.RunMacro.Macro8
End If
ErrERROR:
MsgBox ("You missed a step.....Try Again")
End Sub
Exit_sub:
Exit Sub
Thank you in advance for helping me.