<\/p>\n
In der Artikelreihe Access-Optionen <\/b>haben wir uns alle Optionen angesehen, die Sie über den Bereich Access-Optionen <\/b>von Access steuern können. Die meisten davon können Sie auch per VBA beeinflussen. In diesem Artikel schauen wir uns an, welche verschiedenen Möglichkeiten es dazu gibt und wie Sie diese einsetzen. Dabei schauen wir uns genau an, wie die verschiedenen Optionen auf die unterschiedlichen Möglichkeiten der Programmierung aufgeteilt werden.<\/p>\nTechniken für verschiedene Optionen<\/h2>\n
Wenn Sie sich die Optionen ansehen, die der Dialog Access-Optionen für uns bereithält, können Sie diese in zwei Kategorien aufteilen:<\/p>\n
Die meisten der Einstellungen betreffen die Access-Anwendung beziehungsweise die Benutzeroberfläche. Einige jedoch wirken sich nur auf die aktuell geöffnete Datenbankanwendung aus – zum Beispiel die im Bereich Aktuelle Datenbank<\/b>.<\/p>\n
Ob sich eine Option auf die Benutzeroberfläche von Access bezieht oder auf die aktuelle Datenbank, lässt sich in manchen Fällen nur schwer festmachen. Woran wir es tatsächlich erkennen können, ist der Speicherort der jeweiligen Option.<\/p>\n
Als Speicherort für die Optionen kommen folgende Orte in Frage:<\/p>\n
Wir wollen für die folgenden Abschnitte folgende Definition festhalten:<\/p>\n
Die Access-Optionen landen in der Registry von Windows, damit sie für die aktuell auf dem Rechner installierte Access-Anwendung verfügbar sind – beziehungsweise für den Benutzer, der mit Access arbeitet.<\/p>\n
Dementsprechend befinden sich die Optionen in einem Bereich der Registry, der für den aktuellen Benutzer definiert ist – nämlich HKEY-CURRENT USER<\/b>.<\/p>\n
Die Registry von Windows öffnen Sie durch die Eingabe des Befehls RegEdit <\/b>in das Suchfenster von Windows.<\/p>\n
Im nun erscheinenden Fenster namens Registrierungs-Editor <\/b>navigieren Sie nun zu folgendem Pfad:<\/p>\n Damit landen Sie in einem Bereich mit einigen Optionen, die jeweils in englischer Sprache angegeben sind (siehe Bild 1). <\/p>\n Bild 1: Der Bereich der Registry für die Access-Optionen<\/p>\n Was haben Sie nun von diesen Einträgen Wir wollen ja vermutlich nicht die Registry bemühen, um Access-Optionen zu ändern, die wir auch direkt in den Access-Optionen bearbeiten können.<\/p>\n Nein: Wir möchten lediglich wissen, wie die Eigenschaften in der Registry heißen. Wozu Weil wir sie dann per VBA bearbeiten können! Wie das Mit den Befehlen GetOption <\/b>und SetOption<\/b>!<\/p>\n Die Access-Optionen bearbeiten wir mit dem Befehl SetOption<\/b>. Dieser erwartet zwei Parameter – den Namen der zu bearbeitenden Option und den einzustellenden Wert.<\/p>\n Bevor wir Änderungen an der Registry vornehmen, schauen wir uns das Gegenstück zu SetOption <\/b>an, nämlich GetOption<\/b>. Dieser Befehl erlaubt das Abfragen der Access-Optionen. Probieren wir das gleich einmal mit der ersten Option aus, die wir in der Registry sehen:<\/p>\n Das klappt schon einmal, denn der Wert lautet auch in der Registry 0<\/b>. Nun wissen wir allerdings leider nicht, welche Bedeutung dieser Wert hat und welche Werte es noch gibt.<\/p>\n Eine Möglichkeit, für die sie Access-Optionen per VBA lesen und schreiben können, ist das Einlesen der aktuellen Einstellungen, um diese auf eine Access-Installation auf einem anderen Rechner zu übertragen.<\/p>\n Wenn Sie also viele der Access-Optionen für sich angepasst haben und gelegentlich beispielsweise neue Access-Installationen auf virtuellen Maschinen nutzen, wollen Sie dort vielleicht die gewohnten Einstellungen vorfinden.<\/p>\n Das gelingt leicht, indem Sie diese etwa in eine Tabelle einlesen und diese Tabelle dann für die neue Installation auslesen und in die Registry eintragen.<\/p>\n Bei der Änderung einer Einstellung der Access-Optionen per VBA gelten die gleichen Bedingungen wie beim Einstellen direkt im Optionen-Dialog:<\/p>\n Access enthält einige Systemtabellen, die standardmäßig nicht im Navigationsbereich erscheinen. Für manche Zwecke sind diese jedoch interessant und daher möchten wir diese gelegentlich einblenden.<\/p>\n Das erledigen wir normalerweise über eine Option des Dialogs Navigationsoptionen<\/b>, den wir mit einem Rechtsklick auf den Titel des Navigationsbereichs und Auswahl des Befehls Navigationsoptionen… <\/b>aktivieren.<\/p>\n Dies können wir jedoch auch mit dem Befehl SetOption <\/b>erledigen. Vorher wollen wir jedoch einmal den aktuellen Wert ermitteln, solange die Systemobjekte nicht angezeigt werden. Dazu verwenden wir den folgenden Befehl, abgesetzt im Direktbereich des VBA-Editors (zu aktivieren mit Strg + G<\/b>):<\/p>\n Der aktuelle Wert beträgt 0<\/b>. Nun wollen wir herausfinden, wie der gewünschte Wert lautet. Dazu öffnen wir den Dialog Navigationsoptionen <\/b>und aktivieren die Option Systemobjekte anzeigen <\/b>(siehe Bild 2).<\/p>\n Bild 2: Aktivieren der Anzeige der Systemobjekte<\/p>\n Nachdem wir uns im Navigationsbereich davon überzeugt haben, dass die Systemobjekte nun tatsächlich eingeblendet wurden, fragen wir erneut den Wert der Eigenschaft per VBA ab:<\/p>\n Dies liefert den Wert -1<\/b>, also True<\/b>. Wir haben es hier logischerweise mit einer Option mit dem Datentyp Boolean <\/b>zu tun.<\/p>\n Nun üben wir einmal das Umstellen einer Access-Option mit der SetOption<\/b>-Methode. Dazu verwenden wir wieder den Optionsnamen Show System Objects<\/b> und geben als zweiten Parameter den Wert 0 <\/b>an – wir wollen die Anzeige der Systemobjekte also wieder ausschalten:<\/p>\n Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>HKEY_CURRENT_USER\\SOFTWARE\\Microsoft\\Office\\16.0\\Access\\Settings<\/pre>\n
![\"Der](\"..\/tl_files\/images\/pic_539_001.png\")
<\/a><\/p>\nAccess-Optionen per VBA bearbeiten<\/h2>\n
GetOption(\"Arrow Key Behavior\")\r\n 0 <\/pre>\n
Wozu Access-Optionen per VBA bearbeiten<\/h2>\n
\n
Beispiel Systemobjekte<\/h2>\n
GetOption(\"Show System Objects\")\r\n 0 <\/pre>\n
<\/a><\/p>\n GetOption(\"Show System Objects\")\r\n-1 <\/pre>\n
SetOption \"Show System Objects\", 0<\/pre>\n
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Access [basics]<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 400 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t