Viele der derzeit auf dem Markt erhältlichen Drucker verfügen über erstaunliche Funktionen. Auf die meisten dieser Funktionen kann zugegriffen werden, indem das Dialogfeld Eigenschaften für den Drucker angezeigt wird. Während Sie Ihre eigenen Makros entwickeln, fragen Sie sich möglicherweise, ob es möglich ist, über das Makro auf diese Funktionen zuzugreifen.

Leider scheint dies nicht möglich zu sein, da die Druckertreiber die Funktionen von Druckern normalerweise nicht auf eine Weise verfügbar machen, die über das von VBA verwendete Objektmodell verstanden und abgerufen werden kann. (Junge, war das ein Schluck!) Stattdessen müssten Sie die eigentliche Windows-API verwenden, und selbst dann sind möglicherweise nicht alle Funktionen verfügbar.

Es gibt jedoch einige Problemumgehungen, die verwendet werden können. Mit VBA können Sie verschiedene Drucker auswählen, an die Sie Ihre Ausgabe richten können. Dies bedeutet, dass Sie unter Windows verschiedene Druckerdefinitionen erstellen und diese Definitionen dann als Ziel für Ihre Ausgabe verwenden können.

Sie können beispielsweise den Druckerordner in Windows verwenden, um einen Drucker mit dem Namen HP Regular Paper einzurichten. Diese Druckerdefinition kann standardmäßig so eingestellt werden, dass sie auf normalem Papier gedruckt wird. Sie können dann eine andere Druckerdefinition mit dem Namen HP Glossy Paper einrichten und festlegen, dass standardmäßig in ein Fach gedruckt wird, das möglicherweise Hochglanzpapier enthält. Wenn die beiden Drucker definiert sind, können Sie mit VBA zwischen den beiden wechseln. Wenn Sie beispielsweise in der Druckerdefinition für das Hochglanzpapier drucken möchten, können Sie in Ihrem Makro Folgendes verwenden:

Application.ActivePrinter = "HP Glossy Paper"

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (9178) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365. Eine Version dieses Tippes für die ältere Menüoberfläche von Excel finden Sie hier: