VBA分页工作表以打印出2张A3

Question

对不起，我有页面设置问题。这让我发疯.....

Dim LastRow As Long
LastRow = Worksheets("A").Cells(Rows.Count, "A").End(xlUp).Row

Worksheets("A").PageSetup.PrintArea = "$C$1:$BG$" & LastRow
Worksheets("A").PageSetup.PrintTitleColumns = "$A$1:$B$65536"
Worksheets("A").Columns("AC").PageBreak = xlPageBreakManual

With Worksheets("A").PageSetup
.PaperSize = xlPaperA3
End With

Worksheets("A").PageSetup.Orientation = xlLandscape

我有一个excel，数据从列（A）到列（BG）交叉 我想设置页面设​​置为打破2部分。 columnA到columnB将其设置为列标题 然后分页到两部分，一个是C1列到AB（Lastrow）列，另一个是AC1列到BG（Lastrow）列

因此将打印出2 A3页。 一个是col（A）+ col（B）标头+ col C1到col AB（Lastrow） 一个是col（A）+ col（B）标头+ col AC1到colBG（Lastrow）

，但是代码没有错误，并且无法正常工作。 请谁能告诉我这个问题？