如何打印不含填充颜色的工作表?
在 Excel 中,通常会使用各种颜色对单元格数据进行格式设置,以突出重要信息、区分数据类别,或仅是为了让大型数据集更易于浏览。然而,当您将工作表发送至打印机时,所有背景填充色、彩色字体及其他格式都会按照屏幕显示效果如实打印出来,如下图所示:

使用这些颜色打印会消耗大量墨水或碳粉,这在您仅需一份简单的单色打印稿用于审阅或分发时,可能并不理想。为解决这一问题,Excel 提供了多种方法,助您轻松生成不含填充颜色的打印版本。这些方案不仅能帮您节省墨水、提升可读性,还能确保报告呈现专业而简洁的外观。本文将为您介绍几种实用技巧,方便您根据实际需求选择最适合的方式,高效打印无填充色的工作表。
目录
在 Excel 中打印不含填充颜色的工作表
Excel 内置的打印设置提供了一个“单色打印”选项,可忽略所有填充颜色,以黑白模式打印全部内容。这是一种简单直接的方法,特别适合在不更改实际数据格式的前提下,快速切换彩色与黑白打印。不过,该功能存在一定限制:“单色打印”作用于整个工作表,无法为特定区域保留原有颜色格式。此方法非常适合用于报告、分析或财务文档等场景,既能有效节省墨水,又能确保打印输出简洁易读。
如何使用单色打印打印选项:
1. 激活要打印的工作表。
2. 然后点击页面布局选项卡中的功能区,再点击页面设置组右下角的小页面设置按钮,即可打开页面设置对话框。(请参见下方截图。)

3. 在页面设置对话框中,切换到工作表选项卡,然后勾选打印部分中位于单色打印下方的复选框。(请参见下方截图。)此选项可让 Excel 忽略所有单元格颜色(包括背景填充、字体颜色和边框颜色),并严格以单色打印工作表。

4。(可选但推荐)在打印预览对话框中,点击页面设置,即可查看打印时工作表的显示效果。

