need a macro to select all shapes with somewhat similar names in all sheets of a workbook

Hi,

I am having a simple macro which select the a specific named shape and make it not printable when I print the sheet. It looks like as under:

Please Login or Register  to view this content.

Now, this sheet is having other shape also with the name as "small2" (in same sheet)
Then Sheet (2) will have shape as "small3", "small4"
Then Sheet (3) will have shape names as "small5", "small"6, "small7"
Total 6 sheets are there. and total shapes will be approx. 12

I want a macro to select all the shapes with the names like "smal*" Then select all of them one by one and make those non-printable.

Please guide me

Your sample code doesn't need all that indirection. You can refer directly to Shapes("small1"). Also based on your description, you want to use False instead of True.

Please Login or Register  to view this content.

It's done as under:

Please Login or Register  to view this content.

Administrative Note:

Welcome to the forum.

We would very much like to help you with your query, however we recommend that you include code tags around your code.

Please take a moment to add the tags. Posting code between [code]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/code] tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Please see Forum Guideline #2 about code tags and adjust accordingly. Click on Edit to open your post, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here.