Excel工作表的任意单元格中设页码计算机等级考试

文章作者 100test 发表时间 2009:05:24 01:54:40
来源 100Test.Com百考试题网

　　2009年下半年全国计算机一级考试时间是2009年9月19日至23日。更多优质资料尽在百考试题论坛 百考试题在线题库
　　在Excel中设置第几页共几页，绝大部分人会想道用“页面设置”，但你是否想过将“第N页/总M页”放到任意单元格中？而不仅仅是置于页眉页脚中？
　　方法一，用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.在函数栏使用应用即可得到需要的页码

　　特别推荐：

　　2009年9月全国计算机等级考试时间及科目预告

　　2009年上半年全国计算机等级考试参考答案请进入计算机考试论坛

　　2009年全国计算机等级考试报名信息汇总

　　2009年NCRE考试有新变化

　　2009年全国计算机等级考试-大纲

　　2009年上半年全国计算机二级考试试题及答案

　　2009年上半年全国计算机等级考试试题答案汇总