Vraag : Veranderlijke bepaalde niet fout die Type VBA gebruiken ExportAsFixedFormat: =xlTypePDF blink binnen 2003 uit

Ik gebruik ExportAsFixedFormat om aantekenvel te drukken aangezien een pdf

My kwestie de code hieronder niet zal compileren in de vroegere versies van uitblinkt wegens xlTypePDF die een niet gedefiniëerde variabele in die vroegere versies is zijn. de gebruikers

Some van het programma zullen versies van XL preversie 12 hebben die geen Type ExportAsFixedFormat steunen: =xlTypePDF, ik ExportAsFixedFormat voor versies hoger dan te gebruiken 12 en druk PDFCreator (of somethingsimilar) als versie is minder dan 12.

I expliciete optie kon enkel uitzetten maar bedoel uitblink zeker ben ik er een welsprekendere solution.

Can zijn iemand gelieve me te vertellen hoe te rond deze fout te krijgen?

( of zelfs betere help me om het werk ExportAsFixedFormat aan druk aan pdf voor vroegere versies van Excel (maak mijn eigen versie aan het werk voor alle versies van XL zodat moet ik geen 3de partijnut gebruiken om pdf tot stand te brengen) te maken?)
" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:

sub MakePDF ()
Als Application.Version > 11 toen
    ActiveSheet.ExportAsFixedFormat Type: =xlTypePDF, FileName: = _
        „C:\ \ Book1.pdf“, Kwaliteit: =xlQualityStandard, IncludeDocProperties _
        : =True, IgnorePrintAreas: =False, OpenAfterPublish: =False
Anders
    MakePDF_UsePDFCreator
Eind als

Antwoord : Veranderlijke bepaalde niet fout die Type VBA gebruiken ExportAsFixedFormat: =xlTypePDF blink binnen 2003 uit

Ik heb het numerieke equivalent gebruikt

Als lExcelVersion > 11 toen
    ActiveSheet.ExportAsFixedFormat typ: =0, Filename: = _
        „C:\Book1.pdf“, Kwaliteit: =0, IncludeDocProperties _
        : =True, IgnorePrintAreas: =False, OpenAfterPublish: =False
Eind als
Andere oplossingen  
 
programming4us programming4us