企业官网建设流程全解析

之前帮朋友做公众号配图，她从Excel里一张张截图，截到一半表格超宽被切成了两半，一页表要分两张图拼，折腾了一下午还没弄完。我说你这是在浪费时间——Excel批量转单页图片，本来就是有现成套路的事，最快的几分钟出几十张。

所谓“单页图片”，指的是把一个Excel里的每一页内容独立保存成一张PNG或JPG文件。它有两种常见形态：一种是工作簿里有12张工作表，每张工作表各自变成一张图；另一种是一张超长超宽的大表，Excel按打印分页切成几十页，每页单独成为一张图。这两种需求在办公里都特别常见：写日报、做PPT、发报价单、传工作群，直接甩图比甩表格直观得多。

今天这篇把我自己在项目里用过的4种方法完整写出来，前两种不写一行代码，打开Excel就能操作；后两种复制代码就能跑，适合每周几十张表、要反复出图的场景。全程不用会员、不用额外买工具，Excel 2016以上和WPS都能用，新手按顺序看完，基本都能直接上手。

1. 先搞清楚你要的“单页图片”是哪种：三种需求对应三条思路

1.1 三种常见需求，别选错方向

我见过不少朋友一上来就搜“批量导出”，结果操作到一半发现方向不对。实际上“批量转单页图片”在你手里可能对应三种完全不同的需求，先判断好，后面就不会白折腾。

• 需求A：每个工作表变成一张图。一份工作簿里有“一月、二月、三月……十二月”12张报表，我想一次把12张表都导出为12张PNG，文件名还跟着工作表名走。这是最典型的批量场景，适合用PDF中转法或者VBA宏。
• 需求B：一张超长超宽的大表，按打印分页拆成多张图。比如ERP导出的订单明细，2000行、30列，一页根本放不下。Excel会按照纸张大小自动切成很多页，每一页需要单独成为一张图，适合用PDF中转法或Python批量处理。
• 需求C：只要某一小块区域，比如A1到H50这些单元格变图片，用于插到PPT或Word里。这种不确定性很强，每次框选范围都不同，用Excel自带的“复制为图片”反而最快。

1.2 为什么“打印分页”是所有方法的地基

在讲具体操作之前，必须先明白一件事：Excel导出图片时的边框，就是“打印分页”的边框。导出PDF再转图片也好，用VBA也好，图片显示出来的边界完全遵循Excel的打印规则。

你如果想让图片好看、不截断、不留大片空白，核心不是在导出环节调，而是在导出之前，进入“视图→分页预览”，把蓝色虚线拖动到你想要的位置。很多群友问我“为什么导出的图片列会被切开”，十有八九就是没有先看一眼分页预览。

这一步不管选哪种方法都绕不开。所以后面的方法里，第一步我都会先让你调打印设置，这不是废话，是所有“图片长得好看”的前提。

2. 方法一：Excel另存为PDF再批量导出图片（零代码、最稳妥）

2.1 导出前先调一次打印设置，宁多花三分钟

操作路径：打开表格 → “页面布局” → “缩放” → 把“宽度”设为“1页”，“高度”设为“自动”。

这个设置的意思是说：不管表格有多少列，都会在横向压缩到一页之内，纵向如果太长则自动分页。对绝大多数报表来说，这是最舒服的导出比例，图片不会出现某列被切到下一页的尴尬情况。

然后再去“视图→分页预览”里拖动蓝色分页线，把每一页要展示的内容范围确定好。如果表格里有一些测试数据、备注列不想放进图片，先选中想要的范围，到“页面布局→打印区域→设置打印区域”，后面导出的时候只认这个区域。

2.2 另存为PDF：这一步把网格线、字体、列宽都锁住

操作路径：文件 → 另存为 → 选择PDF格式 → 发布。

这里的关键点是：PDF是矢量格式，Excel的字体、边框、背景色、合并单元格都会被原样保留，不会像截图软件那样出现锯齿。如果工作簿里有多个工作表，每个工作表都会按自己的打印设置生成PDF页面，一个12张表的工作簿，导出的PDF就是12页或更多页。

如果你是WPS用户，同样在文件菜单里找“输出为PDF”，效果一致。之后这个PDF文件就成了图片的母版，怎么放大都不会失真。

2.3 PDF整本导出为一张张图片

这一步推荐用你电脑上已有的PDF阅读器或编辑器。主流PDF阅读器基本都带“导出图片”功能，一般在“文件→导出→图片”或者“工具→导出图片”里，导出时可以选择PNG还是JPG，以及分辨率。

