我想从我的 VBA 代码中指定一个范围作为页眉。
但是当我这样做时
ActiveSheet.PageSetup.LeftHeader = HeaderSheet.Range("A1:L2").Value
我只取第一个单元格,即 HeaderSheet 中的 A1 作为页眉,而忽略其余部分。它也不适用于页眉中的边框。
请问有什么解决方法吗?
因此,“左页眉”将是描述工作表或报表的三个页眉的最左侧页眉。通常它会有诸如报告标题、作者、报告日期等值。
您确定您不是要指示行或列标题吗?
下面,PrintTitleRows 指定第 1 行和第 2 行用作在顶部重复的行。或者,要在左侧重复的列只是“A”列。
Sub example()
'ActiveSheet.PageSetup.LeftHeader = HeaderSheet.Range("A1:L2").Value
With ActiveSheet.PageSetup
.PrintTitleRows = "$1:$2"
.PrintTitleColumns = "$A:$A"
End With
End Sub
如果您确实打算将单元格 A1-L2 的内容放入最左侧的标题部分,那么您将不得不对单元格进行串联,我相信......即,
With ActiveSheet.PageSetup
.LeftHeader = Range("a1").Value & " " & Range("b1").Value & " " & Range("a2").Value & " " & Range("b2").Value
End With