- 141
- 0
- 约2.67千字
- 约 8页
- 2020-03-25 发布于江西
- 举报
怎么在 word 中批量删除页眉和页脚
在日常工作中,我们有时会碰到一大堆文件需要批量删除页眉与页脚, 如果一个个打开文件手工删除的话,会很耗时间精力,下面小编就教你怎么 在 word 中批量删除页眉和页脚.
word 中批量删除页眉和页脚的步骤:
首先,我先制作一个测试文件夹,里面包含几个 word 文档,都有页眉-- 百度经验这四个字,当然其他的文字也行,只是一个测试;
下面我们需要打开宏,03 版的宏不需要去开启开发工具,只需要点击 菜单栏中的工具-宏-宏;
进入宏对话框,我们可以在宏名随便输入英文字母,在右侧点击一下创 建;
接着,进入了宏代码编写框,将下面代码复制进来:
Sub 批量删除页眉页脚()
Application.ScreenUpdating = False
Dim MyPath As String, i As Integer, myDoc As Document
With Application.FileDialog(msoFileDialogFolderPicker)
.Title = 选择要处理目标文件夹 ——(删除里面所有 Word 文档的页 眉页脚)
If .Show = -1 Then
MyPath = .SelectedItems(1)
Else
Exit Sub
End If
您可能关注的文档
最近下载
- 《增材制造技术》全套教学课件.pptx
- 老年患者围手术期多模式镇痛低阿片方案中国专家共识(2021版)(三).docx VIP
- 埃夫特机器人-ROBOXER系列机器人操作手册.pdf VIP
- 2026开学安全第一课-小学生主题班会通用版课件(共40张PPT).pptx VIP
- 2026秋季新学期班干部聘任仪式.pptx
- 部编人教版九年级上册语文全册教学设计(配2026年秋改版教材).doc
- G359-1~4:悬挂运输设备轨道(2005年合订本).pdf VIP
- 纪委遴选笔试题及答案.doc VIP
- 汽车仪表盘图标大全.pdf VIP
- GBT19228.3-2012 不锈钢卡压式管件组件 第3部分: O形橡胶密封圈.pptx VIP
原创力文档

文档评论(0)