'显示100%比例
DoCmd.RunCommand acCmdZoom100
'实现通过工具栏点击实现翻页,如果最大化时再点击放大,然后点翻页就只可以至页尾,而不能实现翻页,在翻页前先让它恢复到适当,然后这样才能实现翻页。可以用下面的函数
function rpdown() docmd.runcommand acCmdPreviewOnePage sendkeys "{PGDN}" end function