<\/p>\n
Makros sind unter Microsoft Access eine stiefmütterlich behandelte Objektart. In der Tat ist die Programmierung einer Datenbank mit VBA wesentlich flexibler und mächtiger. Allerdings gibt es Anwendungszwecke, die sich mit VBA nicht abdecken lassen. Hier kann man auf zwei spezielle Makros zugreifen: Das AutoExec-Makro wird beim Start einer Anwendung aufgerufen und kann zum Anstoßen von Aktionen verwendet werden, die beim Start benötigt werden. Das AutoKeys-Makro nimmt die Definition von Tastenkombinationen auf, die während des Betriebs der jeweiligen Access-Anwendung zur Verfügung stehen. Das letztere Makro schauen wir uns in diesem Beitrag im Detail an.<\/b><\/p>\n
Technisch gesehen ist das AutoKeys<\/b>-Makro ein Makro wie jedes andere. Der wichtigste Unterschied ist, dass es unter dem Namen AutoKeys <\/b>gespeichert wird. Nur dieses Makro liest Access beim Ausführen von Tastenkombinationen aus. Und auch hier gibt es eine Ausnahme – die schauen wir uns weiter unten an. Die im AutoKeys<\/b>-Makro definierten Tastenkombinationen stehen in der ganzen Anwendung zur Verfügung. Sie stehen damit im Gegensatz zu den Ereignissen Bei Taste ab <\/b>und Bei Taste auf <\/b>von Formularen, die nur dann ausgelöst werden, wenn das jeweilige Formular den Fokus hat.<\/p>\n
AutoKeys-Makro anlegen<\/b><\/p>\n
Zum Anlegen des AutoKeys<\/b>-Makros betätigen Sie den Ribbon-Eintrag Erstellen|Makros und Code|Makro<\/b>. Danach erscheint bereits der Entwurf eines neuen Makros. Wenn Sie bereits unter älteren Access-Versionen Makros programmiert haben und speziell das AutoKeys<\/b>-Makro, dann vermissen Sie in der Entwurfsansicht vermutlich die Name<\/b>-Spalte, in der üblicherweise die Tastenkombination angegeben wird, auf die das Makro reagieren soll (siehe Bild 1).<\/p>\n
![\"Ein](\"..\/fileadmin\/_temp_\/2020_06\/pic_1271_001.png\")
<\/p>\n
Bild 1: Ein Makro ohne sichtbare Name-Spalte<\/span><\/b><\/p>\n Unter Access 2016 beispielsweise fügen Sie daher ein Untermakro zum Makro hinzu (siehe Bild 2).<\/p>\n Bild 2: Das Makro mit Untermakro<\/span><\/b><\/p>\n Der Name des Untermakros entspricht dann dem Wert in der Spalte Name <\/b>im Makroentwurf früherer Access-Versionen.<\/p>\n Festlegen der Tastenkombination<\/b><\/p>\n Hier legen wir bereits die Tastenkombination fest. Grundsätzlich kombiniert man immer mindestens eine der beiden Tasten Strg<\/b> oder Umschalt <\/b>mit einer anderen Taste. Die Verwendung der Alt<\/b>-Taste ist nicht möglich. Die Buchstaben- und Zahlentasten können dabei nur mit einer dieser beiden Tasten kombiniert werden, die anderen Tasten auch ohne Strg<\/b> oder Umschalt<\/b>.<\/p>\n Für die Kombination mit Strg<\/b> und Umschalt <\/b>verwenden Sie zu Beginn eines der folgenden Kürzel:<\/p>\n Hier fügen Sie nun die gewünschte weitere Taste hinzu. Es stehen die folgenden Tasten zur Auswahl:<\/p>\n Sie können nur jeweils eine dieser Tasten mit Strg <\/b>und\/oder Umschalt <\/b>kombinieren.<\/p>\n Die Zeichen A <\/b>bis Z <\/b>und 0 <\/b>bis 9 <\/b>können Sie nur in Kombination mit Strg <\/b>oder Strg + Umschalt <\/b>verwenden, aber nicht nur mit der Umschalt<\/b>-Taste – was sinnvoll ist, da Sie sonst in der Anwendung zum Beispiel keine großen Buchstaben eingeben könnten.<\/p>\n Diese Zeichen brauchen Sie nicht unbedingt in geschweifte Klammern zu setzen. Bei den anderen Tasten wie den Funktionstasten et cetera, deren Bezeichnung aus mehr als einem Zeichen besteht, müssen Sie hingegen die Bezeichnung in geschweifte Klammern einfassen. Praktischerweise gibt Access beim Versuch, eine nicht gültige Kombination mit Strg + S <\/b>zu speichern, eine Fehlermeldung aus (siehe Bild 3).<\/p>\n <\/p>\n Bild 3: Fehlermeldung beim Versuch, eine ungültige Tastenkombination zu speichern<\/span><\/b><\/p>\n Beispiele für Tastenkombinationen<\/b><\/p>\n Nachfolgend einige Beispiele für Tastenkombinationen:<\/p>\n Verhalten von Tastenkombinationen, die systemweit festgelegt sind<\/b><\/p>\n Manche Anwendungen legen Tastenkombinationen fest, die systemweit gültig sind, also unabhängig vom aktuell geöffneten Programm – beispielsweise zum Erstellen von Screenshots oder für ähnliche Funktionen.<\/p>\n Diese Tastenkombinationen können Sie nicht durch Definitionen im AutoKeys<\/b>-Makro überschreiben.<\/p>\n Tastenkombinationen mit Funktion versehen<\/b><\/p>\n Zum Testen der Tastenkombinationen können Sie einfach die Ausgabe einer Meldung hinzufügen. Dazu fügen Sie die Makroaktion Meldungsfeld <\/b>hinzu und stellen seine Eigenschaft Meldung <\/b>auf den gewünschten Text ein – zum Testen der Tastenkombination Strg + F1 <\/b>beispielsweise auf Strg + F1 erfolgreich<\/b>.<\/p>\n VBA-Prozedur per Tastenkombination aufrufen<\/b><\/p>\n Vielleicht bieten die Makroaktionen nicht die Funktionen, die Sie für die Umsetzung Ihrer Tastenkombination benötigen. In diesem Fall wollen Sie vermutlich eine VBA-Prozedur per Tastenkombination auslösen. Das gelingt leider nicht direkt, sondern wir müssen dazu eine Makroaktion hinzunehmen.<\/p>\n Dazu legen wir für das Untermakro mit der Tastenkombination, im Beispiel Strg + Umschalt + F1<\/b>, eine AusführenCode<\/b>-Aktion hinzu. Der Eigenschaft Funktionsname <\/b>weisen wir den Namen der Funktion VBAPerTastenkombination() <\/b>zu (siehe Bild 4). An dieser Stelle dürfen Sie nicht vergessen, die öffnenden und schließenden Klammern am Ende des Funktionsnamens einzufügen.<\/p>\n Bild 4: Makro zum Aufrufen einer VBA-Funktion<\/span><\/b><\/p>\n Außerdem funktioniert nur der Aufruf von Funktionen, nicht jedoch von Sub<\/b>-Prozeduren.<\/p>\n AutoKeys-Makro funktioniert nicht<\/b><\/p>\n Unter bestimmten Umständen kann es vorkommen, dass ein AutoKeys<\/b>-Makro nicht funktioniert. Das ist in der Regel der Fall, wenn als Name für das Makro, aus dem die Tastenkombinationen ausgelesen werden, nicht der Wert AutoKeys <\/b>festgelegt ist. Diese Bezeichnung unterscheidet sich je nach Access- und Sprachversion.<\/p>\n Das Gute ist: Sie können diese Einstellung per VBA abfragen und auch ändern. Dazu geben Sie im Direktbereich des VBA-Editors die folgende Anweisung ein:<\/p>\n Wenn Ihr Makro AutoKeys<\/b> heißt und der Aufruf ebenfalls diese Bezeichnung liefert, liegt an dieser Stelle kein Fehler vor. Wenn jedoch beispielsweise der Name Tastaturbelegung <\/b>erscheint, haben Sie zwei Möglichkeiten:<\/p>\n Letzteres erledigen Sie mit der folgenden Anweisung:<\/p>\n In beiden Fällen müssen Sie folgendes wissen, um die Konsequenzen erfassen zu können: Die Option Key Assignment Macro <\/b>gilt für die aktuelle Access-Installation. Wenn Sie also eine Access-Anwendung mit einem AutoExec<\/b>-Makro an einen Kunden weitergeben und auf dessen Rechner den Wert der Option Key Assignment Macro <\/b>von Tastaturbelegung <\/b>auf AutoKeys <\/b>ändern, dann funktionieren möglicherweise die Tastenkombinationen von anderen Anwendungen, die in einem Makro namens Tastaturbelegung <\/b>gespeichert sind, nicht mehr.<\/p>\n Wenn wir davon ausgehen, dass es auf Rechnern von deutschsprachigen Kunden tatsächlich nur die beiden Varianten AutoKeys <\/b>und Tastaturbelegung <\/b>gibt, könnten Sie einfach das Makro unter dem jeweils fehlenden Namen kopieren.<\/p>\n Oder Sie prüfen beim Öffnen der Anwendung, welchen Wert die Option Key Assignment Macro <\/b>hat und stellen diesen für die Dauer der Nutzung der Anwendung auf den benötigten Namen um – und anschließend wieder auf den alten Wert zurück.<\/p>\n AutoKeys-Makro nach Bedarf benennen<\/b><\/p>\n Das erledigen wir mit zwei neuen Elementen. Das erste ist ein AutoExec<\/b>-Makro, das automatisch beim Öffnen der Access-Datenbank ausgeführt wird (siehe Bild 5). Dieses füllen wir mit der Makroaktion ÖffnenFormular <\/b>und legen dabei den Namen des zu öffnenden Formulars auf frmAutoExec <\/b>fest. Außerdem stellen wir für Fenstermodus <\/b>den Wert Ausgeblendet <\/b>ein, damit das Formular gar nicht erst angezeigt wird.<\/p>\n Bild 5: Makro, das beim Start der Anwendung ausgeführt wird<\/span><\/b><\/p>\n Diesem Formular namens frmAutoExec <\/b>weisen wir zwei Ereignisprozeduren für die Ereignisse Beim Laden <\/b>und Beim Entladen <\/b>zu. Außerdem benötigen wir eine Variable, mit der wir uns den Namen des AutoKeys<\/b>-Makros beim Öffnen des Formulars merken:<\/p>\n In der Beim Laden<\/b>-Ereignisprozedur schreiben wir den aktuellen Wert der Option Key Assignment Macro <\/b>in diese Variable und stellen die Option dann auf den von uns benötigten Wert ein – hier AutoKeys<\/b>:<\/p>\n In der Beim Entladen<\/b>-Prozedur schreiben wir den gespeicherten Wert dann in die Option Key Assignment Macro <\/b>zurück:<\/p>\n Dieses Ereignis wird erst beim Schließen der Anwendung ausgelöst, weil das Formular bis dahin unsichtbar vor sich hin weilt und dann mit der Anwendung geschlossen wird – was das Auslösen des Ereignisses Beim Entladen <\/b>nach sich zieht.<\/p>\n Zusammenfassung und Ausblick<\/b><\/p>\n Dieser Beitrag hat die wichtigsten Informationen rund um den Einsatz des AutoKeys<\/b>-Makros für die Bereitstellung von individuellen Tastenkombinationen geliefert. In einem weiteren Beitrag namens Tastenkombinationen mit AutoHotKeys<\/b> (www.access-im-unternehmen.de\/1272<\/b>) zeigen wir, wie Sie noch andere Tastenkombinationen realisieren, die dann auch für mehr als die aktuelle Access-Anwendung gültig sind.<\/p>\n","protected":false},"excerpt":{"rendered":" Makros sind unter Microsoft Access eine stiefmütterlich behandelte Objektart. In der Tat ist die Programmierung einer Datenbank mit VBA wesentlich flexibler und mächtiger. Allerdings gibt es Anwendungszwecke, die sich mit VBA nicht abdecken lassen. Hier kann man auf zwei spezielle Makros zugreifen: Das AutoExec-Makro wird beim Start einer Anwendung aufgerufen und kann zum Anstoßen von Aktionen verwendet werden, die beim Start benötigt werden. Das AutoKeys-Makro nimmt die Definition von Tastenkombinationen auf, die während des Betriebs der jeweiligen Access-Anwendung zur Verfügung stehen. Das letztere Makro schauen wir uns in diesem Beitrag im Detail an.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"om_disable_all_campaigns":false,"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":""},"categories":[662020,66062020,44000025],"tags":[],"class_list":["post-55001271","post","type-post","status-publish","format-standard","hentry","category-662020","category-66062020","category-VBA_und_Programmiertechniken"],"yoast_head":"\n![\"Das](\"..\/fileadmin\/_temp_\/2020_06\/pic_1271_002.png\")
<\/p>\n\n
\n
![\"Fehlermeldung](\"..\/fileadmin\/_temp_\/2020_06\/pic_1271_003.png\")
<\/p>\n\n
![\"Makro](\"..\/fileadmin\/_temp_\/2020_06\/pic_1271_004.png\")
<\/p>\n Application.GetOption(\"Key Assignment Macro\")\r\nAutoKeys<\/pre>\n
\n
Application.SetOption(\"Key Assignment Macro\"), \"AutoKeys\"<\/pre>\n
![\"Makro,](\"..\/fileadmin\/_temp_\/2020_06\/pic_1271_006.png\")
<\/p>\nDim <\/span>strAutoExecMacro As String<\/span><\/pre>\nPrivate Sub <\/span>Form_Load()\r\n strAutoExecMacro = GetOption(\"Key Assignment Macro\")\r\n SetOption \"Key Assignment Macro\", \"AutoKeys\"\r\nEnd Sub<\/span><\/pre>\nPrivate Sub <\/span>Form_Unload(Cancel As Integer<\/span>)\r\n SetOption \"Key Assignment Macro\", strAutoExecMacro\r\nEnd Sub<\/span><\/pre>\n