{"id":55000824,"date":"2012-04-01T00:00:00","date_gmt":"2020-05-22T21:53:19","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=824"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Bedingte_Schaltflaechen","status":"publish","type":"post","link":"https:\/\/access-im-unternehmen.de\/Bedingte_Schaltflaechen\/","title":{"rendered":"Bedingte Schaltflächen"},"content":{"rendered":"

\"\"<\/p>\n

Haben Sie sich auch schonmal darüber geärgert Sie wollen einem Endlosformular Schaltflächen zuweisen, die mal aktiviert sind und mal nicht – oder auch mal ausgeblendet oder auch nicht. Dummerweise erlaubt die Endlosansicht aber für ungebundene Steuerelemente keine vom jeweiligen Datensatz abhängigen Einstellungen. Zum Glück kann man mit Access hier und da tricksen – und so stellen wir in diesem Beitrag Möglichkeiten vor, wie Sie in den verschiedenen Access-Versionen doch noch anklickbare Steuerelemente mit individuellem Aussehen offerieren.<\/b><\/p>\n

Die Möglichkeiten unterschieden sich dabei je nach der Access-Version, wobei es von Version zu Version leichter wird, entsprechende Schaltflächen bereitzustellen beziehungsweise zu simulieren (in der Tat gelang es uns mit keiner Version, eine echte Schaltfläche mit wechselnden Icons, Beschriftungen oder Eigenschaften zu versehen – dazu mussten andere Steuerelemente wie Textfelder oder Bildsteuerelemente herhalten).<\/p>\n

In Access 2003 und älter sind wir auf die Verwendung von Texten und Sonderzeichen beschränkt, ab Access 2007 bietet das Bildsteuerelement durch seine Eigenschaft als gebundenes Steuerelement weitaus bessere Möglichkeiten. Diese werden unter Access 2010 noch getoppt.<\/p>\n

Grundsätzlich besteht das Problem darin, dass das Zuweisen eines Wertes zu einer Eigenschaft eines Steuerelements sich immer auf alle Datensätze auswirkt. Das bedeutet, dass Sie etwa eine Schaltfläche nicht für einen Datensatz ausblenden oder deaktivieren können und für die anderen nicht – es werden immer alle Schaltflächen ausgeblendet oder deaktiviert.<\/p>\n

Die einzige Möglichkeit, ein Steuerelement in einem Datensatz über eine Eigenschaft anders als das gleiche Steuerelement in den übrigen Datensätzen zu gestalten, findet sich in der Eigenschaft Steuerelementinhalt<\/b>.<\/p>\n

Dabei ist der eigentliche Wert der Eigenschaft natürlich immer für alle Datensätze gleich, aber das durch die Eigenschaft referenzierte Feld liefert je nach Datensatz unterschiedliche Werte. Die zweite Möglichkeit, ein Steuerelement in verschiedenen Datensätzen unterschiedlich zu gestalten, liegt in der bedingten Formatierung – die soll jedoch nicht Thema des vorliegenden Beitrags sein.<\/p>\n

Beispielanwendung<\/b><\/p>\n

Damit es nicht zu kompliziert wird, soll in einem Beispielformular in der Endlosansicht eine schaltflächenartige Möglichkeit geboten werden, einen Datensatz zu löschen, wenn ein Ja\/Nein<\/b>-Feld namens Loeschen <\/b>den Wert True<\/b> enthält.<\/p>\n

Die übrigen Felder der Beispieltabelle sind ein Primärschlüsselfeld (BeispielID<\/b>) und ein Textfeld (Beispieltext<\/b>) mit beliebigen Inhalten. Das Ja\/Nein<\/b>-Feld steht stellvertretend für beliebig komplexe Ausdrücke, die festlegen, ob eine Schaltfläche aktiviert sein soll oder nicht. Der Wert des gewünschten Ausdrucks kann dann in einer Abfrage als Boolean-Wert zur Datenherkunft des Formulars in der Endlosansicht hinzugefügt werden.<\/p>\n

Bedingte Schaltflächen unter Access 2003 und älter<\/b><\/p>\n

Unter Access 2003 und älter ist der höchste Grad an Improvisation gefragt. Hier steht noch nicht einmal ein Bild-Steuerelement bereit, dem man ein schickes Icon zuweisen könnte.<\/p>\n

Also verwenden Sie entweder ein Textfeld mit einem entsprechenden Text (Löschen<\/b> oder X<\/b>). Dieser Text soll jedoch nur angezeigt werden, wenn das Feld Loeschen <\/b>auch den Wert True<\/b> enthält, der Benutzer den Datensatz also löschen können soll. Damit der gewünschte Text nur in diesem Fall angezeigt wird, fügen Sie der Eigenschaft Steuerelementinhalt <\/b>des Textfeldes etwa den folgenden Ausdruck hinzu:<\/p>\n

=Wenn([Loeschen];"X";"")<\/pre>\n
In der Entwurfsansicht sieht das Formular nun etwa wie in Bild 1 aus. Zur optischen Hervorhebung können Sie die Textfarbe noch auf Rot <\/b>und die Schriftbreite auf Fett <\/b>einstellen.<\/p>\n
\"pic002.png\"<\/p>\n
Bild 1: Das Formular mit der datenabhängigen Löschen-Schaltfläche in der Entwurfsansicht<\/span><\/b><\/p>\n
Nun lässt sich das Textfeld durchaus mit einem Beim Klicken<\/b>-Ereignis versehen. Dummerweise landet beim Anklicken auch der Fokus im Textfeld, was sich durch die blinkende Einfügemarke bemerkbar macht – das sieht natürlich nicht besonders professionell aus.<\/p>\n
Also legen Sie noch eine Schaltfläche mit gleichen Abmessungen genau über das Textfeld und stellen seine Eigenschaft Transparent <\/b>auf Ja <\/b>ein. Nun legen Sie noch eine entsprechende Ereignisprozedur für das Ereignis Beim Klicken <\/b>der Schaltfläche an, die etwa wie folgt aussieht:<\/p>\n
Private Sub cmdLoeschen_Click()\r\n    If Me!Loeschen = True Then\r\n        If MsgBox("Datensatz wirklich löschen", vbYesNo, "Löschen") = vbYes Then\r\n            DoCmd.RunCommand acCmdDelete\r\n        End If\r\n    End If\r\nEnd Sub<\/pre>\n
Dies führt zu einer Ansicht wie in Bild 2.<\/p>\n
\"pic001.png\"<\/p>\n
Bild 2: Löschen-Schaltfläche, die in Abhängigkeit von den Daten ein- oder ausgeblendet wird.<\/span><\/b><\/p>\n
Bedingte Schaltflächen in Access 2007<\/b><\/p>\n
Access 2007 liefert mit dem Anlagefeld und mit der Eigenschaft Steuerelementinhalt für das Bild-Steuerelement eine Möglichkeit, Icons in Abhängigkeit vom jeweiligen Datensatz anzuzeigen. Da Access 2007 mit der Einführung des Ribbons einen großen Schritt in Richtung benutzerfreundlicherer Oberflächen macht, was sich auch durch das einfache Anbringen von Icons auf Schaltflächen bemerkbar macht, wollen wir dies auch für die Endlosansicht von Formularen ermöglichen.<\/p>\n
<\/p>\n
Auch hier können Sie leider keine echte Schaltfläche verwenden, aber wir gelangen immerhin von einer reinen Text-Schaltfläche zu einer Schaltfläche mit Icon.<\/p>\n
Wir nähern uns der Lösung Schritt für Schritt an. Im ersten Schritt erhält die Tabelle tblBeispiel <\/b>ein zusätzliches Feld namens LoeschenBild<\/b>, das als Anlage-Feld ausgeführt ist und für den ersten Datensatz ein Löschen-Icon im .png<\/b>-Format enthält. Damit diese Lösung sauber arbeitet, müssen Sie übrigens die Option Bildeigenschaften-Speicherformat <\/b>auf den Wert Quellbildformat beibehalten <\/b>einstellen. Wenn Sie alle Felder zum Detailbereich eines neuen Formulars in der Endlos-Ansicht hinzufügen und diese entsprechend anordnen, erhalten Sie ein Bild wie in Bild 3.<\/p>\n
\"pic003.png\"<\/p>\n
Bild 3: Löschen-Symbol für einen Datensatz<\/span><\/b><\/p>\n
Das ist jedoch nur Übung zum Aufwärmen: Immerhin zeigt das Formular nun nur das im Anlagefeld des jeweiligen Datensatzes gespeicherte Icon an – statt eines Icons, das je nach dem Wert des Feldes Loeschen <\/b>ein- oder ausgeblendet wird.<\/p>\n
Um zum Wert des Feldes Loeschen<\/b> jeweils den richtigen Wert anzuzeigen, erstellen Sie zunächst eine Tabelle mit den zu verwendenden Icons. Diese enthält die drei Felder IconID<\/b>, Icon <\/b>(Anlagefeld) und Wert <\/b>(Feld zum Zuordnen des Icon-Datensatzes zum entsprechenden Datensatz der Tabelle tblBeispiel<\/b>) – siehe auch Bild 4.<\/p>\n
\"pic004.png\"<\/p>\n
Bild 4: Entwurf der Tabelle zum Speichern der Icons<\/span><\/b><\/p>\n
Bild 5 zeigt die Tabelle mit den beiden für dieses Beispiel notwendigen Datensätzen. Das Icon im Anlagefeld des ersten Datensatzes soll angezeigt werden, wenn das Feld Loeschen <\/b>der Tabelle tblBeispiel <\/b>den Wert True<\/b>, also -1<\/b>, enthält. Der zweite Datensatz ist für den Wert False<\/b>, also 0<\/b>, bestimmt.<\/p>\n
\"pic005.png\"<\/p>\n
Bild 5: In der Tabelle tblIcons gespeicherte Bilddateien<\/span><\/b><\/p>\n
Nun erstellen Sie eine Abfrage, welche die Tabelle tblBeispiel <\/b>und die Tabelle tblIcons<\/b> zusammenführt. Diese Abfrage enthält beide Tabellen und verknüpft diese über die Felder Loeschen <\/b>und Wert<\/b> (s. Bild 6).<\/p>\n
\"pic006.png\"<\/p>\n
Bild 6: Zusammenführen der Daten und der Bilder in einer Abfrage<\/span><\/b><\/p>\n
In Bild 7 haben wir die beiden Felder Loeschen<\/b>, Icon.Filename <\/b>und Wert <\/b>noch zum Abfrageergebnis hinzugefügt, damit die verwendete Technik noch besser erkennbar ist. Über die verknüpften Felder Loeschen <\/b>und Wert <\/b>wird den Datensätzen der Tabelle tblBeispiel <\/b>dort die jeweils richtige Abbildung hinzugefügt.<\/p>\n
\"pic007.png\"<\/p>\n
Bild 7: Beispieldatensätze und Bilder in einer Abfrage<\/span><\/b><\/p>\n
Richtig sichtbar wird dies freilich erst im Anlagefeld im Formular. Das Formular heißt frmBeispielMitBild <\/b>und verwendet die Abfrage qryBeispielMitBild <\/b>als Datenherkunft. Es zeigt die Felder BeispielID<\/b>, Beispieltext <\/b>und Icon <\/b>an (s. Bild 8).<\/p>\n
\"pic008.png\"<\/p>\n
Bild 8: Datensätze mit dem richtigen Icon<\/span><\/b><\/p>\n
Nun fehlt nur noch die entsprechende Ereignisprozedur für das Anlagefeld, die durch das Ereignis Beim Klicken <\/b>ausgelöst wird. Diese prüft, ob das Feld Loeschen <\/b>den Wert True <\/b>hat, und löscht den Datensatz dann nach entsprechender Rückfrage:<\/p>\n
Private Sub tblBeispiel_LoeschenBild_FileData_Click()\r\n    If Me!Loeschen = True Then\r\n        If MsgBox("Datensatz wirklich löschen", vbYesNo, "Löschen") = vbYes Then\r\n            DoCmd.RunCommand acCmdDelete\r\n        End If\r\n    End If\r\nEnd Sub<\/pre>\n
Leider blendet das Anlagefeld beim Anklicken immer noch die typische Befehlsleiste an, die den Benutzer wohl doch eher verwirren dürfte (s. Bild 9). Zum Glück gibt es eine Möglichkeit, dies zu ändern.<\/p>\n
\"pic009.png\"<\/p>\n
Bild 9: Anlage-Feld-Steuerelemente<\/span><\/b><\/p>\n
Dazu gehen wir zurück zur Abfrage qryBeispielMitBild <\/b>und fügen dort statt dem kompletten Anlage-Feld nur den FileData<\/b>-Teil dieses Feldes hinzu (s. Bild 10). Dieses tauschen Sie auch im Formular aus, damit es nicht mehr das Anlage-Feld-Bedienfeld anzeigt.<\/p>\n
\"pic010.png\"<\/p>\n
Bild 10: Neue Version der Abfrage mit dem FileData-Feld des Anlage-Feldes<\/span><\/b><\/p>\n
Variante mit Bildnamen<\/b><\/p>\n
Wenn Sie einmal mehr als nur zwei Icons etwa für die Zustände True <\/b>und False <\/b>benötigen, tragen Sie in der Tabelle mit den eigentlichen Daten einfach in ein neues Feld namens IconName <\/b>den Namen ein, unter dem das Icon im Anlage-Feld der Tabelle tblIcons <\/b>gespeichert ist.<\/p>\n
Dann verknüpfen Sie die beiden Tabellen in der Abfrage über das Feld IconName <\/b>– der Abfrageentwurf sieht wie in Bild 11 aus.<\/p>\n
\"pic011.png\"<\/p>\n
Bild 11: Abfrage zum Zusammenführen von Datensätzen mit verschiedenen Icons<\/span><\/b><\/p>\n
Wenn Sie diese Abfrage nun in einem Formular anzeigen, können Sie auch mehr als zwei verschiedene Bilder wie bei der Variante mit True<\/b>\/False <\/b>anzeigen (s. Bild 12).<\/p>\n
\"pic013.png\"<\/p>\n
Bild 13: Hinzufügen von Bilddateien zur Tabelle MSysResources<\/span><\/b><\/p>\n
Bedingte Schaltflächen unter Access 2010<\/b><\/p>\n
Richtig einfach realisieren Sie das gewünschte Szenario unter Access 2010. Es bietet mit der Systemtabelle MSysResources<\/b> eine zentrale Ablage für Bilddateien, auf die Sie allein über die Bildnamen ohne Dateiendung zugreifen können.<\/p>\n
Am einfachsten fügen Sie dieser Tabelle eine Bilddatei hinzu, indem Sie ein Formular in der Entwurfsansicht öffnen und dann auf den Ribbon-Eintrag Entwurf|Steuerelemente|Bild einfügen <\/b>klicken und dort mit Durchsuchen… <\/b>den Dialog zum Auswählen der einzufügenden Bilddatei öffnen.<\/p>\n
Bereits vorher eingefügte Bilder werden direkt in einer Bildergalerie angeboten (s. Bild 13). Genau wie bei den vorherigen Beispielen für Access 2003 und älter sowie für Access 2007 verwenden wir auch hier eine Tabelle namens tblBeispiel<\/b>, die diesmal jedoch die folgenden drei Felder enthält:<\/p>\n
\"pic012.png\"<\/p>\n
Bild 12: Die Icons werden allein über den Inhalt des Feldes Iconname der Tabelle tblBeispiel zugewiesen.<\/span><\/b><\/p>\n