跳到主要内容

如何在Excel中的单独页面上打印每一行/单元格?

例如,您有一个薪水表,并且想要在Excel中的单独页面中打印每条记录,您将如何处理它? 本文将介绍三种在Excel中轻松完成此操作的方法。


在调整行高的情况下,将每行/单元格打印在单独的页面上

如果一行足够高,可以占用一个打印页面,则该行将打印在单个页面中。 因此,此方法将指导您调整行高以在Excel中的单独页面上打印每行/单元格。

1。 点击 页面布局 > 保证金 > 自定义保证金.

2.在打开的页面设置对话框中,在两个对话框中均输入2.5 置顶 盒子和 半身裙/裤 框,然后单击 OK 按钮。

备注:根据纸张尺寸,上边距和下边距的数量可能会有所不同。 您可能需要根据情况进行调整。

3.选择要在单个页面中打印的所有行,右键单击行标题并选择 行高 从右键单击菜单中。

4.在打开的“行高”对话框中,输入250。 行高 框,然后单击 OK 按钮。

5。 点击 文件 (或Office按钮)> 打印,您将在“打印预览”区域中的单独页面中看到每一行,如下图所示,然后单击 打印 按钮进行打印。


使用VBA在单独的页面上打印每行/单元格

在这里,我们还提供了VBA代码,以在Excel中的单独页面上打印每行/单元格。

1。 按 其他 + F11 同时按下两个键可以打开“ Microsoft Visual Basic for Applications”窗口。

2。 点击 插页 > 模块,然后将以下代码粘贴到打开的“模块”窗口中。

VBA:在Excel中的单独页面上打印每一行/单元格

Sub PrintOneLine()
Dim Rng As Range
Dim WorkRng As Range
Dim xWs As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set xWs = WorkRng.Parent
For Each Rng In WorkRng
xWs.PageSetup.PrintArea = Rng.EntireRow.Address
xWs.PrintPreview
Next
End Sub

3。 按 F5 键或单击 运行 按钮以运行此VBA。 然后会出现一个对话框,请指定要在单独页面中打印每行的范围,然后单击 OK 按钮。

4.现在,在单独的“打印预览”窗口中预览每一行。 您需要点击 打印 在每个“打印预览”窗口中一个按钮,直到所有行都打印出来。


使用 Kutools for Excel 在单独的页面上打印每行/单元格

如果您安装了 Kutools for Excel, 拆分为列 实用程序可以帮助您轻松地在Excel中的单独页面上打印每行/单元格。

Kutools for Excel - 包含 300 多个 Excel 基本工具。 享受全功能 30 天免费试用,无需信用卡! 现在下载!

1。 点击 Kutools 加 > 拆分为列.
doc拆分为列

2.在打开的“拆分为列”对话框中,您需要:

(1)在 职称范围 框中,指定要在每个打印页面顶部插入的标题范围;
(2)在 数据范围 框,指定要在单独页面中打印每一行的数据范围;
(3)在 每页打印的行数 框,类型1;
(4)在 段数 框,键入1。
(5)点击 Ok 按钮。

然后,您将看到每一行都被拆分为一个新工作表中的单个打印页面,并且指定的标题范围被添加到每个打印页面中。 请参见下面的屏幕截图:

请注意: 要更清楚地查看每个打印页面,可以单击 查看 > 分页预览 切换到分页预览视图。

3。 点击 文件 (或Office按钮)> 打印,您将看到每行/单元格显示在单独的页面中。

Kutools for Excel - 使用 300 多种基本工具增强 Excel 功能。 享受全功能 30 天免费试用,无需信用卡! 立即行动吧!


使用 Kutools for Excel 在单独的页面上打印每一行

除了 Split to Column 实用程序之外,Kutools for Excel 还开发了另一个 每行插入分页符 实用程序,可帮助您在Excel中的单独页面上打印每一行。

Kutools for Excel - 包含 300 多个 Excel 基本工具。 享受全功能 30 天免费试用,无需信用卡! 现在下载!

1.选择要在单独页面上打印每行的范围,然后单击 Kutools 加 > 印刷 > 每行插入分页符.
doc插入分页符每行

2.在“打开插入分页符每行”对话框中,键入 1间隔 框,然后单击 Ok 按钮。

然后将出现一个对话框,告诉您已插入了多少个分页符。 只需单击“确定”按钮将其关闭。

3。 点击 文件 (或Office按钮)> 打印 轻松将每一行打印在单独的页面上。

Kutools for Excel - 使用 300 多种基本工具增强 Excel 功能。 享受全功能 30 天免费试用,无需信用卡! 立即行动吧!


演示:在Excel中的单独页面上打印每行/单元格


Kutools for Excel:超过 300 个方便的工具触手可及! 立即开始 30 天免费试用,没有任何功能限制。 立即下载!

最佳办公生产力工具

热门特色: 查找、突出显示或识别重复项   |  删除空白行   |  合并列或单元格而不丢失数据   |   不使用公式进行四舍五入 ...
超级查询: 多条件VLookup    多值VLookup  |   跨多个工作表的 VLookup   |   模糊查询 ....
高级下拉列表: 快速创建下拉列表   |  依赖下拉列表   |  多选下拉列表 ....
列管理器: 添加特定数量的列  |  移动列  |  切换隐藏列的可见性状态  |  比较范围和列 ...
特色功能: 网格焦点   |  设计图   |   大方程式酒吧    工作簿和工作表管理器   |  资源库 (自动文本)   |  日期选择器   |  合并工作表   |  加密/解密单元格    按列表发送电子邮件   |  超级筛选   |   特殊过滤器 (过滤粗体/斜体/删除线...)...
前 15 个工具集12 文本 工具 (添加文本, 删除字符,...)   |   50+ 图表 类型 (甘特图,...)   |   40+ 实用 公式 (根据生日计算年龄,...)   |   19 插入 工具 (插入二维码, 从路径插入图片,...)   |   12 转化 工具 (小写金额转大写, 货币兑换,...)   |   7 合并与拆分 工具 (高级组合行, 分裂细胞,...)   |   ... 和更多

使用 Kutools for Excel 增强您的 Excel 技能,体验前所未有的效率。 Kutools for Excel 提供了 300 多种高级功能来提高生产力并节省时间。  单击此处获取您最需要的功能...

kte选项卡201905


Office Tab 为 Office 带来选项卡式界面,让您的工作更加轻松

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations