map shape HELP!

[misc.v]

I have created a map with 20 shapes for 20 states.

I want to be able to select the shape, and have it change color. Also, I would like cell A5 tell me the name of the shape. (active shape?)

A problem im encountering is that I have labels on top of the shapes, so when I select the shape, im actually selecting the label.

Can this be done?

[kev_]

Will this work for you?

Do the labels need to be on top of each shape? Put label below each shape and then use colour fill with transparency on the shape to allow label to be visible.

Click on the shape and run this macro to change its fill colour

Please Login or Register  to view this content.

[misc.v]

Will this work for you?

Do the labels need to be on top of each shape? Put label below each shape and then use colour fill with transparency on the shape to allow label to be visible.

Click on the shape and run this macro to change its fill colour

Please Login or Register  to view this content.

Thanks for the quick response! But how do I implement this code?

And yes, the labels need to be on top of the shape, ive made the map so it fits on the view area of the sheet, and they are tiny, and it needs those labels.

[kev_]

If that will not work,

another option:
- 1. select the label and use shortcut to run a macro to "send the label to the back"

Please Login or Register  to view this content.

- 2. select the shape and use shortcut to run a macro to change its colour

Please Login or Register  to view this content.

- 3. send the shape to the back (where it started)

Please Login or Register  to view this content.

To return the name of the active shape in cell A5:

Please Login or Register  to view this content.

[misc.v]

[QUOTE=kev_;4620892]If that will not work,

another option:
- 1. select the label and use shortcut to run a macro to "send the label to the back"

Please Login or Register  to view this content.

- 2. select the shape and use shortcut to run a macro to change its colour

Please Login or Register  to view this content.

- 3. send the shape to the back (where it started)

Please Login or Register  to view this content.

To return the name of the active shape in cell A5:

Please Login or Register  to view this content.

[/QUOTE

How would the entire code look like? I'm still new to macros.

I select the shape, right click and I don't see something like "Edit Code".

[kev_]

You do not need to quote everything back - it just fills the thread with clutter.
Use quotes if you are referring back to something much further up the thread or to something where it isn't obvious what you are referring to without using the quotes.

Have a play with the attached workbook which contains 3 macros.
There are 2 shapes one on top of the other in the top left corner - a text box and a filled rectangle
The shortcut are detailed in each macro
Select a shape and then try {CTRL} t or {CTRL} {SHIFT} t or {CTRL} k
Find the VBA area with {ALT} {F11}

Then, please attach your workbook - with only 2 or 3 shapes plus their labels (avoid the file being too big) and I will look at it for you
(click on Reply/ Go Advanced/look below for Manage Attachments etc

ManageAttachments3.jpg

VBA:

Please Login or Register  to view this content.