Excel-在任意页工作表单元格中设置页码

只知道总页码的方法，当前页码就难倒我了，还请VBA高 手指教。方法二，用宏表函数与公式1. 首先：点CTRL+F3 打开定义名称，再在上面输入“
纵当页”，在下面引用位置处输入： =IF(ISNA(MATCH(ROW(),GET.document(64))),1,MATCH(ROW( ),
GET.document(64))+1)2.然后再继续添加第二个名称： “横当页”，在下面引用位置处输入： =IF(ISNA(MATCH(col
umn(),GET.document(65))),1,MATCH(column(),GET.documen t(65))+1)3.再输入“总页
”;引用位置处输入：=GET.document(50)+RAND()*04.最后 再定义“页眉”，引用位置：="第"&IF(横当页=1,纵当页
wk.baidu.com
,横当页+纵当页)&"页/共"&总页&"页"5.在函数栏使用应 用即可得到需要的页码。
在Excel中设置第几页共几页，绝大部分人会想道用“页 面设置”，但你是否想过将“第N页/总M页”放到任意 单元格中?而不仅仅是置于页眉页脚中?
方法一，用VBAFunction page()page=(ActiveSheet.HPageBreaks.Count + 1) * (Act
iveSheet.VPageBreaks.Count + 1)Application.VolatileEnd Function用VBA本人
精心发布，谢谢阅读收藏，谢谢！
昆明华希医院 http://www.hxnk3.com/