Excel Makros für Dummies

Michael Alexander, Rainer G. Haselier

• Verlag: Wiley-VCH
• Jahr: 2021
• ISBN:
  9783527833153
• Auflage: 2
• Thema: Computer Science
• Thema: Desktop Applications

Excel-Makros sind ein Mysterium für Sie? Sie haben das Ziel, selbst Makros zu schreiben? Oder wollen wissen, wie Sie mit Excel Makros wertvolle Zeit sparen können? In dieser aktualisierten Auflage hat Michael Alexander die 70 gebräuchlichsten Excel-Makro-Anwendungen für Sie zusammengestellt. Er beginnt mit einer knappen Einführung in die Makrogrundlagen und VBA, erläutert aber auch, wie Sie Makros anwenden, an Ihre Bedürfnisse anpassen und sie selbst schreiben. So lernen Sie Makros effizient einsetzen und das Fehlerpotenzial manueller Eingaben reduzieren.

Teil IV

Berichte, E-Mails und externe Datenquellen mit Makros steuern

IN DIESEM TEIL …

• Verstehen Sie, wie Makros bei der Automatisierung der Berichterstellung eingesetzt werden können
• Lernen Sie, wie sich die eher banalen Aspekte bei der Erstellung von Pivot-Tabellen automatisieren lassen
• Erfahren Sie, wie Makros Sie bei Diagrammen für Ihre Berichte und Dashboards unterstützen können
• Erforschen Sie einige der Techniken rund um den E-Mail-Versand aus Excel heraus
• Lernen Sie Techniken kennen, um Daten aus externen Datenbanken oder Datendateien zu bearbeiten

Kapitel 8

Die Erstellung von Berichten automatisieren

IN DIESEM KAPITEL

• Alle Pivot-Tabellen aktualisieren
• Eine Liste mit Informationen zu den Pivot-Tabellen einer Arbeitsmappe erstellen
• Titel alle Datenfelder anpassen und Felder alphabetisch sortieren
• Für alle Datenelemente Summe verwenden oder alle formatieren
• PivotTable-Felder-Beschränkungen anwenden
• Drilldown-Tabellenblätter automatisch entfernen
• Eine Pivot-Tabelle für jedes Element des Berichtsfilters drucken
• Für jedes Element des Berichtsfilters eine neue Arbeitsmappe erstellen
• Diagramme anpassen und ausrichten

Für diejenigen unter Ihnen, zu deren Aufgabenbereich die Erstellung von Dashboards und Berichten gehört, sind Pivot-Tabellen und Diagramme Bestandteile der täglichen Arbeit. Nur wenige haben jedoch das Bedürfnis, jeden Aspekt dieser Berichtswerkzeuge zu automatisieren. Einige dieser Funktionen eignen sich jedoch hervorragend für die Automatisierung. Dieses Kapitel stellt einige Makros vor, durch die Sie bei der Verwendung von Pivot-Tabellen und Diagrammen Zeit sparen und damit effizienter arbeiten können.

Alle Pivot-Tabellen einer Arbeitsmappe aktualisieren

Es kommt oft vor, dass sich in einer Arbeitsmappe mehrere Pivot-Tabellen befinden. Diese Pivot-Tabellen sind häufig mit Daten verknüpft, die sich ändern, was wiederum eine Aktualisierung der Pivot-Tabellen erfordert. Wenn es bei Ihnen häufiger vorkommt, dass Sie mehrere Pivot-Tabellen in einer Arbeitsmappe von Hand aktualisieren müssen, können Sie dieses Makro verwenden und dann die Aktualisierung mit einem einzigen Mausklick vornehmen.

So funktioniert es

Es ist wichtig zu wissen, dass die Pivot-Tabellen in der Objekthierarchie von Excel den Tabellenblättern untergeordnet sind, auf denen sie sich befinden. Daher muss das folgende Makro zuerst alle Tabellenblätter der Arbeitsmappe durchlaufen und für jedes Tabellenblatt dann die auf ihm enthaltenen Pivot-Tabellen bearbeiten. Bei der Abarbeitung der inneren Schleife aktualisiert das Makro die gefundenen Pivot-Tabellen.

Sub Makro1() 'Schritt 1: Variablen deklarieren Dim ws As Worksheet Dim pt As PivotTable 'Schritt 2: Alle Tabellenblätter durchlaufen For Each ws In ThisWorkbook.Worksheets 'Schritt 3: Alle Pivot-Tabellen durchlaufen For Each pt In ws.PivotTables pt.RefreshTable Next pt Next ws End Sub

1. In Schritt 1 wird zuerst die Objektvariable ws deklariert. Hierdurch wird ein Speicherbereich erzeugt, in dem beim Durchlaufen der Schleife das jeweils aktuell bearbeitete Tabellenblatt abgelegt wird. Die zweite Objektvariable, pt, wird verwendet, um einen Verweis auf die derzeit in der Schleife bearbeitete Pivot-Tabelle abzulegen.
2. In Schritt 2 wird die Schleife gestartet und Excel angewiesen, alle Tabellenblätter in der aktuellen Arbeitsmappe zu bearbeiten. Beachten Sie die Verwendung von ThisWorkbook anstelle von ActiveWorkbook. Das Objekt ThisWorkbook verweist auf die Arbeitsmappe, in der sich der Code befindet. Das Objekt ActiveWorkbook hingegen würde auf die Arbeitsmappe verweisen, die derzeit aktiv ist. Oft liefern beide Objekte die gleiche Arbeitsmappe zurück; falls jedoch die Arbeitsmappe mit dem Code nicht die aktive Arbeitsmappe ist, verweisen Sie auf unterschiedliche Objekte. Da Sie in unserem Beispiel nicht riskieren wollen, dass Pivot-Tabellen in anderen Arbeitsmappen aktualisiert werden, verwenden Sie ThisWorkbook.
3. In Schritt 3 werden alle Pivot-Tabellen des jeweils aktuellen Tabellenblatts bearbeitet und für jede Pivot-Tabelle die Methode RefreshTable aufgerufen. Nachdem alle Pivot-Tabellen aktualisiert sind, machen Sie mit dem nächsten Tabellenblatt weiter. Das Makro wird beendet, nachdem alle Tabellenblätter untersucht wurden und deren Pivot-Tabellen auf dem neuesten Stand sind.

Als alternatives Verfahren zur Aktualisierung der Pivot-Tabellen können Sie auch die Methode ThisWorkbook.RefreshAll verwenden. Diese Methode aktualisiert alle PivotTable-Berichte in der Arbeitsmappe, aber auch alle externen Datenbereiche. Falls die Arbeitsmappe also Datentabellen enthält, deren Daten aus externen Quellen oder dem Web stammen, werden diese durch RefreshAll ebenfalls auf den neuesten Stand gebracht. Falls dies kein Problem darstellt, können Sie also auch einfach in eine Prozedur eines Standardmoduls den Ausdruck ThisWorkbook.RefreshAll eingeben.

So verwenden Sie es

Um dieses Makro zu implementieren, kopieren Sie es und fügen es in ein Standardmodul ein.

1. Aktivieren Sie den Visual-Basic-E...

Inhaltsverzeichnis

• Cover
• Titelblatt
• Impressum
• Inhaltsverzeichnis
• Einleitung
• Teil I: Heiliges Makro, Batman!
• Teil II: Aufgaben in Arbeitsmappen mit wenig Arbeit erledigen
• Teil III: Datenbearbeitung mit einem Klick
• Teil IV: Berichte, E-Mails und externe Datenquellen mit Makros steuern
• Teil V: Der Top-Ten-Teil
• Stichwortverzeichnis
• End User License Agreement