wps office页眉页脚怎么删除?
发布时间:2022-08-29 21:21:29
wps office页眉页脚怎么删除?在职场办公时,我们经常会处理各种Word文档,也总会遇到各种类型的问题。就比如:
快下班时,老板突然交代你,将一份上百页甚至几百页的策划书中的所有页眉和页脚全部删除,下班之前就要。
遇到这样的情况,真的要满头黑线了吧……
怎么办?想必大多数人都是打开文档,认认真真的挨个手动删除。就像这样……
上图中这类采用了分节符,把每页或每章节分隔开单独设置了不同的页眉页脚,你若还在手动删除它们,要删到猴年马月?只怕到最后留在公司加班的只剩你了,那时,你的耐心也被消磨完了吧!本文就教大家一招,只用3步就帮你解决这个问题!
操作方法:
1. 打开Word,新建一个空白Word文档,按Alt+F11组合键,打开VBA编辑器。
2. 然后将下面的代码复制粘贴到窗口中。点击上方的“运行子过程/用户窗体(F5)”绿色三角形按钮,运行代码。
Sub 批量删除页眉页脚()
‘此代码功能为列出指定文件夹中所有选取的WORD文件全路径名
Dim myDialog As FileDialog, oDoc As Document, oSec As Section
Dim oFile As Variant, myRange As Range
On Error Resume Next
‘定义一个文件夹选取对话框
Set myDialog = Application.FileDialog(msoFileDialogFilePicker)
With myDialog
.Filters.Clear ‘清除所有文件筛选器中的项目
.Filters.Add “所有Word文件”, “*.doc,*.docx”, 1 ‘增加筛选器的项目为所有Word文件
.AllowMultiSelect = True ‘允许多项选择
If .Show = -1 Then ‘确定
For Each oFile In .SelectedItems ‘在所有选取项目中循环
Set oDoc = Word.Documents.Open(FileName:=oFile, Visible:=False)
For Each oSec In oDoc.Sections ‘文档的节中循环
Set myRange = oSec.Headers(wdHeaderFooterPrimary).Range
myRange.Delete ‘删除页眉中的内容
myRange.ParagraphFormat.Borders(wdBorderBottom).LineStyle = wdLineStyleNone ‘段落下边框线
Set myRange = oSec.Footers(wdHeaderFooterPrimary).Range
myRange.Delete ‘删除页脚中的内容
Next
oDoc.Close True
Next
End If
End With
End Sub
3. 此时,将弹出“浏览”对话框,选择要删除页眉页脚的Word文档,然后点击“打开”按钮。
关闭所有窗口,再次打开刚刚被处理的Word文档,即可发现,文档中的所有页眉页脚都全部删除啦!
就是这么简单,搞定!交给老板,准时下班!
猜你喜欢
- 当我们使用win10操作系统时,如果我们想下载office10,小编认为我们可以在app store中安装和下载Office,或者通过Off
- 以下功能列表虽然不全面,但可让你了解 Word 如何跨各种平台进行比较。双向文本功能● 支持功能◌不支持该功能功能操作Word 2016和更
- EXCEL每格批量加前缀的方法:1.打开目标Excel文件,选中目标区域(假设是全部表格)。2.右键,选择“设置单元格格式”。3.选择“数字
- Excel是我们经常使用的办公室软件,如果我们需要对表格数据做一下标记,打上对号,那么怎么插入呢?下面随小编一起看看吧。Excel表格插入对
- 一、word文档的保存1.文档的常规保存不多说,很多方法都可以实现,你只要挑一种你喜欢的方法就可以了!
- 在安装软件的时候,不小心安装了捆绑软件或者垃圾广告插件后,使用电脑的时候就会时不时弹出广告弹窗,关闭了下次开机还是一样出现怎么办。那么win
- 在Word2010文档中进行邮件合并时,如果确认合并后生成的信函准确无误,并且对所有收件人的信函没有特殊要求,则可以直接合并到打印机(即直接
- Excel中的“合并及居中”功能可以将多个相邻的单元格合并成一个大的单元格。我们可以对单元格区域进行“合并及居中”、“跨越合并”
- 很多小伙伴在excel表格中出现多单元格带颜色的需要清除内容,一般都是一个个清除操作,但是这种操作十分麻烦,今天给大家分享一键清除小妙招在日
- 审核公式可以查看公式的引用和从属关系,除此之外还可以用来检查公式的错误根源,公式的审核主要包括公式返回值的错误、追踪引用和从属单元格,已经移
- Excel2016表格怎么取消撤销操作?excel中操作错了,都会撤销,但是不小心撤销错了,该怎么办呢?下面我们就来看看详细的解决办法,需要
- 1.打开需要修改单元格样式的Excel表格,选中需要修改样式的单元格,接着点击工具栏的“开始”→“样式”,在样式里我们可以选择“条件样式”2
- 有时我们想将Word文档保存到云网盘上,可是国内的一些网盘要注册,而且送的免费容量都不大,在Word2013中,利用自带的SkyDrive功
- FineReport报表软件怎么制作3D圆环图?FineReport中想要制作一个立体的环形图表,该怎么制作环形图表呢?下面我们就来看看详细
- Excel中的函数data在登记表上为常用函数,具体该如何使用DATA函数呢?接下来是小编为大家带来的excel data函数的使用教程,供
- Office2007是所有Office办公系列软件中最经典也是最受大众欢迎的一款办公软件。不过,如果我们想要更好的使用Office2007所
- 本文主要讨论如何直接对比两个不同Excel文件的信息。当你开始操作和对比信息时,你可能希望使用Lookup、Index和Match函数来帮助
- 有很多用户遇到win10不能打开设置,右键个性化,文件没有相关程序执行操作,请安装程序,或者,如果安装程序,请在默认程序控制面板上创建关闭,
- 如果需要多人同时编辑同一个个工作簿,可以使用Excel 的共享工作簿功能,将它保存到其他用户可以访问到的网络位置上,方便其他用户同时编辑、查
- 每次打开Word 2010的时候总是提示正在配置,安装完后会多出来微软拼音输入法2010,在恢复组件里取消了以后出现了03版的微软拼音,这个