Etiketten mehrfach mit dem gleichen Datensatz ausdrucken (Access 97)

30.12.2003

Frage:

Wie kann ich Etiketten mehrfach mit dem gleichen Datensatz ausdrucken?

Auf einer Seite sind 12 Etiketten. Ich habe nur einen Kunden-Datensatz, der aber 100 mal gedruckt werden soll.

Wie ist dies mit Microsoft Access 97 zu lösen?

Antwort:

Die einfachste Lösung für Etiketten wäre, ein zusätzliches Feld namens AnzahlEtiketten in der Kunden-Tabelle hinzuzufügen. In diesem Feld steht die Anzahl der Etiketten, die für den Kunden ausgedruckt werden sollen.

Damit der Bericht auf das Feld AnzahlEtiketten zugreifen kann, fügen Sie es in den Detailbereich des Berichts ein. Sie können das Feld dann unsichtbar machen, so dass es nicht ausgedruckt wird.

Damit ein Etikett mehrmals gedruckt wird, benötigen Sie eine VBA-Prozedur für das Bericht-Ereignis Detail1_Print:

Private Sub Detail1_Print(Cancel As Integer, PrintCount As Integer)

    If AnzahlEtiketten = 0 Then
        'gar nichts drucken
        Me.NextRecord = True
        Me.MoveLayout = False
        Me.PrintSection = False
    Else 'Druckvorgang wiederholen,
        'wenn AnzahlEtiketten ' noch nicht erreicht ist
        If PrintCount < AnzahlEtiketten Then
            Me.NextRecord = False
        End If
    End If

End Sub

Access erhöht die Druckanzahl (PrintCount) des aktuellen Datensatzes automatisch. Wenn die Druckanzahl also den Wert im Feld AnzahlEtiketten noch nicht erreicht hat, wiederholt Access den Druckvorgang für den aktuellen Datensatz. Andernfalls wird der nächste Datensatz ausgedruckt. Es ist natürlich erforderlich, dass Sie das Format des Berichts für Ihre eigenen Etiketten anpassen. Zum leichteren Einstieg haben wir Ihnen eine kleine Beispieldatenbank zusammengestellt

Dienstleistungen

Als starker Partner an Ihrer Seite unterstützen wir Sie in folgenden Breichen:

Access-Programmierung

Benötigen Sie Unterstützung bei der Programmierung von Access-Anwendungen? Wir bieten die gesamte Bandbreite von der Access-Programmierung auf Stundenbasis bis zur Durchführung eines Software-Projektes als Auftragsarbeit an. Kontaktieren Sie uns für ein kostenloses Erstgespräch.

Software-Beratung

Haben Sie ein Software-Projekt und Sie wissen nicht, ob Access die richtige Plattform ist? Wir haben über 20 Jahre Erfahrung beim Erstellen von Windows-, Web und mobilen Anwendungen. Kontaktieren Sie uns für eine kostenlose Erstberatung.