Thread: Macros
View Single Post
  #4   Report Post  
Dave Peterson
 
Posts: n/a
Default

You can assign the same macro to each of the ovals. In fact, you can change the
color in that same macro. This might give you some ideas to play with:

Option Explicit
Sub testme()
Dim myShape As Shape
Set myShape = ActiveSheet.Shapes(Application.Caller)
myShape.Fill.ForeColor.SchemeColor = 14
End Sub

Pese wrote:

I have multiple objects (ovals) in one column of a spreadsheet. I am able to
create macros with corresponding buttons that once clicked, will change the
color of the first oval to either red, yellow, or green. I want these macros
to apply to any of the objects in the column. Thus, I want to be able to
click on any object in the column and then click the corresponding macro
button that will change the color of the object to that which is desired.
How do I set the macros so that they do not just apply to the first oval
object, but that I can run them on any of the objects?


--

Dave Peterson