Access Tab Problem

[Ludington]

When I select a tab I am trying to run a macro but my macro isn't being executed. I know this because I placed a msgbox "Made it Here" command in the macro which doesn't display.

What is also weird; when I change my start-up option menu to "use access special keys" I get the following error: Run-time error 2465 "Can't find the field "|" referred to in your expression. When I remove the "use access special keys" option I don't receive the error message and the macro is not executed. The macro is not executed with or without the "use access special keys" option.

I am stumped...Ludington

 

[dhookom]

What event did you use? Did you try the On Change event?

Duane
Hook'D on Access
MS Access MVP

 

[Ludington]

Yes, I used the OnChange event for my Tabs.

Here is my vb code:

Private Sub TabCtl0_Change()
Select Case Me.TabCtl0.Value
Case Is = 0
Case Is = 1
Case Is = 2
DoCmd.RunMacro ([Test mac])
'DoCmd.RunMacro [Veteran Payment mac]
Case Else
MsgBox "Select Client, Data or Payment Tab"
End Select
End Sub

Test mac currently just displays a msgbox "Made it here"

FYI...Ludington

 

[dhookom]

This is the code that I used and it worked exactly as expected in Access 2003

Private Sub TabCtl0_Change()
    Select Case Me.TabCtl0.Value
    Case 0
        MsgBox "Tab Zero"
    Case 1
        MsgBox "Tab One"
    Case 2
        MsgBox "Tab Two"
        'DoCmd.RunMacro [Veteran Payment mac]
    Case Else
        MsgBox "Else"
    End Select
End Sub

Duane
Hook'D on Access
MS Access MVP

 

[Ludington]

I made my code the same as yours except adding the macro.

When it trys to execute the macro is were the problem is.

Have you ever tried to run a macro in the following sub routine?

Private Sub TabCtl0_Change()

 

[dhookom]

Sorry, I don't run macros. I would probably convert the macro to code and then call the code.

Duane
Hook'D on Access
MS Access MVP

 

[missinglinq]

DoCmd.RunMacro requires a string as the macro name.

DoCmd.RunMacro "Veteran Payment mac"

DoCmd.RunMacro "Test mac"


The Missinglinq

Richmond, Virginia

There's ALWAYS more than one way to skin a cat!

 

[Ludington]

Thanks Missinglinq, that fixed the problem.

Sometimes the easiest fixes cause the most problems.