Abläufe automatisieren - Makros
Beispiel: Seitensummen in einem Bericht
Wie kann ich über ein Makro eine Zwischensumme je Seite in einen Bericht einfügen?
Das Makro zur Berechnung einer Seitensumme
In einem Bericht ist es zwar möglich, Zwischensummen über numerische Felder für eine Gruppe (über die Funktion =Summe(Feldname)) festzulegen und eine ebensolche Summenfunktion in den Berichtsfuß einzutragen, eine Summenfunktion im Seitenfuß wird jedoch zu einem Fehler führen. Hier können stattdessen zwei Makros auf folgende Art eingesetzt werden.
So erstellen Sie Seitensummen in einem Bericht:
Zunächst ist ein ungebundenes Textfeld im Seitenfuß zu erstellen und diesem über die Eigenschaft Name ein Name zuzuordnen (z. B.: Seitensumme).
Danach wird ein Makro erstellt, das über die Aktion SetzenWert zum Wert des Feldes Seitensumme den Wert des zu summierenden Feldes addiert. Der Aufruf dieses Makros wird im Bericht in die Eigenschaft Beim Formatieren des Detailbereichs eingesetzt.
Dann wird ein zweites Makro erstellt, das über die Aktion SetzenWert das Feld Seitensumme auf 0 setzt und dieses in die Eigenschaft Beim Formatieren des Seitenkopfes eingetragen.
Hierbei wird für jeden gedruckten Datensatz der Wert des Feldes Seitensumme um den Wert des zu summierenden Feldes im Datensatz erhöht. Um auf einer neuen Seite wieder bei 0 zu beginnen, wird das zweite Makro benötigt.
Auf Übersichtlichkeit achten
Aus Übersichtlichkeitsgründen sollten die beiden Makros in einer Makrogruppe zusammengefasst werden. Über diese Makros können auch die Summen für mehrere Felder berechnet werden (je Feld eine eigene SetzenWert-Aktion). Zu beachten ist jedenfalls, den Wert bei Seitenbeginn auf 0 zurückzusetzen.
Diese Seite ist für Mitglieder von akademie.de reserviert.
Möchten Sie die Mitgliedschaft 14 Tage kostenlos testen und den Beitrag komplett lesen?
Oder möchten Sie zunächst mehr über diesen Beitrag erfahren und die Leseproben sehen?
Ich bin bereits Mitglied