XML Ribbon toggleButton

[D4rwin]

I'm very new to the world of XML ribbon customization so I'm wondering if someone can help me with what I'm trying to achieve. I have a macro which allows a user to select any cell y rows and x columns away from the active cell and have it "follow" the movements of the activecell. I'm trying to build a toggle button which will run the macro with myTog=True (on), and when pressed again it will run the macro again and set myTog = False. So, my question is how I interact with the ribbon toggle button in the macro code to manipulate myTog.
Any suggestions?

Here's my XML code:
<togglebutton id="Tracker" label="Track Cells" screentip="Track Cells" supertip="Select a cell to track" image="TRACK1" size="large"><togglebutton id="Tracker" label="Track Cells" screentip="Track Cells" supertip="Select a cell to track" image="TRACK1" size="large">

<toggleButton id="Tracker" label="Track Cells" screentip="Track Cells" supertip="Select a cell to track" image="TRACK1" size="large"/>

<togglebutton id="Tracker" label="Track Cells" screentip="Track Cells" supertip="Select a cell to track" image="TRACK1" size="large">

Here's my macro code:

    If myTog = False Then Exit Sub
    Union(ActiveCell, ActiveCell.Offset(Track_Y, Track_X)).Select

</togglebutton></togglebutton></togglebutton></togglebutton>

 

[RoryA]

You need an onAction attribute to specify which callback to run when the button is clicked and a getPressed callback to determine the state of the toggle button. See this previous thread: http://www.mrexcel.com/forum/excel-questions/493251-excel-2007-ribbon-togglebutton.html

 

[D4rwin]

Ok thanks.
The GetPressed now calls another module which prompts a user for input. However, if the user clicks "cancel", how do I turn the toggle off?

 

[RoryA]

If the getPressed callback sets the return value to True, it will be pressed; if False, it won't be.

 

[D4rwin]

What am I doing wrong here? "Pressed" is giving me false in myTogTest

I would like for myTogTest to run when "pressed" is True, but if False myTogTest calls GetPressed and turns the toggle off.

Public pressed As Boolean

Sub GetPressed(control As IRibbonControl, pressed As Boolean)    

Call myTogTest

End Sub


Sub myTogTest()

    If pressed = True Then
        MsgBox "Toggle: ON"
    Else
        MsgBox "Toggle: OFF"
    End If

End Sub