Wenn Sie Dokumente aus Word mit VBA drucken, können Sie auswählen, in welchem Druckerfach sich das Dokument befindet
soll ein Blatt bekommen. In Excel haben Sie nicht die Möglichkeit die Eigenschaften FirstPageTray einzustellen
oder OtherPagesTray wie in Word. Es ist möglich, mit SendKeys eine einfache Lösung zu erstellen.
Hier sind zwei Beispielmakros:
Sub ChangeTray() ' wählt das manuelle Seitenfach aus, ohne Application.SendKeys "%fu%e{TAB}{DOWN}{DOWN}{TAB}m~{ESC}", True End Sub Sub ChangeTrayAndPrint() ' wählt das Handbuch aus Seitenablage und druckt das/die ausgewählte(n) Blatt(e) Application.SendKeys "%fu%e{TAB}{DOWN}{DOWN}{TAB}m~~", True End Sub
Die obigen Beispielmakros funktionieren mit der norwegischen Version von Excel97 zusammen mit einem Canon Bubblejet-Drucker.
Der Inhalt des Textstrings, den Sie mit SendKeys übertragen, kann von Computer zu Computer unterschiedlich sein
auf der Excel-Version und dem installierten Drucker. Sie müssen die oben genannten Makros bearbeiten, damit sie für Sie funktionieren
auf deinem Computer.
Eine vollständige Liste der Sonderzeichen, die die Sonderfunktionstasten ersetzen, finden Sie in der integrierten Hilfe zu VBA,
Geben Sie SendKeys in ein Modul ein, wählen Sie das Wort aus und drücken Sie die F1-Taste.