主持人调侃奥斯卡:用VBA在页眉页脚中调用单元格内容

来源：百度文库编辑：偶看新闻时间：2024/04/30 03:44:13

用VBA在页眉页脚中调用单元格内容 作者：admin 文章来源：本站原创点击数： 541 更新时间：2009-4-5 10:42:27

有时我们需要在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”。

vba中如何引用单元格内容 VBA用CELLS表示单元格,如何实现单元格的合并如何在vba中得到当前单元格的行号和列号如何使插入的页眉内容分布在页眉横线的下面如何用vba获取excel单元格格式如何在excel中把多个单元格的内容放在多个单元格中在excel单元格中直接引用另一个单元格中批注的内容??? excel 在单元格中加相同的内容在excel的VBA中能不能利用“selection.单元格”返回此单元所处列中的最大值！！！！急急急：怎么从access数据库中查询数据调到EXCEL单元格中啊？在VBA中的连接代码是什么？我想在页眉当中写字,但是我要让页眉第一页和第二页的内容不一样怎样设计? 在电子表格中,如何判断某一单元格的内容是否为另一单元格内容的子集,有这个函数吗? ？？请问为什么ACCESS 95 转换ACCESS 97或2000成在VBA数据库程序调用中就不能用了啊？？谢谢怎样在网站首页调用PHPWIND帖子的内容？在Flash怎么调用数据库里面的内容? word中如何实现选择性的在页面上显示页眉或页脚的内容如何在每页中添加不同内容的页眉或页脚？ vba如何调用Access的查询,并显示查询结果? VBA 中如何实现调用 ctrl+w 快捷键如何使用visio的vba调用excel文件？如何在EXCEL里边根据另一组数据的内容来调用第一组数据内容？在编辑excel时有时出现单元格随鼠标移动，不能在用鼠标编辑其它内容，非得结束任务吗？有好的方法解决吗？在Excel里,如何在“查找”的同时修改单元格内容如何设置页眉不同的内容