Вопрос : Ошибка перемеююого определенная using тип VBA ExportAsFixedFormat: =xlTypePDF внутри первенствует 2003

Я использую ExportAsFixedFormat для того чтобы напечатать рабочий лист по мере того как вопросом pdf

My будет Кодий ниже не составит в ранних версиях первенствует должное к xlTypePDF undefined перемеююый в тех ранних версиях. потребители

Some программы будут иметь варианты варианта 12 XL pre не поддерживают тип ExportAsFixedFormat: =xlTypePDF, я предназначаю использовать ExportAsFixedFormat для вариантов более высоко чем 12 и напечатать PDFCreator (или somethingsimilar) если вариант первенствовать чем 12.

I, то smogл как раз повернуть вариант точным но меня уверен будет очень более красноречивые solution.

Can, котор кто-то угождает говорит мне как получить вокруг этой ошибки?

(даже лучше help Or я для того чтобы сделать работу ExportAsFixedFormat для того чтобы напечатать к PDF для ранних версий Эксел (сделайте мой собственный вариант для работы для всех вариантов XL поэтому я не должен использовать общее назначение посредника для того чтобы создать PDF)?) class= " ясное " >

> " codeSnippet " class=

class= " lineNumbers "

class=

1: 2: 3: 4: 5: 6: 7: 8:

>sub MakePDF " class= " id= " codeSnippet688970 11 после этого Тип ActiveSheet.ExportAsFixedFormat: =xlTypePDF, FileName: = _ «C:\ \ Book1.pdf», качество: =xlQualityStandard, _ IncludeDocProperties : =True, IgnorePrintAreas: =False, OpenAfterPublish: =False Еще MakePDF_UsePDFCreator Закончитесь если

class=

Ответ : Ошибка перемеююого определенная using тип VBA ExportAsFixedFormat: =xlTypePDF внутри первенствует 2003

Я использовал численный эквивалент

Если lExcelVersion > 11 после этого
    Тип ActiveSheet.ExportAsFixedFormat: =0, Filename: = _
        «C:\Book1.pdf», качество: =0, _ IncludeDocProperties
        : =True, IgnorePrintAreas: =False, OpenAfterPublish: =False
Закончитесь если