Accessing individual shapes of SmartArt and Charts

[RAHUL]

Hi All,

I want to access the individual shapes inside the smart art and save
them as images (gif/png).
I could use the shape.Export (even though its undocumented) method on
the whole smartArt object. but when I try to do the following, it
gives me an error in shape1.Export call saying "Runtime error 80048240
Shape (unknown member): Invalid request

For x = 1 To smartArtShape.GroupItems.Count
Set shape1 = .GroupItems.Item(x)
shape1.Export strName, ppShapeFormatGIF, 100, 100
Next x

Is there a way to get the images of individual shapes inside smartArt
object. I want to get them because I want to simulate the "one by one"
animation applied on the smart art using some other technology.

I also want to get the images of individual shapes (Cylinders, boxes,
cones, etc.) for a Chart object, but I could not find any information
on that too.
Any help is greatly appreciated.

Thanks in advance

 

[Jim Cone]

In Excel, one first has to ungroup shapes before being able to access individual members.
I suspect that is the problem with your code.
You can/should store the names of the shapes in a variant array before ungrouping them.
--
Jim Cone
Portland, Oregon USA
http://www.mediafire.com/PrimitiveSoftware
(free and commercial excel programs)

..
..
..

"RAHUL" <[email protected]>
wrote in message
Hi All,

I want to access the individual shapes inside the smart art and save
them as images (gif/png).
I could use the shape.Export (even though its undocumented) method on
the whole smartArt object. but when I try to do the following, it
gives me an error in shape1.Export call saying "Runtime error 80048240
Shape (unknown member): Invalid request

For x = 1 To smartArtShape.GroupItems.Count
Set shape1 = .GroupItems.Item(x)
shape1.Export strName, ppShapeFormatGIF, 100, 100
Next x

Is there a way to get the images of individual shapes inside smartArt
object. I want to get them because I want to simulate the "one by one"
animation applied on the smart art using some other technology.

I also want to get the images of individual shapes (Cylinders, boxes,
cones, etc.) for a Chart object, but I could not find any information
on that too.
Any help is greatly appreciated.

Thanks in advance

 

[RAHUL]

Hi Jim,

I tried un-grouping the smartAart in VBA by calling
smartArtShape.Ungroup, but I got a RunTime error "This member can only
be accessed for a group)

I am using PowerPoint 2007 and the smart art is in a pptx file.

Thanks
Rahul

 

[Jim Cone]

I do not program in PowerPoint, so beware.
In Excel I would check to see if the shape was grouped and proceed accordingly...

If smartArtShape.Type = msoGroup Then
'store shape names then ungroup them and export them individually
Else
smartArtShape.Export strName, ppShapeFormatGIF, 100, 100
End If
--
Jim Cone
Portland, Oregon USA


"RAHUL" <[email protected]>
wrote in message
Hi Jim,

I tried un-grouping the smartAart in VBA by calling
smartArtShape.Ungroup, but I got a RunTime error "This member can only
be accessed for a group)

I am using PowerPoint 2007 and the smart art is in a pptx file.

Thanks
Rahul