• 日常发工作群、插PPT：150dpi足够，文件也不会太大。
• 要打印、要放进印刷品：选300dpi。
• 只想看个草稿：72dpi就别选了，放大后会糊。

不想装任何新软件的话，可以临时用网页搜索“PDF转图片在线工具”，大部分免费站点支持上传后按页导出压缩包。但这里要特别提醒一句：敏感数据、客户名单、工资表这类文件不要传任何在线工具，隐私风险远大于方便。稳妥起见，还是在本地PDF阅读器里操作。

极少数情况下“另存为PDF”的设置不稳定，这时可以用打印机方案：Ctrl+P调出打印对话框，选择“Microsoft Print to PDF”这个虚拟打印机，效果一样。

2.4 这个方法最容易翻车的3个点

第一，表格明明不算宽，但图片里列还是被切开了。原因是打印纸张默认是A4纵向，列太多时一页放不下。解决办法就是2.1里的“宽度设1页”，在缩放选项里把宽度压进去。

第二，合并单元格里的字被截断。先取消合并，或者把这一列拉宽，设成自动换行，别指望PDF中转能帮你补字。

第三，四周留白太大，图片看起来不饱满。去“页面布局→页边距→自定义页边距”，把左右上下都调到0.3cm左右，导出的图片会更像一张完整的表格截图。

3. 方法二：Excel/WPS自带的“复制为图片”技巧（不用代码，临时少量导出用它）

3.1 最常见的免代码操作：复制区域→粘贴为图片→另存为图片

这个方法适合需求C，也就是只想导出某一小块区域。操作很简单：

1. 选中要导出的单元格区域，按Ctrl+C复制。
2. 随便点一个空白单元格，到“开始→粘贴→选择性粘贴”，在“其他粘贴选项”里选“图片”。
3. 此时Excel会把这部分区域变成一个图片对象，右键这张图片，选择“另存为图片”，就会得到一个独立的PNG文件。

WPS用户更快：选中区域后，右键菜单里直接有“复制为图片”，弹窗里勾选“按打印效果”后确定，再右键保存成图片文件即可。这个“按打印效果”选项一定要选，它能保留表格的边框和网格线，不选的话导出来有时是纯白色背景。

这个方法的好处是所见即所得，缺点也很明显：一块区域一次只能保存一张，做不到“一键导出12张表”。所以它更适合插PPT、做文档、给设计同事发参考图这类临时场景。

3.2 想要图片和数据联动？把Excel的“照相机”调出来

Excel里藏着一个叫“照相机”的功能，默认状态下藏在“不在功能区中的命令”里。调出方法：文件 → 选项 → 自定义功能区 → 从左侧下拉框选“不在功能区中的命令” → 找到“照相机” → 添加到新选项卡。

用起来是这样的：先选中一段数据区域，点一下“照相机”按钮，再到空白处点一下，这段区域就变成了一个会“实时刷新”的图片对象。原始表格里的数字改掉，图片里的数字会跟着变，适合做Dashboard看板。

如果需要把这个动态图片保存成文件，同样右键图片对象→另存为图片。注意：保存下来的PNG文件是当前那一刻的快照，不会跟着数据变，所以每次数据更新后要重新另存一次。

3.3 想批量一点？用“成组工作表”配合方法一

如果你只是偶尔要出12张表，不想折腾VBA和Python，还有一个折中打法：

按住Ctrl键，依次点击底部的工作表标签，把12张表全部选中，此时Excel进入了“成组”状态。在这个状态下，你只要调一次页面设置、缩放比例、页边距，所有选中的工作表会一起变。设置完成后，直接走到方法一的“另存为PDF”再导出图片。

这个方法本质上是方法一的简化版，但我强烈建议所有新手先掌握它。很多“每周要做12张图”的重复工作，靠这个组合就能解决，根本不用上升到代码层面。

4. 方法三：VBA宏一键把每个工作表存成PNG（复制即用，重度用户省命）

4.1 什么情况下值得上VBA

当你手里是一份固定模板，表格结构永远不变，只是每周替换数据，然后要导出几十张图的时候，方法二点几十次就很累了。这时候把导出动作交给VBA宏，打开文件、按一个快捷键、图片自动落在文件夹里，一分钟收工。

VBA难不难？如果你只是复制下面这段代码，改一下保存路径，它就不难。你用Excel时不需要会编程，只要会“复制→粘贴→运行”就行。

4.2 这段宏的原理：CopyPicture + Chart.Export

VBA导出图片的原理不太直观，我第一次看的时候也愣了一下。Excel没有一个工作表对象直接提供“保存成图片”的按钮供代码调用，所以常见的做法是两步走：

