Ansichten eines Unterformulars umschalten

30.12.2003

Manchmal kann eine Schaltfläche zum Umschalten der Ansicht eines Unterformulars den Komfort erhöhen.

Da die Eigenschaft Standardansicht (engl. DefaultView) leider nur in der Entwurfsansicht eingestellt werden darf, müssen Sie eine Kopie des Unterformulars erstellen.

Markieren Sie dazu das Unterformular im Datenbankfenster, wählen Sie den Menübefehl Bearbeiten / Kopieren und anschließend Bearbeiten / Einfügen.

Geben Sie der Kopie einen aussagekräftigen Namen wie beispielsweise Unterformular - Datenblatt. Für die gerade erstellte Kopie aktivieren Sie nun noch die Datenblattansicht.
Öffnen Sie die Kopie im Entwurfsmodus und ändern Sie die Standardansicht-Eigenschaft in Datenblatt. Ihre Datenbank sollte jetzt zwei identische Formulare enthalten, die sich nur durch den Inhalt der Standardansicht-Eigenschaft unterscheiden.

Die folgende Prozedur verändert den Inhalt der Eigenschaft Herkunfsobjekt (engl. SourceObject), um jeweils das eine oder das andere Unterformular zu laden. Sie können Sie Prozedur direkt an das Klick-Ereignis einer Schaltfläche binden.

Vor dem Einsatz der Prozedur müssen Sie den Namen des Steuerelements sowie den Namen des Unterformularsteuerelements (in diesem Beispiel Bestellungsdaten) entsprechend anpassen.

Private Sub btnAnsicht_Click()

    Dim uform As Control
    Set uform = Me![Bestellungsdaten]

    If uform.SourceObject = "Unterformular - Einzeln" Then
        uform.SourceObject = "Unterformular - Datenblatt "
    Else
        uform.SourceObject = "Unterformular - Einzeln "
    End If

End Sub

Das Unterformular in der Datenblattansicht..... (siehe Abbildung 2)

Ansichten eines Unterformulars umschalten
Ansichten eines Unterformulars umschalten

Weitere Tipps & Tricks

30.12.2003

Unterformulare auswerten (Access 97, 2000)

von Alexander Willinek

Frage und Antwort

Tipp/Trick

30.12.2003

Universelle Unterformulare (Access 97, 2000)

Unterformulare lassen sich gleichzeitig in verschiedene Hauptformulare einfügen.

Tipp/Trick

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.