Почему мой Excel не экспортируется в PDF в альбомной ориентации? - PullRequest
0 голосов
/ 20 сентября 2018

Следующая проблема:

Я выбрал диапазон в Excel и хочу экспортировать его в PDF.Учитывая, что он довольно широкий и довольно короткий, я хочу, чтобы PDF был в альбомном формате.Я уже пробовал это, установив макет страницы -> Ориентация в альбомную.Но это не работает.

Мой код выглядит следующим образом:

Sub Excel2PDF()

    Dim BottomEquity As Range, BottomBond As Range, PDFArea As Range

    Set SB = Worksheets("SalesBrokerage")

    SB.Range("B2:N" & SB.Cells(SB.Rows.Count, 2).End(xlUp).Offset(1, 0).Row).Select

    Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\CustomerPrice.pdf", _ 
        Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=True, Orientation:=Landscape

End Sub

Есть предложения?

Бонусный вопрос: После того, как я установил альбомную ориентацию (надеюсь, с вашимсправка), есть ли способ убедиться, что выбранный диапазон заполняет страницу pdf BestFit?

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...