开通会员
  • 尊享所有功能
  • 文件大小最高200M
  • 文件无水印
  • 尊贵VIP身份
  • VIP专属服务
  • 历史记录保存30天云存储
开通会员
您的位置:首页 > 帮助中心 > word转pdf分页太多-浏览word时每滚动一页都重新分页,以至浏览时很慢很...
默认会员免费送
帮助中心 >

word转pdf分页太多-浏览word时每滚动一页都重新分页,以至浏览时很慢很...

2023-01-13 02:01:00

浏览word时每滚动一页都重新分页,以至浏览时很慢很...

浏览word时每滚动一页都重新分页,以至浏览时很慢很...
你所说的分页,应该是指页面视图中的页面间空白吧?

一种方法:
工具 → 选项 → 视图 → 取消“页面间空白(仅页面视图)”前的√ → 确定 即可

另一种方法:
视图 → 选择“页面”之外的视图方式即可

将word文档分页 成为n个文档

将word文档分页 成为n个文档
200除以12大概的等于17,分别在第17,34,51,68,85,102,119,136,153,170,187页等插入分节符【下一页】。

打开文档,打开vb编辑器,将下面的代码粘贴到编辑器中,f5运行:

sub breakonsection()
' used to set criteria for moving through the document by section.
application.browser.target = wdbrowsesection
'a mailmerge documents ends with a section break next page.
'subtracting one from the section count stop error message.
for i = 1 to ((activedocument.sections.count) - 1)
'select and copy the section text to the clipboard
activedocument.bookmarks("\section").range.copy
'create a new document to paste text from clipboard.
documents.add
selection.paste
' removes the break that is copied at the end of the section, if any.
selection.moveup unit:=wdline, count:=1, extend:=wdextend
selection.delete unit:=wdcharacter, count:=1changefileopendirectory "c:\"
docnum = docnum + 1
activedocument.saveas filename:="test_" & docnum & ".doc"
activedocument.close
' move the selection to the next section in the document
application.browser.next
next i
activedocument.close
savechanges:=wddonotsavechanges
end sub
您已连续签到 0 天,当前积分:0
  • 第1天
    积分+10
  • 第2天
    积分+10
  • 第3天
    积分+10
  • 第4天
    积分+10
  • 第5天
    积分+10
  • 第6天
    积分+10
  • 第7天

    连续签到7天

    获得积分+10

获得10积分

明天签到可得10积分

咨询客服

扫描二维码,添加客服微信