Prev: saving a powerpoint slide show as jpeg file
Next: PowerPoint 2003 with SharePoint Slide Library?
From: DORI on 14 May 2008 01:40
Dear all,
I make some drawings during the show and I want to delete them by clicking
on a button on the screen rather than going to shortcut menu. I got this code
from Microsoft website:

Private Sub CommandButton1_Click()
SlideShowWindows(1).View.EraseDrawing
End Sub

but it does not do anything when I click on the button. I have PPT 2003. Any
idea?
Thanks in advance for your time.
DORI

From: John Wilson john AT technologytrish.co DOT on 14 May 2008 03:54
As far as I can tell that code seems to be broken in 2003. It works for me in
2000

Have you tried pressing "E"?
--
-------------------------------------------
Amazing PPT Hints, Tips and Tutorials

http://www.PPTAlchemy.co.uk
http://www.technologytrish.co.uk
email john AT technologytrish.co.uk


"DORI" wrote:

> Dear all,
> I make some drawings during the show and I want to delete them by clicking
> on a button on the screen rather than going to shortcut menu. I got this code
> from Microsoft website:
>
> Private Sub CommandButton1_Click()
> SlideShowWindows(1).View.EraseDrawing
> End Sub
>
> but it does not do anything when I click on the button. I have PPT 2003. Any
> idea?
> Thanks in advance for your time.
> DORI
>
From: DORI on 14 May 2008 14:22
I figured it out. I added another line of code to change the pointer to
eraser and now it works:
Private Sub CommandButton1_Click()
SlideShowWindows(1).View.PointerType = ppSlideShowPointerEraser
SlideShowWindows(1).View.EraseDrawing
End Sub
Regards,
DORI

"John Wilson" wrote:

> As far as I can tell that code seems to be broken in 2003. It works for me in
> 2000
>
> Have you tried pressing "E"?
> --
> -------------------------------------------
> Amazing PPT Hints, Tips and Tutorials
>
> http://www.PPTAlchemy.co.uk
> http://www.technologytrish.co.uk
> email john AT technologytrish.co.uk
>
>
> "DORI" wrote:
>
> > Dear all,
> > I make some drawings during the show and I want to delete them by clicking
> > on a button on the screen rather than going to shortcut menu. I got this code
> > from Microsoft website:
> >
> > Private Sub CommandButton1_Click()
> > SlideShowWindows(1).View.EraseDrawing
> > End Sub
> >
> > but it does not do anything when I click on the button. I have PPT 2003. Any
> > idea?
> > Thanks in advance for your time.
> > DORI
> >
 | 
Pages: 1
Prev: saving a powerpoint slide show as jpeg file
Next: PowerPoint 2003 with SharePoint Slide Library?