Format selected object

[zplugger]

I have some inserted rectangles on my worksheet,can I make a macro to fill the selected rectangle with a black fill color? I got the rectangle from shapes.

[dmcgov]

Please Login or Register  to view this content.

[zplugger]

Thank you, I have 50 rectangle shapes on the sheet and only want to fill the selected one?

[rorya]

You could just use:

Please Login or Register  to view this content.

[zplugger]

Getting error run time 438.

[rorya]

What does:

Please Login or Register  to view this content.

show if you add it to the start of the code.

[zplugger]

Box with Range

[rorya]

Then you didn't select a rectangle before running the code.

[zplugger]

I did select the rectangle,not sure its in a certain range. Seems like its just a object.

[rorya]

If Typename(selection) returns Range, then you have one or more cells selected, not a rectangle, which would explain the 438 error.

[zplugger]

If I record a macro on one of the rectangles it works,I would like it to do it to any selected rectangle on the sheet if possible.

Please Login or Register  to view this content.

[rorya]

The code I posted will work as long as you select a rectangle first. If you mean something else by "any selected rectangle", can you please clarify what?

[zplugger]

Trying to attach a sample workbook, can't get it to download. I can not get the code you posted to work.

[zplugger]

Here is a example

[Fluff13]

Try assigning this code to all your shapes

Please Login or Register  to view this content.

[zplugger]

still geeting run time error

[Fluff13]

Try this file, all you need to do is click the rectangle.

[zplugger]

Sorry, I get it now. I think I can make this work OK. Was hoping to use a commandbutton to change selected shape.

[zplugger]

when I hoover over shape I get 4 arrows,on your example I get a hand?

[Fluff13]

The problem with using a button, is that as soon as you click the button, the button is then selected not the shape.
You will get the hand symbol because there is a macro assigned to the shape.

[zplugger]

O I see now, Thank You for all your help,good to learn different stuff.

[Fluff13]

You're welcome & thanks for the feedback