Question

我想从我的VBA代码中指定一个范围作为页眉。

但是当我做的时候

ActiveSheet.PageSetup.LeftHeader = HeaderSheet.Range("A1:L2").Value

我只将第一个单元格（即HeaderSheet中的A1）作为页面标题，并忽略其余单元格。它也不会在页眉中应用边框。

对此有任何解决方法吗？

Answer 1

所以＆＃34;左标题＆＃34;将是描述工作表或报告的三个标题的最左侧标题。通常它会有报告标题，作者，报告日期等值。

您确定不是要表示行标题或列标题吗？

下面，PrintTitleRows指定第1行和第1行。 2用作行在顶部重复。或者，在左侧重复的列只是＆＃34; A＆＃34;列。

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

Excel VBA - 将范围指定为页眉

1 个答案: