Excel 请问如何在页眉中引用某个单元格中的内容

 我来答
中化一马
推荐于2017-12-16 · 我感兴趣的也许对你有用
中化一马
采纳数:734 获赞数:3786

向TA提问 私信TA
展开全部

1、进入VBA,输入
Sub Myrange()
   ActiveSheet.PageSetup.CenterHeader = "" & ActiveCell.Value
End Sub
2、点击将引用的单元格(作为页眉的中间项目)----执行下Myrange这个宏,然后再看你的打印预览:

2.1例如:页眉为空

2.2执行下Myrange这个宏,选定的单元格为C2,内容为“利息”

2.3结果:

天雨下凡
2015-04-17 · 知道合伙人教育行家
天雨下凡
知道合伙人教育行家
采纳数:17564 获赞数:65155
爱电脑、爱数学、爱音乐; 熟悉VB、C/C++、JAVA; EXCEL与VBA有所研究…… 数学,一些会,一些被忘却……

向TA提问 私信TA
展开全部
直接设置好像不行,可以用VBA做到,假设要引用A1的内容且居中:
CTRL+F11,在左边双击ThisWorkBook,在右边的代码窗口输入代码,完成后如下:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup

.LeftHeader = ""
.CenterHeader = Range("A1").Text
.RightHerder=""

End Sub

p.s.:页眉左边与右边你可以自己加入需要的内容
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
weizhong1688
2015-04-17 · TA获得超过1247个赞
知道小有建树答主
回答量:1514
采纳率:61%
帮助的人:601万
展开全部
在页眉中引用某个单元格中的内容,要用VBA:
Sub 设置页眉()
With ActiveSheet.PageSetup
.LeftHeader = Range("A1") '页眉 左内容
.CenterHeader = Range("A2") '页眉 中内容
.RightHeader = Range("A2") '页眉 右内容
End With
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式