Hat man sein eigenes Ribbon programmiert und ist dieses dann irgendwann umfangreicher geworden, reicht die Unterteilung eines RibbonTabs in Gruppen evtl. nicht mehr aus. Schnell nutzt man die M\u00f6glichkeit, je nach Einsatzgebiet mehrere RibbonTabs zu generieren. Wenn diese nicht immer ben\u00f6tigt werden, ist es hilfreich, wenn der Nutzer diese „unn\u00f6tigen“ RibbonTabs w\u00e4hrend der Laufzeit ausblenden kann. <\/p>\n
In meinem Fall gibt es einen RibbonTab, der immer angezeigt werden soll (MyRibbonTabMain)<\/em>. In diesem gibt es die Einstellungsm\u00f6glichkeit, die anderen RibbonTabs (MyRibbonTab1<\/em>,\u00a0MyRibbonTab2)\u00a0<\/em>anzuzeigen oder ggfs. auszublenden. Diese anderen RibbonTabs beinhalten spezielle Funktionen, die nur selten oder nur von bestimmten Nutzern verwendet werden. Durch die Einstellungsm\u00f6glichkeit kann der jeweilige Nutzer also die f\u00fcr ihn uninteressanten RibbonTabs ausblenden. Solche Einstellungen k\u00f6nnen dann z.B. in einer XML-Datei, die alle Einstellungen des Ribbons enth\u00e4lt, gespeichert werden (nicht Teil dieser Funktion), damit sie bei jedem Start von Word wiederhergestellt werden.<\/p>\n Das folgende Beispiel zeigt, wie eine Funktion, welche Ribbontabs des eigenen Ribbons w\u00e4hrend der Laufzeit ein- und ausblendet, in Visual Studio realisiert werden kann.<\/p>\n Hinweis: Das Ribbon hei\u00dft MyRibbon.<\/em>\u00a0Das Formular, in dem das Ribbon mit allen RibbonTabs enthalten ist, hei\u00dft frmMyRibbon<\/em>. Das Ribbon besteht in diesem Beispiel aus den oben erw\u00e4hnten drei RibbonTabs: MyRibbonTabMain<\/em>, MyRibbonTab1<\/em>, MyRibbonTab2<\/em>. Da MyRibbonTabMain<\/em> immer angezeigt werden soll, wird dieser RibbonTab in der Funktion nicht behandelt.<\/p>\n Beschreibung Hat man sein eigenes Ribbon programmiert und ist dieses dann irgendwann umfangreicher geworden, reicht die Unterteilung eines RibbonTabs in Gruppen evtl. nicht mehr aus. Schnell nutzt man die M\u00f6glichkeit, je nach Einsatzgebiet mehrere RibbonTabs zu generieren. Wenn diese nicht immer ben\u00f6tigt werden, ist es hilfreich, wenn der Nutzer diese „unn\u00f6tigen“ RibbonTabs w\u00e4hrend der Laufzeit […]<\/p>\n","protected":false},"author":3,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"ngg_post_thumbnail":0,"_jetpack_memberships_contains_paid_content":false,"footnotes":""},"categories":[29,45],"tags":[49,46,38],"class_list":["post-1768","post","type-post","status-publish","format-standard","hentry","category-startseite","category-vsto-word","tag-programmieren","tag-vsto","tag-word"],"jetpack_featured_media_url":"","jetpack_shortlink":"https:\/\/wp.me\/p5LyzC-sw","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/www.kastenmaier.de\/index.php?rest_route=\/wp\/v2\/posts\/1768","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.kastenmaier.de\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.kastenmaier.de\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.kastenmaier.de\/index.php?rest_route=\/wp\/v2\/users\/3"}],"replies":[{"embeddable":true,"href":"https:\/\/www.kastenmaier.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=1768"}],"version-history":[{"count":20,"href":"https:\/\/www.kastenmaier.de\/index.php?rest_route=\/wp\/v2\/posts\/1768\/revisions"}],"predecessor-version":[{"id":2182,"href":"https:\/\/www.kastenmaier.de\/index.php?rest_route=\/wp\/v2\/posts\/1768\/revisions\/2182"}],"wp:attachment":[{"href":"https:\/\/www.kastenmaier.de\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=1768"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.kastenmaier.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=1768"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.kastenmaier.de\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=1768"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}Sourcecode<\/h1>\n
' showRibbonTab\r\n' Anzeigen \/ Ausblenden des RibbonTabs mit dem \u00fcbergebenen Namen\r\n'\r\n' Parameter:\r\n' sRibbonTabName As String - Name des betroffenen RibbonTabs\r\n' bRibbonTabVisibility As Boolean - anzeigen (true) oder ausblenden (false)\r\n'\r\nPublic Sub showRibbonTab(sRibbonTabName As String, bRibbonTabVisibility As Boolean)\r\n ' Variable, um das eigene Ribbon-Formular anzusprechen\r\n Dim frmMyRibbon As MyRibbon.frmMyRibbon = Globals.Ribbons.GetRibbon(GetType(MyRibbon.frmMyRibbon))\r\n\r\n ' Je nach \u00fcbergebenen RibbonTab sieht der Befehl anders aus ...\r\n Select Case sRibbonTabName\r\n Case "MyRibbonTab1"\r\n frmMyRibbon.MyRibbonTab1.Visible = bRibbonTabVisibility\r\n Case "MyRibbonTab2"\r\n frmMyRibbon.MyRibbonTab2.Visible = bRibbonTabVisibility\r\n End Select\r\nEnd Sub<\/pre>\n","protected":false},"excerpt":{"rendered":"