批量删除Word文档中多个形状的填充颜色的3种方法

您所在的位置:网站首页 文档快速填充颜色 批量删除Word文档中多个形状的填充颜色的3种方法

批量删除Word文档中多个形状的填充颜色的3种方法

2024-07-10 03:55| 来源: 网络整理| 查看: 265

在这个post,我们很高兴向您展示 3 种有效的方法来批量删除 Word 文档中多个形状的填充颜色。

在将形状插入 Word 文档时,您也可以为它们应用填充颜色。 添加或删除单个形状的填充颜色很容易。 但是当涉及到批处理时,我们需要一些技巧。

这一次,我们想告诉你如何批量去除文档中多个形状的填充颜色。 因此,您可以用所需的颜色重新填充它们,或者只将形状留在空白背景中。 以下是可以在不同情况下为您提供帮助的 3 种方法。批量删除 Word 文档中多个形状的填充颜色

方法一:去除页面上多个形状的填充色 首先,单击功能区中的“主页”选项卡。 然后单击“编辑”组中的“选择”命令。 在下拉菜单中,选择“选择窗格”。单击“主页”-单击“选择”-单击“选择窗格” 现在在“选择和可见性”窗格中,您可以看到此页面上所有形状的名称。 按“Ctrl”选择你需要的形状。 然后单击功能区中的“格式”。 接下来点击“形状填充”。 在下拉菜单中选择“无填充”。选择形状-点击“格式”-点击“形状填充”-选择“无填充” 方法二:批量去除文档中所有形状的填充色 首先和形式ost,如果“开发者”选项卡可用,点击它,然后点击“Visual Basic”打开VBA编辑器。 如果“Developer”尚未激活,请按“Alt+F11”代替。 现在在编辑器中,单击左侧的“Normal”项目。 然后点击菜单栏上的“插入”。 接下来在下拉菜单中选择“模块”。点击“普通”-点击“插入”-点击“模块” 双击新模块将其打开并将这些代码粘贴到那里: Sub RemoveAllShapeFill() Dim objShape As Shape Dim objDoc As Document Application.ScreenUpdating = False 为 objDoc.Shapes 中的每个 objShape 设置 objDoc = ActiveDocument objDoc = Nothing End Sub 最后,单击“运行”按钮或按“F5”执行代码。粘贴宏-单击“运行” 方法三:去除文档中所有文本框的填充色

文本框属于形状类别。 如果您想删除所有文本框的填充颜色但保留其他形状的填充颜色,您可以使用这种方式。

首先,重复方法2中的步骤安装并运行宏。 而这一次,用这个替换那个宏: Sub RemoveTextBoxFill() Dim objShape As Shape Dim objDoc As Document Application.ScreenUpdating = False 为 objDoc.Shapes 中的每个 objShape 设置 objDoc = ActiveDocument If objShape.Type = msoTextBox Then objShape.Fill.Visible = msoFalse objShape.Line.Visible = msoTrue Else如果下一个 objShape Application.ScreenUpdating = True Set objDoc = Nothing End Sub 则退出结束

结果如下:去除所有文本框的填充颜色

快速恢复损坏的文档

如果您遇到文档损坏,请不要惊慌。 请记住,米ost 文档是可以恢复的。 你应该做的是抓紧时间 文档修复 工具。 如今,这样的实用程序可以极大地帮助您检索数据。

作者简介:

Vera Chen 是一位数据恢复专家 DataNumen, Inc.,它是数据恢复技术领域的世界领先者,包括 xls修复 和 pdf 修复软件产品。 欲了解更多信息,请访问 datanumen



【本文地址】


今日新闻


推荐新闻


CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3