体验零代码搭建

如何在Excel中的单元格/页眉/页脚中插入页码?

网友投稿  ·  2023-10-29 21:10  ·  产品资讯  ·  阅读 2550

如何在Excel中的单元格/页眉/页脚中插入页码?

当您打印Excel文件时,可能需要在页中插入页码,以使文件清晰,可读。 在本文中,我将介绍一些快速技巧,为您插入页码到单元格,页眉或页脚中。

如何在Excel中的单元格/页眉/页脚中插入页码?

当您打印Excel文件时,可能需要在页中插入页码,以使文件清晰,可读。 在本文中,我将介绍一些快速技巧,为您插入页码到单元格,页眉或页脚中。

如何在Excel中的单元格/页眉/页脚中插入页码?

在一个工作表的页眉/页脚中插入页码

在多个工作表的页眉/页脚中插入页码

用VBA代码将页码插入单元格

在Excel中一次删除所有页码

在一个工作表的页眉/页脚中插入页码

通常,我们可以使用来快速将页码插入页眉或页脚 页眉页脚 功能,请执行以下操作:

1。 转到要在页眉或页脚中插入页码的工作表。

2。 然后点击 插页 > 页眉页脚,您的工作表将在 页面布局 查看,查看截图:

3。 单击要在其中插入页码的页眉或页脚,然后单击 设计页眉和页脚工具 显示在功能区中,然后单击 设计 > 页码,请参见屏幕截图:

4。 您会看到占位符 &[页] 出现在所选部分中,然后单击页眉或页脚区域之外的任何位置以显示页码。 看截图:

5。 现在,您可以通过以下方式重置为普通视图: 查看 > 正常,并且在打印此工作表时,您将看到页码已插入到所选的页眉或页脚中。

备注:如果要以1之15、2之15格式显示页码,则只需直接输入 &[页面]中的&[页面] 进入页眉或页脚字段框,请参见屏幕截图:

在多个工作表的页眉/页脚中插入页码

上面的方法可以帮助您将页码插入一个工作表中,如果您要将页码插入工作簿的所有工作表中以使所有页面都按顺序编号,请执行以下操作:

1. 选择所有工作表标签,然后转到 页面布局 选项卡,然后单击 对话框启动器按钮 中的图标 页面设置 组,请参见屏幕截图:

2。 在 页面设置 对话框,请单击 页眉页脚 标签,然后单击 自定义标题 or 自定义页脚 要设置所需的页眉或页脚,请参见屏幕截图:

3. 而在 标题 or 页脚 对话框中,请在页面的内部单击以定义插入页码的位置 左侧部分:, 中心部分:右侧部分: 您需要的框,然后单击 插入页码 图标和占位符 &[页] 出现。 看截图:

请注意: 输入这个 &[页面]中的&[页面] 如果您希望将页码显示为1中的45、2中的45…,则将其添加到页眉或页脚字段框中

4. 然后点击 OK > OK 若要关闭对话框,当您打印此工作簿时,在打印预览中,您可以看到所有页码均按顺序插入页眉或页脚。

用VBA代码将页码插入单元格

将页码插入页眉或页脚很容易,但是,如果您需要将页码插入工作表单元格,则没有直接的方法。 以下VBA代码可以帮助您解决此问题。

1。 单击要在其中显示该单元的页码的单元格。

2。 按住 ALT + F11 键,然后打开 Microsoft Visual Basic应用程序 窗口。

3。 点击 插页 > 模块,然后将以下代码粘贴到 模块 窗口。

VBA代码:将当前页码插入单元格:

Sub pagenumber() updateby Extendoffice 20160506 Dim xVPC As Integer Dim xHPC As Integer Dim xVPB As VPageBreak Dim xHPB As HPageBreak Dim xNumPage As Integer xHPC = 1 xVPC = 1 If ActiveSheet.PageSetup.Order = xlDownThenOver Then xHPC = ActiveSheet.HPageBreaks.Count + 1 Else xVPC = ActiveSheet.VPageBreaks.Count + 1 End If xNumPage = 1 For Each xVPB In ActiveSheet.VPageBreaks If xVPB.Location.Column > ActiveCell.Column Then Exit For xNumPage = xNumPage + xHPC Next For Each xHPB In ActiveSheet.HPageBreaks If xHPB.Location.Row > ActiveCell.Row Then Exit For xNumPage = xNumPage + xVPC Next ActiveCell = "Page " & xNumPage & " of " & Application.ExecuteExcel4Macro("GET.DOCUMENT(50)") End Sub
Copy

4。 然后按 F5 键以运行此代码,并且该单元格的页码显示在所选单元格中,请参见屏幕截图:

在Excel中一次删除所有页码

要删除所有页码,可以应用以下步骤:

1。 选择所有工作表标签,然后转到 页面布局 功能区上的标签,然后单击 对话框启动器按钮 中的图标 页面设置 组,请参见屏幕截图:

2。 在 页面设置 对话框,单击 页眉页脚 标签,然后选择 (无) 来自 标题 or 页脚 下拉列表,请参见屏幕截图:

3. 然后点击 OK 按钮,立即将所有页码从工作簿中删除。

最佳办公生产力工具

将小时转化为分钟 Kutools for Excel!

准备好增强您的 Excel 任务了吗? 利用的力量 Kutools for Excel - 您终极的节省时间的工具。 简化复杂的任务并像专业人士一样浏览数据。 以闪电般的速度体验 Excel!

为什么需要 Kutools for Excel

🛠️  超过 300 项强大功能: Kutools 包含 300 多项高级功能,可简化您在 1500 多种场景中的工作。

📈  卓越的数据处理能力:合并单元格、删除重复项并执行高级数据转换 - 所有这些都不费吹灰之力!

⏱️  高效的批量操作:当你可以聪明地工作时,为什么还要付出额外的努力呢? 轻松批量导入、导出、组合和调整数据。

📊  可定制的图表和报告:访问各种附加图表并生成富有洞察力的报告。

🗄️  强大的导航窗格:通过强大的列管理器、工作表管理器和自定义收藏夹获得优势。

📝  七种类型的下拉列表:通过各种功能和类型的下拉列表使数据输入变得轻而易举。

🎓  用户友好:对于初学者来说轻而易举,对于专家来说是一个强大的工具。

***

*** *** *** 
Office Tab 为 Office 带来选项卡式界面,让您的工作更轻松
在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。 每天将您的工作效率提高50%,并减少数百次鼠标单击!
*** *** *** 


Excel如何快速填充空白单元格 << 上一篇
2023-10-29 21:10
excel如何快速定位并提取指定行列交叉单元格的内容
2023-10-29 21:10
下一篇 >>

相关推荐