1. 用CopyPicture方法，把工作表的已用区域复制成一张图片，这个操作等价于你手动点击“复制为图片”。
2. 在工作表上创建一个临时图表对象，把这张图片“粘贴”到图表里，再用图表的Export方法导出为PNG文件。

临时图表在这里充当的是“画布”，导出完成后立刻删除，不会污染你的表格。逻辑上绕了一层，但代码并不复杂。

4.3 完整代码和安装步骤

打开VBA编辑器的路径：Alt+F11。如果你的Excel界面没有“开发工具”选项卡，直接右键底部任意工作表标签→“查看代码”，效果一样。然后在菜单栏点“插入→模块”，把下面代码粘贴进去，按F5运行即可。

Sub ExportEverySheetToPng() Dim ws As Worksheet Dim rng As Range Dim cht As ChartObject Dim outDir As String Dim fname As String Dim i As Integer ' 1. 导出文件夹，默认放在当前Excel同目录下的“图片导出”文件夹 outDir = ThisWorkbook.Path & "\图片导出\" If Dir(outDir, vbDirectory) = "" Then MkDir outDir ' 2. 循环遍历每一张工作表 For Each ws In ThisWorkbook.Worksheets Set rng = ws.UsedRange ' 只复制有内容的矩形区域 If Not (rng.Cells.Count = 1 And IsEmpty(rng.Cells(1))) Then ' 3. 复制区域为图片 rng.CopyPicture Appearance:=xlScreen, Format:=xlBitmap ' 4. 建临时图表当画布 Set cht = ws.ChartObjects.Add(0, 0, rng.Width, rng.Height) cht.Chart.Paste ' 5. 文件名去掉Windows不允许的特殊字符 fname = ws.Name For i = 1 To Len(fname) If InStr("\/:*?""<>|", Mid(fname, i, 1)) > 0 Then fname = Replace(fname, Mid(fname, i, 1), "-") End If Next i ' 6. 导出PNG并删除临时图表 cht.Chart.Export outDir & fname & ".png", "PNG" cht.Delete End If Application.CutCopyMode = False Next ws MsgBox "导出完成，图片在：" & outDir End Sub

运行前注意：这份文件本身要另存为“启用宏的工作簿”（xlsm格式），否则下次打开宏可能被禁用。第一次运行如果提示宏被阻止，到“文件→选项→信任中心→宏设置”里临时启用一下，或者把文件放在受信任目录下。

4.4 代码方案最容易踩的坑

第一个坑是工作表名里带/、:、*、?这类字符，Windows文件名不允许，导出时直接报错。上面代码里已经加了替换逻辑，但如果你用的旧版脚本没有这个处理，记得在导出前手动把工作表名改成纯中文或纯数字。

第二个坑是图片清晰度。xlScreen这种复制方式获取的是屏幕显示尺寸下的像素，如果原表很大、单元格又密集，导出的PNG放大后会发虚。想拿高清图的话，不要用VBA临时图表方案，还是回到方法一的PDF中转，用300dpi导出最靠谱。

第三个坑是隐藏行列。如果你的表里有隐藏的辅助列、隐藏的计算行，UsedRange复制时有时会把这些隐藏内容带进图片，导出的图看起来奇奇怪怪。复制之前先检查有没有不必要的隐藏区域，或者直接把隐藏行列取消隐藏后再跑宏。

5. 方法四：Python脚本批量处理几十个文件（自动化进阶，一次解放双手）

5.1 什么时候需要Python而不是VBA

VBA的局限在于一次只能处理“当前打开的工作簿”。如果老板丢给你一个文件夹，里面40个Excel文件，每个文件要转出图片，你用VBA就得打开一个、跑一次宏、关闭一个，循环40次。

Python的批量能力不在这个级别。写一个循环脚本，指定文件夹路径，跑一次，40个文件全部处理完，每个文件对应的PDF和PNG自动分目录放好。以后每月交表，双击一下脚本就行。这才是真正的“一劳永逸”。

5.2 环境准备：Python + PyMuPDF + pywin32

需要电脑安装Python（3.8以上版本即可），然后在命令行里执行安装：

pip install pymupdf pywin32

这里pywin32负责调用Windows系统里的Excel程序来生成PDF，pymupdf（导入时名字叫fitz）负责把PDF每一页转成清晰的PNG。脚本本质上是“方法一”的自动化版本——让Excel在后台自动导出PDF，再让PDF工具自动切图。

有个前提要明确：这个方法要求电脑装了Office（Windows）。公司电脑如果没有安装Office，只有WPS，COM调用可能不稳定，后面我会说替代思路。

5.3 完整脚本：把文件夹里所有Excel变成按页分好的PNG

