World中利用宏命令批量删除页眉和页脚

某些world资料中有很多页眉页脚,真让人头疼…于是有了这个…
百度搜的宏处理代码来自 : https://jingyan.baidu.com/article/75ab0bcbf91d7297864db2ef.html
能看懂个大概,哈哈哈~

步骤

1. 打开world,找到视图–>宏–>查看宏 (或者Alt+F8,打开宏)

2.点击随便写一个宏名 , 然后点击创建(我这是已经有了,下面列表才有,已经有的可以点击编辑)

宏名自定义,随便写,我这里写的 RemoveHeadersAndFooters 见名知意,就不多啰嗦

3. 粘贴下面代码 (需注意 : 函数名称跟你填写的宏名保持一致)

下面这句话可以修改查找文件格式 eg: .doc 或者 .docx ; 我这里是 .docx
.Filters.Add "所有 WORD 文件", "*.docx", 1 '增加筛选器的项目为所有WORD文件

完整代码 :

Sub RemoveHeadersAndFooters()
'
' RemoveHeadersAndFooters 宏
'
'
Dim myDialog As FileDialog, oDoc As Document, oSec As SectionDim oFile As Variant, myRange As RangeOn Error Resume Next'定义一个文件夹选取对话框Set myDialog = Application.FileDialog(msoFileDialogFilePicker)With myDialog.Filters.Clear    '清除所有文件筛选器中的项目.Filters.Add "所有 WORD 文件", "*.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).RangemyRange.Delete    '删除页眉中的内容myRange.ParagraphFormat.Borders(wdBorderBottom).LineStyle = wdLineStyleNone    '段落下边框线Set myRange = oSec.Footers(wdHeaderFooterPrimary).RangemyRange.Delete    '删除页脚中的内容NextoDoc.Close TrueNextEnd IfEnd WithMsgBox "所选Word文档的页眉页脚已删除！！！", 64, "批量处理完毕"
End Sub

4. 保存,点击左上角的运行即可.

5. 关闭所有窗口,重新打开world文件,就可以看到页眉和页脚就已经处理了

World中利用宏命令批量删除页眉和页脚相关推荐

python (win32com) 批量删除 word (docx, doc) 中所有页眉、页脚 (Word.Application, Word.Basic)
之前看网上的资料,大部分都是用 python-docx 库来删除 word 文档的页眉.页脚: header.is_linked_to_previous = True 但是实际使用下来,问题不少,也不 ...
indesign选中不了图片删除_有办法了！批量删除多个Word页眉页脚
在实际工作中,我们时常需要添加页眉页脚,那如果不需要,该如何删除呢?怎样批量删除多个文档的页眉页脚呢?本期Word妹与大家分享相应的技巧. 1.删除单个文档的页眉页脚双击页眉处,进入编辑状态,然后选 ...
Word开发工具Aspose.Words功能演示：在C ++中以编程方式在Word文档中添加或删除页眉和页脚
Word文档中的页眉和页脚用于格式化和显示重要信息,例如主题,章节,页码,Copywrite等.以编程方式使用Word文档时,可能需要添加或删除页眉和页脚.为此,本文将教您如何使用C ++在Word文 ...
word删除任意单个字符_如何从Word中的单个页面中删除页眉或页脚
word删除任意单个字符 You can remove or make changes to headers or footers on any page in Microsoft Word. Thi ...
WORD中如何删除掉某几页的页眉和页脚
可以删除掉某几页的页眉和页脚: 假设你要删除掉前面四页的页眉和页脚,你只要在第四页和第五页的分界处分节:插入点定位在分节处-"插入"菜单-分隔符-在&quo ...
java epub 删除一页_java如何实现批量删除pdf指定的页数
依赖: org.apache.pdfbox pdfbox-app 1.8.10 java 用PDFBox 删除 PDF文件中的某一页,前n页,后n页,效率低,不推荐使用 package com.eve ...
Word中设置不同的页眉或页脚
Word中设置不同的页眉或页脚陈宇 2006年12月28日 13:41 原创默认情况下,创建页眉或页脚时,Word自动在整篇文档中使用同样的页眉或页脚.但在有些时候,我们需要为部分页面设置不同的页 ...
在word中如何在不同的章节中插入不同的页眉、页脚
日常工作中,普遍使用Word写论文.做文件等,这类Word文档一般较长,页数也很多,甚至有许多章节.但又要求不同的页面加上不同的页眉页脚.但是,在默认的情况下,Word所有的页眉页脚都是相同的.怎样才 ...
WORD中如何添加某几页的页眉和页脚
WORD中如何添加某几页的页眉和页脚电脑知识 2009-06-07 14:31 阅读35 评论0 字号: 大大中中小小 (这样实现的是目录和封面是一节,正文是一节,而 ...
mongo单个文档限制_如何在单个文档中使用多个页眉和页脚
mongo单个文档限制 Word features a few built-in ways to change up your headers and footers in a document. F ...

World中利用宏命令批量删除页眉和页脚

World中利用宏命令批量删除页眉和页脚

步骤

1. 打开world,找到视图–>宏–>查看宏 (或者Alt+F8,打开宏)

2.点击随便写一个宏名 , 然后点击创建(我这是已经有了,下面列表才有,已经有的可以点击编辑)

3. 粘贴下面代码 (需注意 : 函数名称跟你填写的宏名保持一致)

4. 保存,点击左上角的运行即可.

5. 关闭所有窗口,重新打开world文件,就可以看到页眉和页脚就已经处理了

World中利用宏命令批量删除页眉和页脚相关推荐

最新文章

热门文章

World中利用宏命令批量删除页眉和页脚

World中利用宏命令批量删除页眉和页脚

步骤

1. 打开world,找到 视图–>宏–>查看宏 (或者Alt+F8,打开宏)

2.点击 随便写一个宏名 , 然后点击创建(我这是已经有了,下面列表才有,已经有的可以点击编辑)

3. 粘贴下面代码 (需注意 : 函数名称跟你填写的宏名保持一致)

4. 保存,点击左上角的运行即可.

5. 关闭所有窗口,重新打开world文件,就可以看到页眉和页脚就已经处理了

World中利用宏命令批量删除页眉和页脚相关推荐

最新文章

热门文章

1. 打开world,找到视图–>宏–>查看宏 (或者Alt+F8,打开宏)

2.点击随便写一个宏名 , 然后点击创建(我这是已经有了,下面列表才有,已经有的可以点击编辑)