Export range to pdf with specific page breaks

[cocobeans]

Hello,

I am attempting to create a sub that will select a range of cells ("A109:F263") and save as a pdf three pages long with a specific page break at above row 162 and above row 214 in the pdf document . In portrait.
Is this possible to do with vba ?
I am working on Mac if that makes a difference
Thanks

 

[yky]

Try this:

Option Explicit
Sub range_to_PDF()

Dim rng As Range

With ThisWorkbook.Worksheets("Sheet1")

Set rng = .Range("A109:F263")

.HPageBreaks.Add Before:=.Rows(162)

.HPageBreaks.Add Before:=.Rows(214)

rng.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
      "C:\temp\test_range", Quality:=xlQualityStandard, _
      IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True

End With
End Sub

 

[cocobeans]

Hello yky. I came up with a code that is exactly same as your s and it works . Thanks for your help.