如何删除最后一页不影响其它页格式

banditson · 发表于 2020-10-13 15:19

如题，文档共15面，第1-14的页面布局都一样，最后一面不一样，之前是插入截图的，现在把截图删除了。当最后一页剩一个段落标记时按删键无法删除该页，在倒数第二页最后一个换行符按DEL键可以删除最后一页，但1-14页的所有页面布局都变成和删除的最后一页布局一样。请问怎么在不影响1-14页原有页面布局的情况下删除第15页（最后一页），谢谢！

banditson · 发表于 2020-10-13 16:44

test.rar (23.64 KB, 下载次数: 11)
我把1-14页内容删除了剩下两页，麻烦大大看一下，怎么删除最后页，保留第一页页面布局。

413191246se · 发表于 2020-10-13 22:30

楼主，只能调节第 14 页，留出一个很小的空行，第 15 页才会消失。最后一个空行，可以设置为0.06倍行距，并且取消两个与网格对齐选项。

banditson · 发表于 2020-10-14 08:59

413191246se 发表于 2020-10-13 22:30
楼主，只能调节第 14 页，留出一个很小的空行，第 15 页才会消失。最后一个空行，可以设置为0.06倍行距，并 ...

能不能详解过程，谢谢！我倒数第二页最后增加了几行（回车）都不行。

wdpfox · 发表于 2020-10-16 10:24

有个分页符，删除就可以了。

dafanshu1 · 发表于 2020-10-25 18:08

分别进入最后一节的页眉和页脚，取消选择“链接到前一条页眉”，然后把光标定位在“分节符（下一节）”前，然后按ctrl+shift+end，注意别选中“分节符（下一节）”前的回车符，如下图，然后delete即可。

原理请看我之前发的帖子：http://club.excelhome.net/thread-1555987-1-1.html

aman1516 · 发表于 2022-5-9 10:06

类似问题，
如何用VBA实现：删除 WORD 最后一个分页符以及分页符后面所有内容

aman1516 · 发表于 2022-5-9 10:11

Sub dddd()
Dim sts As Sentences, st, ks, cz$
Set Doc = ActiveDocument
cz = "^m"
With Doc
Set sts = .Sentences
For Each st In sts
ss = st.Text
If InStrRev(ss, cz) Then
ks = st.Start
Doc.Range(Start:=ks, End:=.Content.End).Select
Selection.Delete
Exit For
End If
Next
End With
End Sub

复制代码

这个是好像是按段落删除，如果仅删除个文档的最后一个分页符及后面所有内容，如何改代码？WORD的VBA操作不熟悉

		自动登录	找回密码
密码			免费注册

[求助] 如何删除最后一页不影响其它页格式

评分