Question

EXCEL如何在“中间”任一指定单元格内插入第几页共几页

表格是共享表头的那种，打印时要求在表头与内容中间的一个单元格内插入“第几页共几页”，在网上查了下，都说把页眉的位置在预览-页边距情况下调整页眉位置就可以，试了一下，结果只要把页眉的那条线拉到表头以内就会被遮盖掉，请高手指点！

Answer 1

 　　在任意单元格中插入“第几页共几页”，步骤是：

　　1、点击公式、定义名称：名称为Z，引用位置为=IF(ISNA(MATCH(ROW(),GET.DOCUMENT(64))),1,MATCH(ROW(),GET.DOCUMENT(64))+1)

　　2、继续定义名称：名称为H，引用位置为  =IF(ISNA(MATCH(column(),GET.DOCUMENT(65))),1,MATCH(column(),GET.DOCUMENT(65))+1)

　　3、同样，定义名称：名称为 ZY，引用位置为：  =GET.DOCUMENT(50)+RAND()*0

　　4、最后再定义名称：名称为 Q，引用位置为：  ="第"&IF(H=1,Z,H+Z)&"页/共"&ZY&"页"

　　5、在页面任意单元格中输入    =Q

Answer 2

方法一，用VBA　　

　　Function page()

　　page = (ActiveSheet.HPageBreaks.Count + 1) * (ActiveSheet.VPageBreaks.Count + 1)

　　Application.Volatile

　　End Function　　

　　用VBA本人只知道总页码的方法，当前页码就难倒我了，还请VBA高手指教　　

　　方法二，用宏表函数与公式　　

　　1. 首先：点CTRL+F3打开定义名称，再在上面输入“纵当页”，在下面引用位置处输入：

　　=IF(ISNA(MATCH(ROW(),GET.DOCUMENT(64))),1,MATCH(ROW(),GET.DOCUMENT(64))+1)　　

　　2.然后再继续添加第二个名称：“横当页”，在下面引用位置处输入：

　　=IF(ISNA(MATCH(column(),GET.DOCUMENT(65))),1,MATCH(column(),GET.DOCUMENT(65))+1)

　　3.再输入“总页”；引用位置处输入：

　　=GET.DOCUMENT(50)+RAND()*0　　

　　4.最后再定义“页眉”，引用位置：

　　="第"&IF(横当页=1,纵当页,横当页+纵当页)&"页/共"&总页&"页"　　

　　5.在函数栏使用应用即可得到需要的页码

或者：CTRL+F3打开定义名称
定义：“当前页”
=IF(ISNA(MATCH(ROW(),GET.DOCUMENT(64),1)),1,MATCH(ROW(),GET.DOCUMENT(64),1)+1)+NOW()*0

再定义：“总页数”
=GET.DOCUMENT(50)+NOW()*0

然后在你想要输入页码的单元格输入：="第"&当前页&"页共"&总页数&"页"
显示效果：第1页共9页

追问

先感谢下，你说的两个自定义的方法我都试过了，如果每页都使用是可以的，我的是20页的文档共用一个表头，就只能在表头的一个位置使只使用一次，这样的话打印预览里每页显示出的都是第1页共20页，这个1不会随着我打印的张数变化，能不能给解决下？或者最简单的方法，就是怎么能把页眉拉下来，拉到我需要的位置，并且不会被表头部分遮挡住，我试过从新建了个文档，是可以拉下来的，但现在的这个却不行，是哪里设置有问题么？

追答

如果只是在页眉设置根本不用自定义函数。页面设置里就有。像其他回答者说的。
在预览时，把页眉线接到适当位置即可。注意：应该有两条虚线，只要拉其中一条。另一条留在上面。如果遮挡了就另外一条。

Answer 3

点 页面设置 页眉页脚 自定义页眉 （左 中 右）一般选右 输入“第”字点“#”（页码）图标 再输入“页共”字点有两个“+”（总页数）图标 最后输入“页”字 最后点确定。如果太高了，在第字前输入回车下一行，以此类推。

Answer 4

打开页面设置 ---页眉/页脚---自定义页眉----在“左”那一栏里输入 第 &[页码] 页，共 &[总页数] 页 点击确定即可

Answer 5

软件都是互通的，这个问题在EXCEL里面解决不到可以在PDF里面解决，
PDF解决方案：
文档——添加页眉页脚——页脚——样式里面，可以得到解决