{"id":55000481,"date":"2020-04-01T00:00:00","date_gmt":"2020-07-17T19:18:44","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=481"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Kontextmenues_mit_Icons","status":"publish","type":"post","link":"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html","title":{"rendered":"Kontextmen&uuml;s mit Icons"},"content":{"rendered":"<p class='introduction'>Das Anzeigen von Bildern im Ribbon ist keine gro&szlig;e Kunst &#8211; Sie ben&ouml;tigen dazu ein paar bereits vorliegende Prozeduren, welche die Bilder aus der Tabelle USysResources so umwandeln, dass diese leicht der jeweiligen Ribbon-Definition zugewiesen werden k&ouml;nnen. Aber in der Benutzeroberfl&auml;che von Access gibt es ja auch noch die Kontextmen&uuml;s. Und auch diese lassen sich mit Icons ausstatten &#8211; auch wenn dies noch einen Zwischenschritt mehr erfordert. Dieser Artikel zeigt, wie Sie die Schaltfl&auml;chen in Kontextmen&uuml;s mit Icons optisch aufwerten und so die Ergonomie verbessern.<\/p>\n<h2>Beispieldatenbank<\/h2>\n<p>Die Beispiele dieses Artikels finden Sie in der Datenbank <b>2002_KontextmenueMitIcons.accdb<\/b>.<\/p>\n<h2>Bilder zur Tabelle USysResources hinzuf&uuml;gen<\/h2>\n<p>Die Tabelle <b>MSysResources <\/b>wird von Access zum Speichern von Bildern verwendet, die Sie im Entwurf von Formularen und Berichten als eigenst&auml;ndige Bilder oder als Icons von Schaltfl&auml;chen hinzuf&uuml;gen. Diese Tabelle soll auch der Speicherort f&uuml;r die von uns in Kontextmen&uuml;s verwendeten Bilder sein. Wir wollen also als Erstes einmal ein paar Bilddateien zu dieser Tabelle hinzuf&uuml;gen. Die einfachste Methode ist der Weg &uuml;ber den Formularentwurf: Hier w&auml;hlen Sie einfach den Ribbon-Eintrag <b>Entwurf|Steuerelemente|Bild einf&uuml;gen|Durchsuchen&#8230; <\/b>aus (siehe Bild 1).<\/p>\n<p class=\"image\"><a rel=\"lightbox\" href=\"..\/tl_files\/images\/pic_481_001.png\"><img decoding=\"async\" src=\"..\/tl_files\/images\/pic_481_001.png\" alt=\"Hinzuf&uuml;gen von Bilddateien\" width=\"325\" \/><\/a><\/p>\n<p class='imagetext'>Bild 1: Hinzuf&uuml;gen von Bilddateien<\/p>\n<p>Mit dem nun erscheinenden Dialog <b>Grafik einf&uuml;gen <\/b>navigieren Sie zu Ihrem Verzeichnis mit Bilddateien (wir verwenden die Icons von <b>www.iconexperience.com<\/b>) und w&auml;hlen die gew&uuml;nschte Bilddatei aus (siehe Bild 2).<\/p>\n<p class=\"image\"><a rel=\"lightbox\" href=\"..\/tl_files\/images\/pic_481_002.png\"><img decoding=\"async\" src=\"..\/tl_files\/images\/pic_481_002.png\" alt=\"Einf&uuml;gen von Bilddateien\" width=\"325\" \/><\/a><\/p>\n<p class='imagetext'>Bild 2: Einf&uuml;gen von Bilddateien<\/p>\n<p>Wenn Sie danach erneut den Eintrag <b>Bild einf&uuml;gen <\/b>aufklappen, finden Sie dort bereits das neu hinzugef&uuml;gte Bild vor (siehe Bild 3).<\/p>\n<p class=\"image\"><a rel=\"lightbox\" href=\"..\/tl_files\/images\/pic_481_003.png\"><img decoding=\"async\" src=\"..\/tl_files\/images\/pic_481_003.png\" alt=\"Die Bilddatei ist angekommen.\" width=\"325\" \/><\/a><\/p>\n<p class='imagetext'>Bild 3: Die Bilddatei ist angekommen.<\/p>\n<p>Das zu diesem Zweck angelegte Formular k&ouml;nnen Sie wieder schlie&szlig;en, ohne es zu speichern &#8211; es diente nur dazu, den Ribbonbefehl zum Einf&uuml;gen der Bilder in die Tabelle <b>MSysResources <\/b>zu vereinfachen.<\/p>\n<h2>Die Tabelle MSysResources<\/h2>\n<p>Nun schauen wir uns an, wo wir dieses Bild in der Tabelle <b>MSysResources <\/b>finden. Um diese Tabelle zu &ouml;ffnen, m&uuml;ssen wir sie zuerst sichtbar machen. Dazu klicken Sie mit der rechten Maustaste auf die Titelzeile des Navigationsbereichs und w&auml;hlen dort den Eintrag <b>Navigationsoptionen&#8230; <\/b>aus. Im nun erscheinenden Dialog <b>Navigationsoptionen <\/b>aktivieren Sie im Bereich <b>Anzeigeoptionen <\/b>die beiden Optionen <b>Ausgeblendete Objekte anzeigen <\/b>und <b>Systemobjekte anzeigen (siehe Bild 4)<\/b>. Danach werden die Systemtabellen, die mit <b>MSys&#8230; <\/b>beginnen, angezeigt, darunter auch die Tabelle <b>MSysResources<\/b>.<\/p>\n<p class=\"image\"><a rel=\"lightbox\" href=\"..\/tl_files\/images\/pic_481_004.png\"><img decoding=\"async\" src=\"..\/tl_files\/images\/pic_481_004.png\" alt=\"Aktivieren der Anzeige von System- und ausblendeten Objekten\" width=\"325\" \/><\/a><\/p>\n<p class='imagetext'>Bild 4: Aktivieren der Anzeige von System- und ausblendeten Objekten<\/p>\n<p>Wenn Sie diese &ouml;ffnen, finden Sie dort neben einer Datei mit dem Namen <b>Office Theme <\/b>die soeben hinzugef&uuml;gten Bilddateien vor (siehe Bild 5). Im Folgenden m&uuml;ssen Sie nur wissen, welcher Wert f&uuml;r die Bilder in der Spalte <b>Name <\/b>angelegt wurde &#8211; also beispielsweise <b>add<\/b>, <b>ok <\/b>oder <b>close<\/b>.<\/p>\n<p class=\"image\"><a rel=\"lightbox\" href=\"..\/tl_files\/images\/pic_481_005.png\"><img decoding=\"async\" src=\"..\/tl_files\/images\/pic_481_005.png\" alt=\"Die Tabelle MSysResources mit den hinzugef&uuml;gten Bilddateien\" width=\"325\" \/><\/a><\/p>\n<p class='imagetext'>Bild 5: Die Tabelle MSysResources mit den hinzugef&uuml;gten Bilddateien<\/p>\n<h2>Kontextmen&uuml; mit Bildern anzeigen<\/h2>\n<p>Der erste Schritt zum Anzeigen von Kontextmen&uuml;s per VBA ist, dass wir einen Verweis auf die Bibliothek <b>Microsoft Office x.0 Object Library <\/b>hinzuf&uuml;gen. Diese stellt n&auml;mlich das Office-weite Objektmodell f&uuml;r das Anzeigen von Men&uuml;leisten bereit. Diesen Verweis finden Sie in aktuelleren Access-Versionen wie Access 2016 an versteckter Stelle. Dazu &ouml;ffnen Sie den <b>Verweise<\/b>-Dialog vom VBA-Editor aus, und zwar &uuml;ber den Men&uuml;befehl <b>Extras|Verweise<\/b>. Im <b>Verweise<\/b>-Dialog w&auml;hlen Sie dann den Eintrag <b>office <\/b>aus, der erst beim n&auml;chsten Anzeigen des Dialogs als <b>Microsoft Office x.0 Object Library <\/b>dargestellt wird (siehe Bild 6).<\/p>\n<p class=\"image\"><a rel=\"lightbox\" href=\"..\/tl_files\/images\/pic_481_006.png\"><img decoding=\"async\" src=\"..\/tl_files\/images\/pic_481_006.png\" alt=\"Hinzuf&uuml;gen der Office-Bibliothek zu den Verweisen\" width=\"325\" \/><\/a><\/p>\n<p class='imagetext'>Bild 6: Hinzuf&uuml;gen der Office-Bibliothek zu den Verweisen<\/p>\n<h2>Herk&ouml;mmliches Kontextmen&uuml; anzeigen<\/h2>\n<p>Nun legen wir ein neues, leeres Formular an, dem wir f&uuml;r das Ereignis <b>Bei Maustaste ab <\/b>eine Ereignisprozedur hinzuf&uuml;gen. Diese f&uuml;llen wir mit einigen Anweisungen, die daf&uuml;r sorgen, dass ein einfaches Kontextmen&uuml; angezeigt wird (siehe Listing 1).<\/p>\n<pre><span style=\"color:blue;\">Private Sub <\/span>Detailbereich_MouseDown(Button<span style=\"color:blue;\"> As Integer<\/span>, Shift<span style=\"color:blue;\"> As Integer<\/span>, X<span style=\"color:blue;\"> As Single<\/span>, Y<span style=\"color:blue;\"> As Single<\/span>)\r\n     <span style=\"color:blue;\">Dim <\/span>cbr<span style=\"color:blue;\"> As <\/span>Office.CommandBar\r\n     <span style=\"color:blue;\">Dim <\/span>cbc<span style=\"color:blue;\"> As <\/span>Office.CommandBarButton\r\n     <span style=\"color:blue;\">If <\/span>Button = acRightButton<span style=\"color:blue;\"> Then<\/span>\r\n         On Error Resume <span style=\"color:blue;\">Next<\/span>\r\n         CommandBars(\"Kontextmenue\").Delete\r\n         <span style=\"color:blue;\">On Error GoTo<\/span> 0\r\n         <span style=\"color:blue;\">Set<\/span> cbr = CommandBars.Add(\"Kontextmenue\", msoBarPopup, False, <span style=\"color:blue;\">True<\/span>)\r\n         <span style=\"color:blue;\">With<\/span> cbr\r\n             <span style=\"color:blue;\">Set<\/span> cbc = .Controls.Add(msoControlButton)\r\n             <span style=\"color:blue;\">With<\/span> cbc\r\n                 .Caption = \"OK\"\r\n                 .onAction = \"=OK()\"\r\n             End <span style=\"color:blue;\">With<\/span>\r\n             .ShowPopup\r\n         End <span style=\"color:blue;\">With<\/span>\r\n     <span style=\"color:blue;\">End If<\/span>\r\n<span style=\"color:blue;\">End Sub<\/span><\/pre>\n<p class='imagetext'>Listing 1: Prozedur, die beim Herunterdr&uuml;cken einer Maustaste ausgel&ouml;st wird<\/p>\n<div class=\"rcp_restricted\"><p><span style=\"color: #ff0000;\">M&ouml;chten Sie weiterlesen? Dann l&ouml;sen Sie Ihr Ticket!<\/span><br \/>\n<span style=\"color: #ff0000;\">Hier geht es zur Bestellung des Jahresabonnements des Magazins <strong>Access &#091;basics&#093;<\/strong>:<\/span><br \/>\n<span style=\"color: #ff0000;\"><a style=\"color: #ff0000;\" href=\"https:\/\/shop.minhorst.com\/magazine\/282\/access-basics?c=77\">Zur Bestellung ...<\/a><\/span><br \/>\n<span style=\"color: #ff0000;\">Danach greifen Sie sofort auf <strong>alle rund 400 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span><br \/>\n<span style=\"color: #000000;\">Oder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t<form id=\"rcp_login_form\"  class=\"rcp_form\" method=\"POST\" action=\"https:\/\/access-basics.de\/data\/wp\/v2\/posts\/55000481\/\">\n\n\t\t\n\t\t<fieldset class=\"rcp_login_data\">\n\t\t\t<p>\n\t\t\t\t<label for=\"rcp_user_login\">Username or Email<\/label>\n\t\t\t\t<input name=\"rcp_user_login\" id=\"rcp_user_login\" class=\"required\" type=\"text\"\/>\n\t\t\t<\/p>\n\t\t\t<p>\n\t\t\t\t<label for=\"rcp_user_pass\">Password<\/label>\n\t\t\t\t<input name=\"rcp_user_pass\" id=\"rcp_user_pass\" class=\"required\" type=\"password\"\/>\n\t\t\t<\/p>\n\t\t\t\t\t\t<p>\n\t\t\t\t<input type=\"checkbox\" name=\"rcp_user_remember\" id=\"rcp_user_remember\" value=\"1\"\/>\n\t\t\t\t<label for=\"rcp_user_remember\">Remember me<\/label>\n\t\t\t<\/p>\n\t\t\t<p class=\"rcp_lost_password\"><a href=\"\/index.php\/data\/wp\/v2\/posts\/55000481?rcp_action=lostpassword\"><\/a><\/p>\n\t\t\t<p>\n\t\t\t\t<input type=\"hidden\" name=\"rcp_action\" value=\"login\"\/>\n\t\t\t\t\t\t\t\t\t<input type=\"hidden\" name=\"rcp_redirect\" value=\"https:\/\/access-basics.de\/data\/wp\/v2\/posts\/55000481\/\"\/>\n\t\t\t\t\t\t\t\t<input type=\"hidden\" name=\"rcp_login_nonce\" value=\"34aae43e8a\"\/>\n\t\t\t\t<input id=\"rcp_login_submit\" class=\"rcp-button\" type=\"submit\" value=\"Login\"\/>\n\t\t\t<\/p>\n\t\t\t\t\t<\/fieldset>\n\n\t\t\n\t<\/form>\n<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Das Anzeigen von Bildern im Ribbon ist keine gro&szlig;e Kunst &#8211; Sie ben&ouml;tigen dazu ein paar bereits vorliegende Prozeduren, welche die Bilder aus der Tabelle USysResources so umwandeln, dass diese leicht der jeweiligen Ribbon-Definition zugewiesen werden k&ouml;nnen. Aber in der Benutzeroberfl&auml;che von Access gibt es ja auch noch die Kontextmen&uuml;s. Und auch diese lassen sich mit Icons ausstatten &#8211; auch wenn dies noch einen Zwischenschritt mehr erfordert. Dieser Artikel zeigt, wie Sie die Schaltfl&auml;chen in Kontextmen&uuml;s mit Icons optisch aufwerten und so die Ergonomie verbessern.<\/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":[66022020,662020,44000005],"tags":[],"class_list":["post-55000481","post","type-post","status-publish","format-standard","hentry","category-66022020","category-662020","category-AccessBenutzeroberflaeche"],"aioseo_notices":[],"yoast_head":"<!-- This site is optimized with the Yoast SEO Premium plugin v15.9.2 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>Kontextmen&uuml;s mit Icons - Access [basics]<\/title>\n<meta name=\"description\" content=\"Das Anzeigen von Bildern im Ribbon ist keine gro\u00dfe Kunst \u2013 Sie ben\u00f6tigen dazu ein paar bereits vorliegende Prozeduren, welche die Bilder aus der Tabelle USysResources so umwandeln, dass diese leicht der jeweiligen Ribbon-Definition zugewiesen werden k\u00f6nnen. Aber in der Benutzeroberfl\u00e4che von Access gibt es ja auch noch die Kontextmen\u00fcs. Und auch diese lassen sich mit Icons ausstatten \u2013 auch wenn dies noch einen Zwischenschritt mehr erfordert. Dieser Artikel zeigt, wie Sie die Schaltfl\u00e4chen in Kontextmen\u00fcs mit Icons optisch aufwerten und so die Ergonomie verbessern.\" \/>\n<link rel=\"canonical\" href=\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html\" \/>\n<meta property=\"og:locale\" content=\"de_DE\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Kontextmen&uuml;s mit Icons - Access [basics]\" \/>\n<meta property=\"og:description\" content=\"Das Anzeigen von Bildern im Ribbon ist keine gro\u00dfe Kunst \u2013 Sie ben\u00f6tigen dazu ein paar bereits vorliegende Prozeduren, welche die Bilder aus der Tabelle USysResources so umwandeln, dass diese leicht der jeweiligen Ribbon-Definition zugewiesen werden k\u00f6nnen. Aber in der Benutzeroberfl\u00e4che von Access gibt es ja auch noch die Kontextmen\u00fcs. Und auch diese lassen sich mit Icons ausstatten \u2013 auch wenn dies noch einen Zwischenschritt mehr erfordert. Dieser Artikel zeigt, wie Sie die Schaltfl\u00e4chen in Kontextmen\u00fcs mit Icons optisch aufwerten und so die Ergonomie verbessern.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html\" \/>\n<meta property=\"og:site_name\" content=\"Access [basics]\" \/>\n<meta property=\"article:published_time\" content=\"2020-07-17T19:18:44+00:00\" \/>\n<meta property=\"article:modified_time\" content=\"-0001-11-30T00:00:00+00:00\" \/>\n<meta property=\"og:image\" content=\"http:\/\/..\/tl_files\/images\/pic_481_001.png\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Gesch\u00e4tzte Lesezeit\">\n\t<meta name=\"twitter:data1\" content=\"10\u00a0Minuten\">\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebSite\",\"@id\":\"https:\/\/access-basics.de\/#website\",\"url\":\"https:\/\/access-basics.de\/\",\"name\":\"Access [basics]\",\"description\":\"DAS ACCESS-MAGAZIN F\\u00dcR ALLE, DIE VON 0 AUF 100 WOLLEN\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":\"https:\/\/access-basics.de\/?s={search_term_string}\",\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"de\"},{\"@type\":\"ImageObject\",\"@id\":\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html#primaryimage\",\"inLanguage\":\"de\",\"url\":\"..\/tl_files\/images\/pic_481_001.png\"},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html#webpage\",\"url\":\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html\",\"name\":\"Kontextmen&uuml;s mit Icons - Access [basics]\",\"isPartOf\":{\"@id\":\"https:\/\/access-basics.de\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html#primaryimage\"},\"datePublished\":\"2020-07-17T19:18:44+00:00\",\"dateModified\":\"-0001-11-30T00:00:00+00:00\",\"author\":{\"@id\":\"https:\/\/access-basics.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f\"},\"description\":\"Das Anzeigen von Bildern im Ribbon ist keine gro\\u00dfe Kunst \\u2013 Sie ben\\u00f6tigen dazu ein paar bereits vorliegende Prozeduren, welche die Bilder aus der Tabelle USysResources so umwandeln, dass diese leicht der jeweiligen Ribbon-Definition zugewiesen werden k\\u00f6nnen. Aber in der Benutzeroberfl\\u00e4che von Access gibt es ja auch noch die Kontextmen\\u00fcs. Und auch diese lassen sich mit Icons ausstatten \\u2013 auch wenn dies noch einen Zwischenschritt mehr erfordert. Dieser Artikel zeigt, wie Sie die Schaltfl\\u00e4chen in Kontextmen\\u00fcs mit Icons optisch aufwerten und so die Ergonomie verbessern.\",\"breadcrumb\":{\"@id\":\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html#breadcrumb\"},\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"item\":{\"@type\":\"WebPage\",\"@id\":\"https:\/\/access-basics.de\/\",\"url\":\"https:\/\/access-basics.de\/\",\"name\":\"Home\"}},{\"@type\":\"ListItem\",\"position\":2,\"item\":{\"@type\":\"WebPage\",\"@id\":\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html\",\"url\":\"https:\/\/access-basics.de\/index.php\/Kontextmenues_mit_Icons.html\",\"name\":\"Kontextmen&uuml;s mit Icons\"}}]},{\"@type\":\"Person\",\"@id\":\"https:\/\/access-basics.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f\",\"name\":\"Andr\\u00e9 Minhorst\",\"image\":{\"@type\":\"ImageObject\",\"@id\":\"https:\/\/access-basics.de\/#personlogo\",\"inLanguage\":\"de\",\"url\":\"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"caption\":\"Andr\\u00e9 Minhorst\"}}]}<\/script>\n<!-- \/ Yoast SEO Premium plugin. -->","_links":{"self":[{"href":"https:\/\/access-basics.de\/index.php\/data\/wp\/v2\/posts\/55000481","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/access-basics.de\/index.php\/data\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/access-basics.de\/index.php\/data\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/access-basics.de\/index.php\/data\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/access-basics.de\/index.php\/data\/wp\/v2\/comments?post=55000481"}],"version-history":[{"count":0,"href":"https:\/\/access-basics.de\/index.php\/data\/wp\/v2\/posts\/55000481\/revisions"}],"wp:attachment":[{"href":"https:\/\/access-basics.de\/index.php\/data\/wp\/v2\/media?parent=55000481"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/access-basics.de\/index.php\/data\/wp\/v2\/categories?post=55000481"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/access-basics.de\/index.php\/data\/wp\/v2\/tags?post=55000481"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}