res = ShellExecuteA(0&, "printto", .SelectedItems(1), Chr(34) & "PDF-XChange Lite_pdfSaver" & Chr(34), vbNullString, 0&)
damit bekomme ich ein schönes pdf file. wenn der Code durchläuft erscheinen ein paar Fenster und ich kann den Speicherort auswählen. I h habe mir den Pdf-treiber mal installiert, damit ich das nachstellen kann.
Mehr kann ich nicht für dich tun.
|