Macro assigned to a command button

[JackDanIce]

Hi,

I have the following code attached to a command button, which is found inside a worksheet (rather than in a module):

Private Sub ToggleCalc_Click()

With Application
    If .Calculation = xlCalculationAutomatic Then
        .Calculation = xlCalculationManual
        With ToggleCalc
            .BackColor = RGB(240, 128, 128)
            .Caption = "Calc is: Manual"
        End With
    Else
        .Calculation = xlCalculationAutomatic
        With ToggleCalc
            .BackColor = RGB(176, 224, 230)
            .Caption = "Calc is: Automatic"
        End With
    End If
End With

End Sub

I also have existing macros within modules in this same workbook. If I want to call the above from an existing macro how can I do this? Simply typing:

ToggleCalc_Click

or

Run ToggleCalc_Click

Doesn't work, error message is: Compile error: Variable not defined; I have an understanding of what this means but I don't know how to resolve this issue as I've not come across it before.

Thanks in advance for any help,
Jack

 

[RoryA]

You would need to make it public and use:

Sheet1.ToggleCalc_Click

for instance, or use Run but include the sheet code name as above.
As a rule, I would say that if you need to run the code from other locations, it doesn't belong in the worksheet code module - it should be a normal routine that you call from each required routine.

 

[JackDanIce]

Thank you Rory, I'll try out your suggestions and see if I can move it out of the sheet code and into a module