Home » Category » Microsoft Visual Basic

Microsoft Visual Basic: Zoom in powerpoint?

112| Sat, 10 Nov 2007 12:04:00 GMT| wayne| Comments (4)
Does anyone know how to make your powerpoint slide open up with a zoom of
300? Right now it is opening up and is too small to read, there is also no
zoom when I open it as a webpreview.

Keywords & Tags: zoom, powerpoint, microsoft, visual basic, vb

URL: http://www.programmerbase.com/visual-basic/560746/
 
«« Prev - Next »» 4 helpful answers below.
Wayne,

I tried the following:

Dim ppt As PowerPoint.Application
Set ppt = New PowerPoint.Application

With ppt
.Activate
.Presentations.Add
.ActivePresentation.Slides.Add 1, ppLayoutBlank
.ActiveWindow.View.Zoom = 300
End With

This left me with a new slide (I don't have any real ones to open...) and
the Zoom set to 300%.

Will this solve your problem? (I've never done PowerPoint from VB.)

Craig Brown

"Wayne" <wayneat...hotmail.com> wrote:
>
>Does anyone know how to make your powerpoint slide open up with a zoom of
>300? Right now it is opening up and is too small to read, there is also
no
>zoom when I open it as a webpreview.

craigbrown | Sun, 11 Nov 2007 19:26:00 GMT |

Craig,
That will work if I open it through VB. I need it to open (zoomed) when someone
opens it out of a folder just by clicking on it. I didn't know if I could
put a macro in it to run upon opening the ppt?

"Craig Brown" <brown.c3...aetna.com> wrote:
>
>Wayne,
>
>I tried the following:
>
>
> Dim ppt As PowerPoint.Application
> Set ppt = New PowerPoint.Application
>
> With ppt
> .Activate
> .Presentations.Add
> .ActivePresentation.Slides.Add 1, ppLayoutBlank
> .ActiveWindow.View.Zoom = 300
> End With
>
>This left me with a new slide (I don't have any real ones to open...) and
>the Zoom set to 300%.
>
>Will this solve your problem? (I've never done PowerPoint from VB.)
>
>Craig Brown
>
>"Wayne" <wayneat...hotmail.com> wrote:
>>
>>Does anyone know how to make your powerpoint slide open up with a zoom
of
>>300? Right now it is opening up and is too small to read, there is also
>no
>>zoom when I open it as a webpreview.
>

wayne | Sun, 11 Nov 2007 19:27:00 GMT |

Wayne,

I apologize for misunderstanding your request.

I did a quick look in the PowerPoint help and tried running a few macros,
but it doesn't seem as though there is any sort of AutoRun, AutoExec, etc.
in PowerPoint. But then, my PowerPoint skills are very rudimentary.

Craig Brown

"Wayne" <wayneat...hotmail.com> wrote:
>
>Craig,
>That will work if I open it through VB. I need it to open (zoomed) when
someone
>opens it out of a folder just by clicking on it. I didn't know if I could
>put a macro in it to run upon opening the ppt?
>
>
>
>"Craig Brown" <brown.c3...aetna.com> wrote:
>>
>>Wayne,
>>
>>I tried the following:
>>
>>
>> Dim ppt As PowerPoint.Application
>> Set ppt = New PowerPoint.Application
>>
>> With ppt
>> .Activate
>> .Presentations.Add
>> .ActivePresentation.Slides.Add 1, ppLayoutBlank
>> .ActiveWindow.View.Zoom = 300
>> End With
>>
>>This left me with a new slide (I don't have any real ones to open...) and
>>the Zoom set to 300%.
>>
>>Will this solve your problem? (I've never done PowerPoint from VB.)
>>
>>Craig Brown
>>
>>"Wayne" <wayneat...hotmail.com> wrote:
>>>
>>>Does anyone know how to make your powerpoint slide open up with a zoom
>of
>>>300? Right now it is opening up and is too small to read, there is also
>>no
>>>zoom when I open it as a webpreview.
>>
>

craigbrown | Sun, 11 Nov 2007 19:28:00 GMT |

Thank You for trying Craig!!!

"Craig Brown" <brown.c3...aetna.com> wrote:
>
>Wayne,
>
>I apologize for misunderstanding your request.
>
>I did a quick look in the PowerPoint help and tried running a few macros,
>but it doesn't seem as though there is any sort of AutoRun, AutoExec, etc.
>in PowerPoint. But then, my PowerPoint skills are very rudimentary.
>
>Craig Brown
>
>"Wayne" <wayneat...hotmail.com> wrote:
>>
>>Craig,
>>That will work if I open it through VB. I need it to open (zoomed) when
>someone
>>opens it out of a folder just by clicking on it. I didn't know if I could
>>put a macro in it to run upon opening the ppt?
>>
>>
>>
>>"Craig Brown" <brown.c3...aetna.com> wrote:
>>>
>>>Wayne,
>>>
>>>I tried the following:
>>>
>>>
>>> Dim ppt As PowerPoint.Application
>>> Set ppt = New PowerPoint.Application
>>>
>>> With ppt
>>> .Activate
>>> .Presentations.Add
>>> .ActivePresentation.Slides.Add 1, ppLayoutBlank
>>> .ActiveWindow.View.Zoom = 300
>>> End With
>>>
>>>This left me with a new slide (I don't have any real ones to open...)
and
>>>the Zoom set to 300%.
>>>
>>>Will this solve your problem? (I've never done PowerPoint from VB.)
>>>
>>>Craig Brown
>>>
>>>"Wayne" <wayneat...hotmail.com> wrote:
>>>>
>>>>Does anyone know how to make your powerpoint slide open up with a zoom
>>of
>>>>300? Right now it is opening up and is too small to read, there is also
>>>no
>>>>zoom when I open it as a webpreview.
>>>
>>
>

wayne | Sun, 11 Nov 2007 19:29:00 GMT |

Microsoft Visual Basic Hot Answers

Microsoft Visual Basic New questions

Microsoft Visual Basic Related Categories