Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA Help with changing shape color for selected shapes only
I'm in need of help. I have an Excel sheet that has some rectangle shapes.
I want to add some command buttons to change the color of these rectangles, but I only want those shapes I select to be changed. Here is a "Reset" command button code I use to turn all my shapes Red: Private Sub CommandButton1_Click() ActiveSheet.Shapes.SelectAll Selection.ShapeRange.Fill.ForeColor.SchemeColor = 10 Selection.ShapeRange.Fill.Visible = msoTrue Selection.ShapeRange.Fill.Solid Range("A1").Select End Sub Now I know how to change a single shape that I specify: ActiveSheet.Shapes("Rectangle 1").Select But how do I change only the ones I currently have selected? And is there a better way to unselect (deselect) rather than using Range("A1").Select? Thanks in advance, Scott |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Calculate quantity of shapes inside another shape | Excel Discussion (Misc queries) | |||
Changing color of selected cells in Excel 2007 | Excel Discussion (Misc queries) | |||
Changing default color of selected cells in 2007 | Excel Discussion (Misc queries) | |||
Changing the color of a selected range | Excel Discussion (Misc queries) | |||
Deleting shapes/objects from a selected area | Excel Programming |