如何在Excel中的单元格/页眉/页脚中插入页码？
当您打印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
4。 然后按 F5 键以运行此代码，并且该单元格的页码显示在所选单元格中，请参见屏幕截图：
在Excel中一次删除所有页码
要删除所有页码，可以应用以下步骤：
1。 选择所有工作表标签，然后转到 页面布局 功能区上的标签，然后单击 对话框启动器按钮 中的图标 页面设置 组，请参见屏幕截图：
2。 在 页面设置 对话框，单击 页眉页脚 标签，然后选择 （无） 来自 排气歧管 or 页脚 下拉列表，请参见屏幕截图：
3. 然后点击 OK 按钮，立即将所有页码从工作簿中删除。
最佳办公效率工具
Kutools for Excel解决了您的大多数问题，并使您的生产率提高了80％
- 重用: 快速插入 复杂的公式，图表 以及您以前使用过的任何东西； 加密单元 带密码 创建邮件列表 并发送电子邮件...
- 超级公式栏 （轻松编辑多行文本和公式）； 阅读版式 （轻松读取和编辑大量单元格）； 粘贴到过滤范围...
- 合并单元格/行/列 不会丢失数据； 拆分单元格内容； 合并重复的行/列...防止细胞重复； 比较范围...
- 选择重复或唯一 行; 选择空白行 （所有单元格都是空的）； 超级查找和模糊查找 在许多工作簿中； 随机选择...
- 确切的副本 多个单元格，无需更改公式参考； 自动创建参考 到多张纸； 插入项目符号，复选框等...
- 提取文字，添加文本，按位置删除， 删除空间; 创建和打印分页小计； 在单元格内容和注释之间转换...
- 超级滤镜 （将过滤方案保存并应用于其他工作表）； 高级排序 按月/周/日，频率及更多； 特殊过滤器 用粗体，斜体...
- 结合工作簿和工作表; 根据关键列合并表； 将数据分割成多个工作表; 批量转换xls，xlsx和PDF...
- 超过300种强大功能. 支持 Office / Excel 2007-2021 和 365。支持所有语言。 在您的企业或组织中轻松部署。 完整功能 30 天免费试用。 60 天退款保证。
Office选项卡为Office带来了选项卡式界面，使您的工作更加轻松
- 在Word，Excel，PowerPoint中启用选项卡式编辑和阅读，发布者，Access，Visio和Project。
- 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
- 每天将您的工作效率提高50％，并减少数百次鼠标单击！
