在实际工作中,为什么页脚删除不掉,我们时常需要添加页眉页脚,那如果不需要,该如何删除呢?怎样批量删除多个文档的页眉页脚呢?本期与大家分享相应的技巧。
1、删除单个文档的页眉页脚
双击页眉处,进入编辑状态,然后选中文本内容按删除键,之后再点击开始——字体——清除所有格式清除页眉横线,最后关闭页眉和页脚即可。
PS:想了解更多删除页眉横线的删除方法,可以查看《Word文档中间的横线,怎么删除不了?》。
2、删除多个文档的页眉页脚
如何批量删除上百个Word文档的页眉页脚呢?
这里需要借用VBA来实现。
1、打开word文档,双击点击页眉。2、使用键盘快捷键“Ctrl+A"全选文字。3、按下键盘上的退格键,即可删除页眉。4、随后将页面下滑,双击页脚。5、使用键盘快捷键“Ctrl+A"全选文字,接着按下退格键,即可看到页脚也被删除。
Sub 批量删除页眉页脚()
'此代码功能为列出指定文件夹中所有选取的WORD文件全路径名
Dim oFile As Variant,myRange As Range
1、首先打开软件,找到一个编辑好的文档。这个文档要有页眉,我们才能对其中一项进行删除。2、首先在菜单栏中找到插入—页眉页脚这项。点击进去,在属性栏(叫惯了)有一个页眉页脚选项。点击这个选项。3、然后找到我们要删。
On Error Resume Next
'定义一个文件夹选取对话框
Set myDialog =Application.FileDialog(msoFileDialogFilePicker)
1、在上方切换到【插入】,然后点击右侧的【页眉】或【页脚】。2、点击下拉按钮出现菜单后,选择【删除页眉】。3、页脚也是一样的,点击页脚的下拉按钮出现菜单后,选择【删除页脚】。
With myDialog
.Filters.Clear '清除所有文件筛选器中的项目
.Filters.Add &34;,&34;,1 '增加筛选器的项目为所有Word文件
.AllowMultiSelect = True '允许多项选择
If .Show = -1 Then '确定
1、打开需要操作的WORD文档,双击页脚位置,使之处于编辑状态,然后在页眉页脚设计工具中找到并点击“页脚”。2、在页脚的下拉选项中点击“删除页脚”即可。3、双击正文任意区域,退出页眉页脚编辑状态,返回word文档,发现页脚已。
For Each oFile In .SelectedItems '在所有选取项目中循环
For Each oSec In oDoc.Sections '文档的节中循环
myRange.Delete '删除页眉中的内容
myRange.ParagraphFormat.Borders(wdBorderBottom).LineStyle= wdLineStyleNone '段落下边框线
Set myRange =oSec.Footers(wdHeaderFooterPrimary).Range
myRange.Delete '删除页脚中的内容
Next
oDoc.Close True
Next
End If
1、通过桌面搜索或快捷方式打开word应用程序。2、在界面左侧点击需要取消页脚的word文档。3、在word界面左上方点击“插入”选项卡。4、在随后打开的菜单中点击“页脚”按钮。5、在接着打开的下拉菜单底部点击“删除页脚”按钮。
End With
windows7 wps office2021 1、打开wps文档,点击【插入】。2、在所有功能内,找到【页眉页脚】。3、这时分别点击【页眉】和【页脚】。4、在弹出来的信息中,点击【删除页眉页脚】。5、成功删除页眉和页脚,再点击关闭页眉。
End Sub