excel利用VBA在页眉页脚中调用单元格内容
发布时间：2023-09-24 12:57:06
标签：excel,利用,VBA,在,页眉,页脚,中,调用,单元格
有时我们需要在Excel的页眉页脚中调用某个单元格内容，例如让用户在A1单元格中填入月份，如“一月”，在页眉处自动生成“一月报表”，可以用VBA代码来实现，步骤如下：
1.按Alt+F11，打开VBA编辑器。
2.在“工程”窗口中，双击“ThisWorkbook”，在右侧的代码窗口中输入下列代码：
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = Range("A1").Value & "报表"
End Sub
这样，每次在打印工作表时，会自动在页眉左侧调用A1单元格中的内容，如A1单元格内容为“一月”，左侧页眉中显示“一月报表”。
如果要在页脚中调用单元格内容，将上述代码改为：
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftFooter = Range("A1").Value & "报表"
End Sub
同样，如果需要在页眉或页脚的中部、右侧调用单元格内容，只须将“LeftHeader”更换成“CenterHeader”、“CenterFooter”、“RightHeader” 和 “RightFooter”。
0
投稿猜你喜欢
Excel作为工作学习的必备工具，有着广泛的使用，而在数据录入阶段通常会遇到需要填充大量数字的情况，手动输入显然不可能，通过填充柄的使用提高- 很多朋友不清楚Excel2016一个单元格怎么分成两行？下面小编给大家带来Excel2016单元格分行教程，一起来看吧Excel2016中在
- ppt2003的文字怎么添加阴影？ppt中想要给文字添加阴影，该怎么添加呢？下面我们就来来看看详细的教程，添加的过程很简单，下面我们就来看看
- 向日葵是一款十分优秀的远程控制软件，使用的用户也是非常的多，不过也有部分新用户不清楚要如何使用向日葵来进行远程控制，其实实际操作起来还是很简
- 这篇文章主要介绍了excel表格怎么设置连续数字的页码?excel页码设置连续数字教程的相关资料,需要的朋友可以参考下本文详细内容介绍exc
- win10任务栏消息提醒怎么隐藏？在Win10系统里，系统消息会主动推送给用户，以提醒用户进行操作，但是当大大小小的消息都推送给用户的话就变
- 很对使用win8系统的朋友反映说，自己的电脑在开机的时候都很慢，开机出现logo后要黑屏几秒才能够进入系统。那么，有什么方法能够提升win8
- 赛博朋克2077上线有一段时间了，但是目前依旧很火热，很多玩家都在畅玩，游戏有着丰富的剧情任务，一般类似这种剧情游戏都是会有二周目可以开，并
- 操作步骤PowerPoint演示文稿制作完成后，有的由演讲者播放，有的让观众自行播放，这需要通过设置幻灯片放映方式进行控制。执行“幻灯片放映
- 在日常使用电脑的时候，大家时常都会对磁盘，u盘之类的进行格式化，我们只需右键点击格式化便能将其格式化掉，当然方法也不止是只有那么的一种，我们
- 笔记本电脑为我们的学习和办公提供了非常多的便利，但是网络问题也是笔记本电脑的短板，我们外出使用笔记本的时候都需要连接无线网络才能使用，那有的
- excel怎么添加批注？excel表格中可以添加标注，一般我们都是添加文字标注，其实我们也可以添加图案标注，下面我们就来看看excel添加图
- 相信有很多小伙伴都喜欢在电脑上玩手游，这就是需要使用到模拟器，而开启VT就可以帮助我们提高模拟器的流畅度，那么具体要如何操作呢？下面就和小编
- 组策略是系统的一个组件，我们更改系统设置的时候都会 运用到这个功能，那有的用户安装了Win10系统的家庭版之后，发现没有组策略这个功能，那要
- word2003是一种字处理程序，可使文档的创建、共享和阅读变得更加容易。下面小编就为大家带来Word2003使用小技巧介绍，一起来看看吧w
- Steam是一款非常火热的游戏平台，这里有着很多的游戏，最近有用户在使用Steam的时候遇到了steam错误代码-101的情况，这并非是软件
- iOS16.1正式版刚发布就迎来了iOS16.2测试版，如今iOS系统更新频率真是越来越高了！目前，iOS16.2 beta1已发布一周，很
- 如何利用PS通道进行图片调色？小伙伴们想对一张喜欢的图片进行调色却不知道怎么下手，下面，小编就为大姐介绍下利用PS通道进行图片调色方法。打开
- PPT中怎么绘制一个一半实线一半虚线的圆？想画一个圆，但是有一个要求就是需要一半是实线的一半是虚线的，该怎么实现呢？下面我们就来看看这个问题
- 近日微软面向Windows11用户发布最新预览版Windows 11 Insider Preview Build 22518.1012 更新
