Excel工作表的任意单元格中设页码
发布时间：2022-08-04 11:39:55
标签：Excel工作表的任意单元格中设页码
在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.在函数栏使用应用即可得到需要的页码
0
投稿猜你喜欢
最近有win10用户在使用电脑的时候发现自己的有线网络一直掉线又重连，导致电脑不能运行，这令用户十分苦恼。不要着急，小编这就给大家带来了wi- Win10系统已经出来好久了，但是语言包的安装还是一个很大的难题，不少用户反映说Win10语言包不会安装或者安装会失败，为了帮助这些Win1
- 每年的 WWDC 大会都是果粉们关注的年度焦点之一，苹果此前已经确认将在太平洋时间 6 月 5 日上午 10 点，也就是北京时间 6 月 6
- 1、现在拍摄的素材大多数都是灰度介，需要调色，后期大多数要达芬奇来调色，但是对于小成本在剪辑中就可以完成，2、首先我们要安装好looks插件
- win11照片一打开就是打印怎么办？最近有朋友想要打开查看一张图片，结果win11照片一打开就是打印，但是又不想打印，这可能是由于打开方式出
- 用户在不正常关机或者突然断电，用户会遇到提示需要硬盘自检，许多用户觉得这个步骤很浪费时间，想要跳过却不知道该怎么操作，针对这一问题，接下来小
- msvcp71.dll丢失怎样修复？msvcp71.dll通常情况下是在安装操作系统过程中自动创建的，对于系统正常运行来说至关重要，但是有的
- 在电脑上安装安全防护软件，已经是很多用户会进行的操作，一般情况下用户会选择使用360安全卫士软件来解决电脑的安全问题，这款安全防护软件中有着
- DNF是一款经典的角色扮演游戏，很多的玩家都在畅玩，最近有很多玩家在玩dnf登录的时候显示图表系统组建失败，其实一般情况下就是显卡驱动和DX
- QQ邮箱打不开是怎么回事？具体情况从QQ面板上打不开QQ邮箱，从网虫的角度上来说，可能是用户的浏览器缓存，或者默认浏览器被更改导致的，但从专
- 作为一款口碑极佳的智能办公平台，钉钉不仅可以用来日常打卡、请假，还可以在工作中将文件快速传输给同事。那么，在钉钉电脑版中该怎么发送文件呢？下
- upgrade.exe - upgrade进程简介进程文件： upgrade or upgrade.exe 进程名称： Upgrade Ex
- excel表格怎么添加立体效果？excel表格中的单元格想要添加三维立体效果，该怎么制作呢？下面我们就来看看excel单元格添加三维立体效果
- 用SUBSTITUTE函数和CHAR函数实现完成文本换行的效果。A列是原始数据：Excel-Word-PPT-VBA，这四个课程也是咱们部落
- 自从微软取消对win7的维护后，大量的win7用户被迫无奈之下只能选择升级到BUG层出不穷的Win10系统。然而最让人头疼的就是Win10自
- Excel中的函数图具体该如何绘制呢?对于新手来说或许有点难度，接下来是小编为大家带来的excel绘制函数图的方法，不懂的朋友会请多多学习哦
- word怎样编辑文字纵向显示？在word文档中，用户可以通过设置编辑文字的横纵向，来选择自己的排版方式，那么具体要怎么设置呢？详细的操作方法
- 相信很多小伙伴在使用Photoshop制作图片的时候会嫌弃设置出来的字体太细，想要一个加粗的效果却不知如何操作，那么遇到这种情况要怎么办呢？
- 从2019年五月win10系统更新开始，推荐故障排除是一项功能，它使用诊断数据自动检测并应用许多常见问题的修复程序，五月系统更新后Win10
- Excel 2010也较前一版有很多的改进，但总体来说改变不大，几乎不影响所有目前基于Office 2007产品平台上的应用，不过Offic
