{"id":55000743,"date":"2010-10-01T00:00:00","date_gmt":"2020-05-22T22:07:44","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=743"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Flexibles_Unterformular","status":"publish","type":"post","link":"https:\/\/access-im-unternehmen.de\/Flexibles_Unterformular\/","title":{"rendered":"Flexibles Unterformular"},"content":{"rendered":"

\"\"<\/p>\n

Die Datenherkunft eines Unterformulars ändert sich in der Regel zur Laufzeit nicht – es wird höchstens mal ein Filter oder eine Sortierung angewendet. Gelegentlich soll das gleiche Unterformularsteuerelement zwar mal das Unterformular wechseln, aber auch dies ist kein Problem. Interessant wird es, wenn Sie ein einziges Unterformular zur Laufzeit mit verschiedenen Datenherkünften ausstatten möchten. Sie können zwar Tabellen oder Abfragen statt eines richtigen Formulars als Unterformular angeben, aber diese bieten natürlich keine Möglichkeit, auf Ereignisse zu reagieren. Wir zeigen, wie Sie ein einziges Unterformular flexibel mit beliebigen Daten füllen.<\/b><\/p>\n

Beiträge wie dieser wurden meist durch einen konkreten Anwendungsfall angeregt. In diesem Fall geht es um den Duplikatmanager aus dem Beitrag Duplikatsuche in Adressen <\/b>(www.access-im-unternehmen.de\/744<\/b>). Dort soll ein Unterformular die Daten einer Abfrage anzeigen, die mehrfach vorkommende Kombinationen bestimmter Feldwerte enthält. Diese Anzeige soll die doppelt oder öfter vorkommenden Kombinationen allerdings nur in einfacher Ausführung liefern. Der Benutzer wählt dann einen der Einträge aus, woraufhin ein weiteres Unterformular nur die Dubletten dieses ausgewählten Eintrags anzeigt – so kann der Benutzer in Ruhe entscheiden, ob einer oder mehrere der Datensätze gelöscht werden sollen.<\/p>\n

Die Anforderung in diesem Fall lautet: Das erste Unterformular soll die Daten einer speziellen Abfrage anzeigen. Dies allein ist kein Problem: Sie können einem Unterformular-Steuerelement zur Laufzeit per VBA nicht nur ein Formular, sondern auch eine Tabelle oder eine Abfrage als Herkunftsobjekt zuweisen. Das geht zum Beispiel so:<\/p>\n

Me!sfmSubform.ControlSource = "Table.tblAdressen"<\/pre>\n
Für eine Abfrage stellen Sie entsprechend das Schlüsselwort Query <\/b>voran. Für die meisten Fälle ist dies ausreichend. Beim Duplikatmanager soll ein Klick auf einen der Einträge dieses Unterformular bestimmte Daten in einem weiteren Unterformulars anzeigen. Der Benutzer soll nicht erst den Datensatz auswählen und auf eine Schaltfläche klicken müssen. Diese Lösung wäre auch akzeptabel, aber in Anbetracht einer gegebenenfalls großen Menge von Duplikaten zählt jeder Mausklick.<\/p>\n
Also wollen wir dem Unterformular ein Ereignis hinzufügen, das auf das Anklicken eines Eintrags reagiert. Für das Beispiel des vorliegenden Beitrags reicht es, wenn einfach ein Meldungsfenster erscheint und die ID des gewählten Datensatzes ausgibt – um alles weitere kümmern wir uns im oben genannten Beitrag. Genau genommen brauchen wir uns nicht auf einen Mausklick zu konzentrieren, sondern es reicht, den Datensatzwechsel zu beobachten – so können wir mit der Ereignisprozedur Beim Anzeigen <\/b>arbeiten.<\/p>\n
Unterformular flexibel gestalten<\/b><\/p>\n
Das jeweilige Ereignis ist für diesen Beitrag aber ohnehin uninteressant – wir haben hier ganz andere Probleme. Zum Beispiel müssen wir uns überlegen, wie wir einem Formular, dessen Datenherkunft wir noch nicht kennen, die entsprechenden Steuerelemente hinzufügen können.<\/p>\n
Theoretisch wird das so ablaufen:<\/p>\n