5. 单击确定确认设置,然后照常打印工作表。打印输出将省略所有彩色单元格背景及依赖颜色的功能(例如使用条件格式填充的内容),仅保留文本、数字、边框及其他非颜色格式。
注意:此方法适用于大多数标准打印需求,操作快捷简便。但若您需要更精细的控制(例如仅移除特定区域的填充颜色,或让某些区域以灰度阴影呈现),请考虑采用以下其他解决方案。
VBA 代码 —— 打印前临时移除填充颜色
有时,您可能希望打印不含任何填充颜色的工作表,但内置的“单色打印”选项未必能满足需求——尤其是当您需要将此设置应用于特定区域,或确保某些形状和图表元素也以无填充方式打印时。此时,您可借助 VBA 宏,在打印前临时移除所有单元格的填充颜色,并在打印完成后立即恢复原状。这一方法提供高度自定义能力,特别适合处理复杂工作表或自动化重复打印任务的高级用户。
优势:该解决方案提供极为精细的控制——您不仅能自由选择要影响的工作表区域,还可进一步自定义代码,以完美适配特定工作表或工作簿的功能。
劣势:需启用宏,且用户应熟悉 VBA 编辑器操作。在共享工作簿或高度监管的环境中,可能不适用于广泛使用宏。
1. 打开您的工作簿,按 Alt + F11 以打开 Microsoft Visual Basic for Applications 窗口。在 VBA 窗口中,单击插入 > 模块 以创建新模块,然后将以下代码粘贴到该模块中:
Sub PrintWithoutFillColor()
Dim rng As Range
Dim arrColors() As Variant
Dim i As Long, j As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.InputBox("Select the range to print (leave blank for entire sheet):", xTitleId, Selection.Address, Type:=8)
If rng Is Nothing Then
Set rng = ActiveSheet.UsedRange
End If
' Store the current fill colors
ReDim arrColors(1 To rng.Rows.Count, 1 To rng.Columns.Count)
For i = 1 To rng.Rows.Count
For j = 1 To rng.Columns.Count
arrColors(i, j) = rng.Cells(i, j).Interior.Color
rng.Cells(i, j).Interior.ColorIndex = xlNone
Next j
Next i
' Show Print Preview
ActiveSheet.PrintPreview
' Restore fill colors
For i = 1 To rng.Rows.Count
For j = 1 To rng.Columns.Count
rng.Cells(i, j).Interior.Color = arrColors(i, j)
Next j
Next i
End Sub 2. 粘贴代码后,关闭 VBA 编辑器。要运行宏,请返回 Excel,按 Alt + F8 打开“宏”对话框,选择 PrintWithoutFillColor,然后单击运行。出现提示时,请选择要打印且不含填充颜色的目标区域;若未选择区域而直接单击“确定”,则默认包含工作表上的整个已用区域。宏将自动移除所选区域的填充颜色、打开打印预览,并在完成后恢复原始颜色,最大限度降低意外数据丢失或格式被误改的风险。
提示:若在超大区域运行此宏,可能需要数秒时间。如需同时移除图表或图形对象的填充颜色,则须进一步自定义 VBA 代码。运行或编辑宏前,请务必先保存您的工作。
故障排除与提示:
- 如果打印输出中仍有颜色,请确保您的打印机设置(Excel 外部)未覆盖“黑白”或“单色”选项。
- 打印前务必预览文档,避免浪费纸张和墨水。
- 如果您经常需要以单色方式打印,建议为打印用途保存一份工作簿副本。
总结:根据您的需求,可选择 Excel 内置的黑白打印选项(适用于整个工作表),或通过 VBA 实现自动化、临时的格式调整,以打印不含填充颜色的内容。选择最适合您场景的方法,在节省墨水、操作便捷性与打印布局控制之间取得理想平衡。
相关文章:
最佳办公效率工具
| 🤖 | KUTOOLS AI 助手:基于以下内容革新数据分析:智能执行 | 生成代码| 创建自定义公式 | 数据分析及生成图表| 调用 Kutools Functions…… |
| 热门功能:查找、高亮或标记重复项 | 删除空白行 | 合并列或单元格且不丢失数据 | 不使用公式的四舍五入…… | |
| 高级 LOOKUP:多条件 VLookup | 多值 VLookup | 跨多工作表 VLookup | 模糊查找…… | |
| 高级下拉列表:快速创建下拉列表 | 级联下拉列表 | 多选下拉列表…… | |
| 列管理器:添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列…… | |
| 特色功能:网格聚焦 | 设计视图 |增强编辑栏 | 工作簿和表管理器 | 资源库(自动文本)| 日期提取 | 汇总工作表 | 加密/解密单元格 | 按列表发送邮件 | 超级筛选 | 特殊筛选(筛选粗体单元格/斜体/删除线……) ...... | |
| 精选 15 工具集:12 文本工具(添加文本,删除特定字符,……)| 50+ 图表 类型(甘特图,……)| 40+ 实用公式(基于生日计算年龄,……)| 19 插入工具(插入二维码,从路径插入图片,……)| 12 转换工具(小写金额转大写,汇率转换,……)| 7 合并和拆分工具(高级合并行,分割单元格,……)|……更多 |
使用 Kutools for Excel 大幅提升您的 Excel 技能,体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能,助您提升生产力、节省时间。立即点击此处,获取您最需要的功能……
Office Tab 为 Office 带来标签式界面,让您的工作更轻松
- 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
- 在同一个窗口的新标签页中打开并创建多个文档,而非在新窗口中。
- 将您的工作效率提升 50%,每天减少数百次鼠标点击!
所有 Kutools 插件,一个安装程序
Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro,非常适合需要跨多个 Office 应用高效协作的团队。
- 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
- 一个安装程序,一个许可证— 几分钟内完成设置(支持 MSI)
- 协同效果更佳— 在多个 Office 应用中实现高效协同
- 30 天全功能试用— 无需注册,无需信用卡
- 超值之选— 比单独购买插件更省钱