Excel Autoshape Question

[shelby55]

Hi

I received an Excel 2003 document recently that used the smiley face but also had a frown face and an "indifferent" face meaning that the line of the mouth was straight across.

However, I don't see the frown or indifferent face in the list of shape objects. Just to test that they were auto shapes and not wingdings I turned on the macro and copied it from one worksheet to another and it was referenced as a "Shape".

Can someone advise where I would find them? Better yet, can you advise how I would reference them in VBA? Thanks.

 

[SkipVought]

how I would reference them in VBA?

Use the Watch Window. faq707-4594

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[shelby55]

Hi Skip

Thanks very much but the macro didn't reference the items this time only "selection.copy" and "activsheet.paste" so I'm not able to see what they are.

Other ideas to identify them?

Thanks.

 

[shelby55]

Hi

I thought I would advise that I figured this out. There aren't different faces, only the smiley face (msoShapeSmileyFace) but you can edit the smile to be frown or indifferent using selection.shaperange.adjustments.item(1). 0.7181 is the frown and 0.7727 is the indifferent face.

 

[SkipVought]

Then you only need ONE of these, and simply assign the appropriate 'expression' constant based on the value you are testing.

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}