with statement to format shape

[esbencito]

How would I optimise the following code and use "with statements", rather than selecting the shape first in order to format it? I do understand that "with statements" in VBA work faster/more efficient than the "selection" method. Though I only know how to do it with "ranges" such as:

Please Login or Register  to view this content.

But how would I apply that to a certain shape without selecting it first as in the example below?

Please Login or Register  to view this content.

I renamed the shape to "Japan" and tried to change it's colour with a "with statement" (see below), but it doesn't seem to work!

Please Login or Register  to view this content.

Does anyone know what I'm doing wrong?

[xlnitwit]

Hi,

What you need is this

Please Login or Register  to view this content.

[esbencito]

I knew there was an easy fix! Thanks!!

How would I now add several shapes in an array? I need to change the formatting of around 10 shapes at the same time.

Please Login or Register  to view this content.

what am I missing in the above to make it work?

[esbencito]

Never mind! Just solved it myself!

Please Login or Register  to view this content.

Thanks again!

[xlnitwit]

You're welcome, and thank you for the rep. Please remember to mark the thread Solved.