So bestimmen Sie, wie viele Seiten in Excel gedruckt werden

Zusammenfassung

Microsoft Visual Basic for Applications bietet keine Methode zum Bestimmen der Gesamtzahl der Seiten, die in einem Arbeitsblatt gedruckt werden. Sie können jedoch die ExecuteExcel4Macro-Methode verwenden, um get zu verwenden. DOCUMENT(50)-Makroblattfunktion, um die Gesamtzahl der Seiten zurückzugeben, die auf dem aktiven Arbeitsblatt gedruckt werden.

Weitere Informationen

Microsoft stellt nur Programmierbeispiele zur Veranschaulichung bereit, ohne ausdrückliche oder konkludente Garantie, einschließlich, aber nicht beschränkt auf die impliziten Gewährleistungen der Handelsüblichkeit und/oder Eignung für einen bestimmten Zweck. In diesem Artikel wird davon ausgegangen, dass Sie mit der programmiersprache, die gezeigt wird, und den Tools zum Erstellen und Debuggen von Prozeduren vertraut sind. Microsoft-Supportexperten können ihnen helfen, die Funktionalität eines bestimmten Verfahrens zu erklären, aber sie werden diese Beispiele nicht ändern, um zusätzliche Funktionen bereitzustellen oder Prozeduren zu erstellen, die Ihren spezifischen Anforderungen entsprechen.
Wenn Sie über eingeschränkte Programmiererfahrung verfügen, können Sie sich an einen Microsoft Certified Partner oder an Microsoft Advisory Services wenden. Weitere Informationen finden Sie auf den folgenden Microsoft-Websites:

Microsoft Certified Partners – https://partner.microsoft.com/global/30000104

Microsoft Professional Services – https://www.microsoft.com/professionalservices/overview

Weitere Informationen zu den verfügbaren Supportoptionen und zur Kontaktaufnahme mit Microsoft finden Sie auf der folgenden Microsoft-Website: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMSRichten Sie wie folgt eine Microsoft Excel-Datei ein, um das folgende Makro zu verwenden:

1. Erstellen Sie eine neue Microsoft Excel-Arbeitsmappe.

2. Wählen Sie den Bereich A1:J100 aus.

3. Geben Sie die Zahl 1 ein, und drücken Sie STRG+EINGABETASTE. Sie sollten sehen, dass alle ausgewählten Zellen mit der Zahl 1 gefüllt sind.

4. Fügen Sie ein Visual Basic-Makromodul ein.

5. Geben Sie den folgenden Code in das Modul ein:

6. Sub ShowMe()
       MsgBox ExecuteExcel4Macro("GET.DOCUMENT(50)") & _
           " pages will be printed."
   End Sub
   

7. Führen Sie das Makro aus.

Informationsquellen

Weitere Informationen zur Makrofunktion Get.Document finden Sie im Referenzhandbuch zur Excel-Funktion.