I'm using a simple print preview:
Private Sub CommandButton5_Click()
With ActiveSheet
.PageSetup.PrintArea = "$b$1:$t$5"
.PageSetup.Orientation = xlLandscape
.PageSetup.Zoom = 85
.PrintPreview
End With
End Sub
But want to add $b$27:$t$45 as well on the same...