Seite 1 von 1

Bericht aus Formular drucken.

Verfasst: Di 14. Feb 2017, 17:50
von suwo
Hallo zusammen.
Ich möchte gerne einen Bericht aus einem Formular drucken. Bei der DB handelt es sich um eine Geburtstagsliste. Das Formular nutze ich, um neue Daten einzugeben und zeigt immer nur einen Datensatz an (Name, Tel., Geb._Datum). Der Bericht beruht auf einer Abfrage. Ich habe folgenden Link gefunden: http://www.libreoffice-forum.de/viewtop ... 10&t=17257. Ich habe das so verstanden, dass der Bericht immer den aktuellen Datensatz anzeigt und dann gedruckt wird. Ich möchte aber in dem Formular, welches nur einen Datensatz anzeigt, einen Button erstellen, der mir den Bericht mit allen Datensätzen druckt. Mit Makros kenne ich mich gar nicht aus. Vermute aber, dass man das angeführte aus dem link entsprechend modifizieren kann.

Danke für die Hilfe.
MfG,
Suwo

Re: Bericht aus Formular drucken.

Verfasst: Di 14. Feb 2017, 18:02
von F3K Total
suwo hat geschrieben:Ich möchte aber in dem Formular, welches nur einen Datensatz anzeigt, einen Button erstellen, der mir den Bericht mit allen Datensätzen druckt
Naja, dann erstellst du eben einen Bericht, der zunächst, von Hand geöffnet, alle Datensätze zeigt, also nicht auf einer Abfrage, sondern auf deiner Geburtstagstabelle beruht. Sagen wir, er heißt:
MeinBericht
Dann nimmst du das folgende Makro:

Code: Alles auswählen

Sub open_Report
    thisDatabasedocument.ReportDocuments.getbyname("MeinBericht").open
End Sub
führst es über den Button aus, der Bericht wird geöffnet. Wenn er i.O. ist, druckst du ihn aus.
Gruß R

Re: Bericht aus Formular drucken.

Verfasst: Do 16. Feb 2017, 13:05
von suwo
Hallo.
Das funktioniert. Vielen Dank. Ich mache das nur für mich privat, um Base besser kennen zu lernen. Daher ist die Lösung für mich nicht lebenswichtig, aber die Lösung interessiert mich schon. Wenn z.B. jemand einen Verein verlässt oder ein neuer eintritt, ändert sich im nächsten Jahr die Geburtstagsliste . Jetzt würde ich gerne aus dem Formular den aktuellen Bericht (Liste) sofort drucken.

MfG,

Suwo