import os from win32com.client import DispatchEx import fitz def excel_to_page_images(excel_path, out_dir, dpi=150): """把单个Excel导出为PDF，再把PDF每一页保存为PNG""" excel = DispatchEx("Excel.Application") excel.Visible = False excel.DisplayAlerts = False try: wb = excel.Workbooks.Open( excel_path, ReadOnly=True, UpdateLinks=False ) base = os.path.splitext(os.path.basename(excel_path))[0] pdf_path = os.path.join(out_dir, base + ".pdf") # 0代表导出PDF，第二个参数是保存路径 wb.ExportAsFixedFormat(0, pdf_path) wb.Close(False) # 用PyMuPDF把PDF每页转成PNG doc = fitz.open(pdf_path) for i, page in enumerate(doc, start=1): pix = page.get_pixmap(dpi=dpi) pix.save(os.path.join(out_dir, f"{base}_第{i}页.png")) doc.close() print(f"完成：{base}，共{len(doc)}页") finally: excel.Quit() def batch_excels_to_images(folder): out_dir = os.path.join(folder, "导出图片") os.makedirs(out_dir, exist_ok=True) for name in os.listdir(folder): if name.lower().endswith((".xlsx", ".xls")): excel_to_page_images(os.path.join(folder, name), out_dir) if __name__ == "__main__": # 改成你自己的文件夹路径 batch_excels_to_images(r"D:\你的Excel文件夹")

把最后一行路径改成你的实际文件夹，然后在命令行运行：

python excel_to_images.py

脚本跑起来后，Excel会在后台启动一个隐藏实例，逐个文件导出PDF并切图。注意不要手动干预，等所有文件处理完再操作文件夹。

5.4 如果一个文件只需要每个工作表变成一张图，怎么做？

上面脚本的输出是“打印页”，也就是一张宽表被切成了第1页、第2页、第3页。如果你要的是“每个工作表一张图”（需求A），那就要先在Excel里把每个工作表的打印缩放调成“宽度1页、高度1页”，让每个表强制在一页内，这样PDF里每个工作表就只有一页，导出的PNG自然一一对应。

如果你的表太长，强行“高度1页”会导致字被压缩到看不清。这种情况就别硬来，尊重Excel的自动分页，按页出图反而阅读更舒服。

5.5 脚本跑挂的几个原因，提前避开

COM调用经常遇到的一个问题是DispatchEx创建的Excel实例没退出，导致后台卡住。代码里的finally+excel.Quit()已经做了兜底，但如果你手动中断脚本，还是可能残留进程，可以打开任务管理器把EXCEL.EXE结束掉再重跑。

另一个问题是文件本身有共享锁或只读权限。ReadOnly=True能治一部分；如果文件正被同事打开，脚本会弹错误，建议在处理前把文件先拷到本地临时目录。

还有一个常见误区：不要用pandas加matplotlib去“画表格”。网上很多教程会把Excel数据读出来再用Python重绘，样式、颜色、合并单元格基本全丢，表格看起来像粗糙的调试输出。想保真，就走COM的PDF中转这条路，它调用的是Excel自己的渲染引擎。

6. 四招怎么选、以及我踩过的几个坑

6.1 四招一次性选型对照

6.2 高频问题排查表

6.3 一条组合拳建议：把打印设置当成排版工具

我自己实际用下来，有一个心得比任何单一方法都重要：不要到导出这一步才想着怎么弄图片，而是在做表的时候就把打印分页当成排版工具看待。

新建一份数据表时，顺手把“视图→分页预览”打开，看看哪些列被切到了第二页，该调列宽调列宽，该缩小缩放比例就缩小。数据更新后，再瞄一眼分页预览有没有变形。这样养成了习惯，无论你用方法一还是方法四，导出的图片永远都是齐整的，不用反复返工。

另外一个很容易被忽略的小地方：如果Excel里的公式被切到了“手动计算”模式，导出图片时图上显示的可能是旧缓存数据。导出前按一次Ctrl+Alt+F9，强制全工作簿重新计算，确保图上的数字是最新的。

我个人的固定流程是这样的：小文件直接走方法一的PDF中转，顺手在PDF阅读器里用300dpi导出；如果是固定模板，我会把宏和页面设置都存进xlsm文件里，下次打开直接F5，连打印设置都会跟着模板走，不用重调；如果是几十个文件的大批量，就交给Python脚本在后台跑，跑完再抽查两三张图确认分页正常。

最后再送你一个小技巧：如果你经常要在PPT里插入Excel表格，别再做截图了，直接右键复制的图片对象粘贴到PPT里，文字不会发虚。但如果你要的是独立图片文件，方法一和二永远是你最可靠的底座。