Code to control Command Button In Powerpoint'07

[Vinoth]

Hi All,

Hope all is well.

I'm trying to write a macro in Powerpoint'07 and I am very new in writing macros in ppt'07.

I have created a commandbutton in slide1 and if I click this I will get one(or)more shapes (The shape is arrow ---->). This is done by using the below code.

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddLine(BeginX:=350, BeginY:=120, EndX:=450, EndY:=230).Line
'.DashStyle = msoLineDashDotDot
.BeginArrowheadStyle = msoArrowheadNone
.EndArrowheadStyle = msoArrowheadOpen
.EndArrowheadWidth = msoArrowheadWidthMedium
.EndArrowheadLength = msoArrowheadLengthMedium
.ForeColor.RGB = RGB(251, 0, 0)
End With

Now, I have created another commandbutton in slide1 and I need code to clear all the shapes (The shape is arrow ---->) by clicking this button.

Expecting your reply.


Thanks,
Vinoth