Running the code in an option button from a seperate normal button click

Add this to the bottom of your Plus and Minus macros. Change the names of the "Option Buttons" to suit. Don't use the option button captions. Use thier names as seen in the name box to the left of the formula bar.

    With ActiveSheet
        Select Case xlOn
            Case .OptionButtons("Option Button 1").Value: Call NoRake
            Case .OptionButtons("Option Button 2").Value: Call AveRake
            Case .OptionButtons("Option Button 3").Value: Call RatioedRake
            Case .OptionButtons("Option Button 4").Value: Call TurboRake
            Case .OptionButtons("Option Button 5").Value: Call HyperRake
        End Select
    End With

Originally Posted by camikhazi

Amazing AlphaFrog thank you so much!

You're welcome. Thanks for the feedback.