Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Publisher / Programming / April 2006

Tip: Looking for answers? Try searching our database.

enum PbZoom

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
rodchar - 24 Apr 2006 20:18 GMT
hey all,

i'm trying to set the zoom in my macro. i see the enum PbZoom but not sure
how to use it. i'd like to set the zoom to 100% if i can.

any ideas?

thanks,
rodchar
Ed Bennett - 24 Apr 2006 20:46 GMT
> i'm trying to set the zoom in my macro. i see the enum PbZoom but not
> sure how to use it. i'd like to set the zoom to 100% if i can.

Enums are just list of possible values, you need to use a property or object
that takes the enum as its type.

Going into c:\Program Files\Microsoft Office\Office11\1033\VBAPB10.CHM (the
Object Model Reference) and searching for Zoom brings up the entry for the
Zoom property.

====
Zoom Property
See AlsoApplies ToExampleSpecifics
Returns or sets a PbZoom constant or a value between 10 and 400 indicating
the zoom setting of the specified view. Read/write.
PbZoom can be one of these PbZoom constants.
pbZoomFitSelection Resizes the page view to the size of the current
selection.
pbZoomPageWidth Resizes the page view to the width of the publication.
pbZoomWholePage Resizes the page view to the size of a whole page.

expression.Zoom
expression    Required. An expression that returns one of the objects in the
Applies To list.
Example
The following example sets the zoom for the active publication so that the
entire page fits on the screen.
ActiveDocument.ActiveView.Zoom = pbZoomWholePage
====

Clicking Applies To gives the entry for the View object, which is normally
accessed through the ActiveView property of the Document object.

e.g. ActiveDocument.ActiveView.Zoom = pbZoomPageWidth

Signature

Ed Bennett - MVP Microsoft Publisher


Rate this thread:






 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.