Convert a Shape to a Command Button

[michaelch2934]

I'm sure this is an age old problem. The difference in Command Buttons and Shapes. And while you can run Macros by clicking a Shape, you can't run VBA Code by clicking on a Shape. Am I right?

I've written workable VBA code for Command Buttons. They work fine. But, the look and shape of some of the Command Buttons (Rectangular) will not work for my application. So, I created these nifty Shapes to look just like I want (Arrows).

Now everyone tells me all I have to do is assign a Macro to the shape and be happy. But, unless I can make a Macro run my VBA code, this will not work. (The code is very complex and has many If Then statements and such.)

I guess the crux of the problem is this: You can't easily convert a Shape into a Command Button.

Any suggestions? Thanks in advance.

 

[My Aswer Is This]

And see dealing with shapes would require a lot of changes.
To change a shape color you would need code like this:
ActiveSheet.Shapes("BlueTurn").Fill.ForeColor.RGB = RGB(220, 0, 20)

And not sure about turning a shape

 

[michaelch2934]

Right about shapes. More work than it's worth.

Main thing is I wanted to create a 'proof of concept' scoring system for this new game system. While it may still be 'clumsy' to use, it should demonstrate how the system works. Thanks for all your input. Will give you guys credit if I sell the system to a game development company.