VBA-Code manipulieren mit der CodeModule-Klasse <\/b>(www.access-im-unternehmen.de\/1353<\/b>)<\/li>\n<\/ul>\nElemente der CodePane-Klasse<\/h2>\n
Die CodePane<\/b>-Klasse und ihre Eigenschaften, Methoden und Auflistungen können Sie im Objektkatalog (zu öffnen mit der Taste F2<\/b>) im Überblick ansehen, wenn Sie dort nach CodePane <\/b>suchen (siehe Bild 1). Die CodePane<\/b>-Klasse hat folgende Eigenschaften, Methoden und Auflistungen:<\/p>\n
![\"Die](\"..\/fileadmin\/_temp_\/2022_01\/pic_1354_001.png\")
<\/p>\n
Bild 1: Die CodePane-Klasse im Objektkatalog<\/span><\/b><\/p>\n\n- CodeModule<\/b>: Verweis auf das CodeModule<\/b>-Objekt, das im CodePane<\/b>-Objekt enthalten ist<\/li>\n
- CodePaneView<\/b>: Gibt die aktuelle Darstellung im CodePane wieder – entweder vollständiges Modul (1<\/b>) oder nur einzelne Prozeduren (0<\/b>).<\/li>\n
- Collection<\/b>: Erlaubt den Zugriff auf alle geöffneten CodePane<\/b>-Objekte.<\/li>\n
- CountOfVisibleLines<\/b>: Liefert die Anzahl der sichtbaren Zeilen im Fenster.<\/li>\n
- GetSelection<\/b>: Liefert den aktuell markierten Bereich mit den vier Rückgabeparametern.<\/li>\n
- SetSelection<\/b>: Setzt eine Markierung anhand von vier Parametern.<\/li>\n
- Show<\/b>: Versieht das CodePane<\/b>-Objekt, für das diese Methode aufgerufen wurde, mit dem Fokus.<\/li>\n
- TopLine<\/b>: Gibt die Zeilennummer der oben im Fenster angezeigten Zeile aus und erlaubt auch das Einstellen dieser Zeile.<\/li>\n
- VBE<\/b>: Verweis auf die VBE<\/b>-Klasse.<\/li>\n
- Window<\/b>: Verweis auf das übergeordnete Window<\/b>-Objekt<\/li>\n<\/ul>\n
Auf das CodePane-Objekt zugreifen<\/h2>\n
Um auf ein CodePane<\/b>-Objekt zuzugreifen, gibt es mehrere Möglichkeiten. Der Zugriff erfolgt entweder von der Auflistung CodePanes <\/b>der VBE<\/b>-Klasse, vom untergeordneten CodeModule<\/b>-Element oder über die Eigenschaft ActiveCodePane <\/b>der VBE<\/b>-Klasse.<\/p>\n
Wenn Sie den Namen eines Moduls kennen und auf sein CodePane<\/b>-Objekt zugreifen wollen, nutzen Sie den Weg über CodeModule<\/b>. Dazu referenzieren Sie zuerst das CodeModule<\/b>-Objekt, das sie über die gleichnamige Eigenschaft des entsprechenden Elements der VBComponents<\/b>-Auflistung des aktuellen VB-Projekts erhalten. Dieses bietet über die CodePane<\/b>-Eigenschaft Zugriff auf das CodePane<\/b>-Objekt.<\/p>\n
Damit wir sehen, ob wir das richtige CodePane<\/b>-Objekt referenzieren, zeigen wir sein Fenster mit der Show<\/b>-Methode an:<\/p>\nPublic Sub <\/span>CodePanePerCodeModule()\r\n Dim <\/span>objCodeModule As <\/span>CodeModule\r\n Dim <\/span>objCodePane As <\/span>CodePane\r\n Set<\/span> objCodeModule = VBE.ActiveVBProject. VBComponents(\"mdlBeispielcode\").CodeModule\r\n Set<\/span> objCodePane = objCodeModule.CodePane\r\n objCodePane.Show\r\nEnd Sub<\/span><\/pre>\nDamit können Sie auf alle CodePane<\/b>-Elemente zugreifen, auch die von aktuell noch geschlossenen Modulen. Nur die aktuell in Window<\/b>-Elementen angezeigten CodePane<\/b>-Elemente können Sie über die Auflistung CodePanes <\/b>der VBE<\/b>-Klasse ansprechen.<\/p>\n
Die folgende Prozedur durchläuft in einer For Each<\/b>-Schleife alle Elemente der CodePanes<\/b>-Auflistung und referenziert das jeweils aktuelle Element mit der Variablen objCodePane<\/b>:<\/p>\nPublic Sub <\/span>CodePanePerWindow()\r\n Dim <\/span>objCodePane As <\/span>CodePane\r\n For Each objCodePane In VBE.CodePanes\r\n Debug.Print<\/span> objCodePane.CodeModule.Parent.Name\r\n Next<\/span> objCodePane\r\nEnd Sub<\/span><\/pre>\n<\/p>\n
Da das CodePane<\/b>-Objekt selbst keine Name<\/b>-Eigenschaft enthält, greifen wir über objCodePane.CodeModule.Parent <\/b>auf das VBComponent<\/b>-Objekt dieses CodePane<\/b>-Objekts zu und geben seinen Namen aus. Das liefert nur die Namen der Module, die aktuell geöffnet sind.<\/p>\nAktuelles CodePane-Objekt referenzieren<\/h2>\n
Meist interessiert in Zusammenhang mit dem CodePane<\/b>-Objekt jedoch das aktuelle CodePane<\/b>-Objekt. Dieses referenzieren Sie mit der Eigenschaft ActiveCodePane <\/b>der VBE<\/b>-Klasse.<\/p>\n
Die folgende Prozedur erledigt das und gibt den Namen des VBComponent<\/b>-Objekts des CodeModule<\/b>-Objekts des aktuellen CodePane<\/b>-Objekts im Direktbereich aus:<\/p>\nPublic Sub <\/span>AktuellesCodePane()\r\n Dim <\/span>objCodePane As <\/span>CodePane\r\n Set<\/span> objCodePane = VBE.ActiveCodePane\r\n Debug.Print<\/span> objCodePane.CodeModule.Parent.Name\r\nEnd Sub<\/span><\/pre>\nVerschiedene Ansichten im CodePane-Objekt<\/h2>\n
Für die Anzeige im CodePane<\/b>-Objekt gibt es zwei Optionen. Diese lesen Sie über die schreibgeschützte Eigenschaft CodePaneView<\/b> ein. Die möglichen Werte lauten:<\/p>\n\n- vbext_cv_FullModuleView <\/b>(1<\/b>): Zeigt immer das ganze Modul an.<\/li>\n
- vbext_cv_ProcedureView <\/b>(0<\/b>): Zeigt nur den ausgewählten Bereich beziehungsweise die ausgewählte Prozedur an.<\/li>\n<\/ul>\n
Sie können die Ansicht nur über die Optionen des VBA-Editors einstellen, und zwar auf der Registerseite Editor<\/b> im Bereich Fenstereinstellungen <\/b>unter Standardmäßig ganzes Modul anzeigen <\/b>(siehe Bild 2).<\/p>\n
![\"Einstellen](\"..\/fileadmin\/_temp_\/2022_01\/pic_1354_002.png\")
<\/p>\n
Bild 2: Einstellen der Eigenschaft <\/span><\/b><\/p>\nDie Einstellung vbext_cv_ProcedureView <\/b>ist eher selten anzutreffen und sieht beispielsweise wie in Bild 3 aus.<\/p>\n
![\"Anzeige](\"..\/fileadmin\/_temp_\/2022_01\/pic_1354_003.png\")
<\/p>\n
Bild 3: Anzeige einzelner Prozeduren statt des ganzen Moduls <\/span><\/b><\/p>\nCodePane-Objekte per Collection<\/h2>\n
Wenn Sie vom aktuell referenzierten CodePane<\/b>-Objekt aus auf eine Auflistung aller CodePane<\/b>-Objekte zugreifen wollen, können Sie die Eigenschaft Collection <\/b>nutzen.<\/p>\n
Diese durchlaufen Sie beispielsweise wie folgt:<\/p>\n
Public Sub <\/span>CodePaneCollection()\r\n Dim <\/span>objActiveCodePane As <\/span>CodePane\r\n Dim <\/span>objCodePane As <\/span>CodePane\r\n Set<\/span> objActiveCodePane = VBE.ActiveCodePane\r\n For Each objCodePane In objActiveCodePane.Collection\r\n Debug.Print<\/span> objCodePane.CodeModule.Parent.Name\r\n Next<\/span> objCodePane\r\nEnd Sub<\/span><\/pre>\nErmitteln des sichtbaren Bereichs im CodePane-Objekt<\/h2>\n
Es gibt zwei Eigenschaften, mit denen Sie den sichtbaren Bereich im CodePane<\/b>-Objekt ermitteln können. Die erste heißt TopLine <\/b>und liefert die Nummer der Zeile des enthaltenen CodeModule<\/b>-Objekts, die ganz oben im Fenster angezeigt wird. Diese Eigenschaft kann gelesen und geschrieben werden. Sie können damit also auch per Code festlegen, welche Zeile ganz oben angezeigt werden soll.<\/p>\n
Die zweite Eigenschaft namens CountOfVisibleLines <\/b>ist schreibgeschützt und gibt die Anzahl der angezeigten Zeilen aus.<\/p>\n
Die folgende Prozedur liefert diese beiden Einstellungen für das aktive CodePane<\/b>-Objekt:<\/p>\nPublic Sub <\/span>AktuelleDarstellungErmitteln()\r\n Dim <\/span>objCodePane As <\/span>CodePane\r\n Set<\/span> objCodePane = VBE.ActiveCodePane\r\n Debug.Print<\/span> objCodePane.CountOfVisibleLines\r\n Debug.Print<\/span> objCodePane.TopLine\r\nEnd Sub<\/span><\/pre>\nMit der Eigenschaft TopLine <\/b>können Sie im Direktbereich experimentieren, um die erst angezeigte Zeile zu ändern. Die folgende Anweisung zeigt direkt die oberste Zeile ganz oben an:<\/p>\nVBE.ActiveCodePane.TopLine = 1<\/pre>\nMarkierung per VBA auslesen<\/h2>\n
Die Methode GetSelection <\/b>liefert die aktuelle Markierung im VBA-Editor. Um die Startzeile, Startspalte, Endzeile und Endspalte der aktuellen Markierung zu erfassen, benötigen wir vier Long<\/b>-Variablen. Diese übergeben wir der Methode GetSelection <\/b>als Parameter. Nach dem Aufruf können wir die Werte auslesen und beispielsweise wie in der folgenden Prozedur im Direktbereich ausgeben:<\/p>\nPublic Sub <\/span>AktuelleMarkierungLesen()\r\n Dim <\/span>objCodePane As <\/span>CodePane\r\n Dim <\/span>lngStartLine As Long<\/span>\r\n Dim <\/span>lngStartColumn As Long<\/span>\r\n Dim <\/span>lngEndLine As Long<\/span>\r\n Dim <\/span>lngEndColumn As Long<\/span>\r\n Set<\/span> objCodePane = VBE.ActiveCodePane\r\n objCodePane.GetSelection lngStartLine, lngStartColumn, lngEndLine, lngEndColumn\r\n Debug.Print<\/span> \"Aktuelle Markierung:\"\r\n Debug.Print<\/span> \"Startzeile: \" & lngStartLine\r\n Debug.Print<\/span> \"Startspalte: \" & lngStartColumn\r\n Debug.Print<\/span> \"Endzeile: \" & lngEndLine\r\n Debug.Print<\/span> \"Endspalte: \" & lngEndColumn\r\nEnd Sub<\/span><\/pre>\nFür den markierten Bereich aus Bild 4 lautet das Ergebnis beispielsweise wie folgt:<\/p>\n
![\"Auslesen](\"..\/fileadmin\/_temp_\/2022_01\/pic_1354_004.png\")
<\/p>\n
Bild 4: Auslesen eines markierten Bereichs<\/span><\/b><\/p>\nCall<\/span> AktuelleMarkierungLesen\r\nAktuelle Markierung:\r\nStartzeile: 4\r\nStartspalte: 12\r\nEndzeile: 4\r\nEndspalte: 29<\/pre>\nMarkierung per Code setzen<\/h2>\n
Spannend ist die Möglichkeit, eine Markierung per Code zu setzen. Sie können so beispielsweise zuerst mit der Methode Find <\/b>des CodeModule<\/b>-Objekts nach einem bestimmten Eintrag suchen und diesen dann im entsprechenden CodePane<\/b>-Element mit der Methode SetSelection <\/b>einstellen.<\/p>\n
Die Prozedur aus Listing 1 zeigt, wie es funktioniert. Hier referenzieren wir zunächst das aktuelle CodePane<\/b>-Objekt und dann über seine Eigenschaft CodeModule <\/b>dessen CodeModule<\/b>-Objekt. Dieses nutzen wir, um im Code nach der Zeichenkette objCodePane<\/b> zu suchen.<\/p>\nPublic Sub <\/span>FundstelleMarkieren()\r\n Dim <\/span>objCodePane As <\/span>CodePane\r\n Dim <\/span>objCodeModule As <\/span>CodeModule\r\n Dim <\/span>lngStartLine As Long<\/span>\r\n Dim <\/span>lngStartColumn As Long<\/span>\r\n Dim <\/span>lngEndLine As Long<\/span>\r\n Dim <\/span>lngEndColumn As Long<\/span>\r\n Set<\/span> objCodePane = VBE.ActiveCodePane\r\n Set<\/span> objCodeModule = objCodePane.CodeModule\r\n If <\/span>objCodeModule.Find(\"objCodePane\", lngStartLine, lngStartColumn, lngEndLine, lngEndColumn) Then<\/span>\r\n objCodePane.SetSelection lngStartLine, lngStartColumn, lngEndLine, lngEndColumn\r\n End If<\/span>\r\nEnd Sub<\/span><\/pre>\nListing 1: Markieren einer Fundstelle mit VBA<\/span><\/b><\/p>\nDie dazu verwendet Find<\/b>-Methode liefert die Koordinaten des gefundenen Bereichs in Form von Startzeile, Startspalte, Endzeile und Endspalte, die wir in entsprechenden Variablen speichern. Diese können wir anschließend gleich als Parameter der Methode SetSelection <\/b>nutzen. Die Markierung liefert dann genau das Ergebnis aus Bild 5.<\/p>\n
![\"Markieren](\"..\/fileadmin\/_temp_\/2022_01\/pic_1354_005.png\")
<\/p>\n
Bild 5: Markieren eines Suchergebnisses<\/span><\/b><\/p>\nZusammenfassung und Ausblick<\/h2>\n
Mit diesem Beitrag beenden wir die Beitragsreihe rund um die Programmierung des VBA-Editors. Hier haben Sie noch erfahren, wie Sie direkt auf das CodePane<\/b>-Element und den darin angezeigten Code zugreifen und wie die Beziehung vom CodePane<\/b>-Objekt zu den übrigen Elementen der VBIDE aussehen.<\/p>\nDownloads zu diesem Beitrag<\/h2>\n
Enthaltene Beispieldateien:<\/p>\n
VBAEditorProgrammieren.accdb<\/p>\n
Download<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"In den vorherigen Beiträgen dieser Beitragsreihe haben wir uns bereits angesehen, wie Sie auf die Module im VBA-Editor zugreifen, neue Module erstellen und den enthaltenen Code bearbeiten. Es fehlt allerdings noch eine wichtige Schnittstelle zwischen Benutzer und der automatisierten Bearbeitung von VBA-Code: Die Klasse CodePane, die unter anderem die Möglichkeit bietet, vom Benutzer gesetzte Markierungen im Code auszulesen und solche zu setzen. Letzteres können Sie beispielsweise nutzen, um per VBA gesuchte Stellen im Code zu markieren, damit der Benutzer diese erkennen kann. Dieser Beitrag stellt die CodePane-Klasse und ihre Möglichkeiten vor.<\/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":[66012022,662022,44000025],"tags":[],"class_list":["post-55001354","post","type-post","status-publish","format-standard","hentry","category-66012022","category-662022","category-VBA_und_Programmiertechniken"],"yoast_head":"\n
Auf VBA-Code zugreifen mit der CodePane-Klasse - Access im Unternehmen<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/\" \/>\n<meta property=\"og:locale\" content=\"de_DE\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Auf VBA-Code zugreifen mit der CodePane-Klasse\" \/>\n<meta property=\"og:description\" content=\"In den vorherigen Beiträgen dieser Beitragsreihe haben wir uns bereits angesehen, wie Sie auf die Module im VBA-Editor zugreifen, neue Module erstellen und den enthaltenen Code bearbeiten. Es fehlt allerdings noch eine wichtige Schnittstelle zwischen Benutzer und der automatisierten Bearbeitung von VBA-Code: Die Klasse CodePane, die unter anderem die Möglichkeit bietet, vom Benutzer gesetzte Markierungen im Code auszulesen und solche zu setzen. Letzteres können Sie beispielsweise nutzen, um per VBA gesuchte Stellen im Code zu markieren, damit der Benutzer diese erkennen kann. Dieser Beitrag stellt die CodePane-Klasse und ihre Möglichkeiten vor.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/\" \/>\n<meta property=\"og:site_name\" content=\"Access im Unternehmen\" \/>\n<meta property=\"article:published_time\" content=\"2022-01-31T15:18:36+00:00\" \/>\n<meta property=\"og:image\" content=\"http:\/\/vg08.met.vgwort.de\/na\/a890be7ade1148409a9dcbba48d254ab\" \/>\n<meta name=\"author\" content=\"Andr\u00e9 Minhorst\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Verfasst von\" \/>\n\t<meta name=\"twitter:data1\" content=\"Andr\u00e9 Minhorst\" \/>\n\t<meta name=\"twitter:label2\" content=\"Gesch\u00e4tzte Lesezeit\" \/>\n\t<meta name=\"twitter:data2\" content=\"7\u00a0Minuten\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\\\/\\\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/#article\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/\"},\"author\":{\"name\":\"Andr\u00e9 Minhorst\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\"},\"headline\":\"Auf VBA-Code zugreifen mit der CodePane-Klasse\",\"datePublished\":\"2022-01-31T15:18:36+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/\"},\"wordCount\":1182,\"commentCount\":0,\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg08.met.vgwort.de\\\/na\\\/a890be7ade1148409a9dcbba48d254ab\",\"articleSection\":[\"1\\\/2022\",\"2022\",\"VBA und Programmiertechniken\"],\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/\",\"name\":\"Auf VBA-Code zugreifen mit der CodePane-Klasse - Access im Unternehmen\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/#primaryimage\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg08.met.vgwort.de\\\/na\\\/a890be7ade1148409a9dcbba48d254ab\",\"datePublished\":\"2022-01-31T15:18:36+00:00\",\"breadcrumb\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/#breadcrumb\"},\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/#primaryimage\",\"url\":\"http:\\\/\\\/vg08.met.vgwort.de\\\/na\\\/a890be7ade1148409a9dcbba48d254ab\",\"contentUrl\":\"http:\\\/\\\/vg08.met.vgwort.de\\\/na\\\/a890be7ade1148409a9dcbba48d254ab\"},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\\\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Auf VBA-Code zugreifen mit der CodePane-Klasse\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\",\"name\":\"Access im Unternehmen\",\"description\":\"Das Magazin f\u00fcr Datenbankentwickler auf Basis von Microsoft Access\",\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\\\/\\\/access-im-unternehmen.de\\\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"de\"},{\"@type\":\"Organization\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\",\"name\":\"Andr\u00e9 Minhorst Verlag\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/logo\\\/image\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/wp-content\\\/uploads\\\/2019\\\/09\\\/aiu_wp.png\",\"contentUrl\":\"https:\\\/\\\/access-im-unternehmen.de\\\/wp-content\\\/uploads\\\/2019\\\/09\\\/aiu_wp.png\",\"width\":370,\"height\":111,\"caption\":\"Andr\u00e9 Minhorst Verlag\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/logo\\\/image\\\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\",\"name\":\"Andr\u00e9 Minhorst\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"url\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"contentUrl\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"caption\":\"Andr\u00e9 Minhorst\"}}]}<\/script>\n<!-- \/ Yoast SEO Premium plugin. -->","yoast_head_json":{"title":"Auf VBA-Code zugreifen mit der CodePane-Klasse - Access im Unternehmen","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/","og_locale":"de_DE","og_type":"article","og_title":"Auf VBA-Code zugreifen mit der CodePane-Klasse","og_description":"In den vorherigen Beiträgen dieser Beitragsreihe haben wir uns bereits angesehen, wie Sie auf die Module im VBA-Editor zugreifen, neue Module erstellen und den enthaltenen Code bearbeiten. Es fehlt allerdings noch eine wichtige Schnittstelle zwischen Benutzer und der automatisierten Bearbeitung von VBA-Code: Die Klasse CodePane, die unter anderem die Möglichkeit bietet, vom Benutzer gesetzte Markierungen im Code auszulesen und solche zu setzen. Letzteres können Sie beispielsweise nutzen, um per VBA gesuchte Stellen im Code zu markieren, damit der Benutzer diese erkennen kann. Dieser Beitrag stellt die CodePane-Klasse und ihre Möglichkeiten vor.","og_url":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/","og_site_name":"Access im Unternehmen","article_published_time":"2022-01-31T15:18:36+00:00","og_image":[{"url":"http:\/\/vg08.met.vgwort.de\/na\/a890be7ade1148409a9dcbba48d254ab","type":"","width":"","height":""}],"author":"Andr\u00e9 Minhorst","twitter_card":"summary_large_image","twitter_misc":{"Verfasst von":"Andr\u00e9 Minhorst","Gesch\u00e4tzte Lesezeit":"7\u00a0Minuten"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/#article","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/"},"author":{"name":"Andr\u00e9 Minhorst","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f"},"headline":"Auf VBA-Code zugreifen mit der CodePane-Klasse","datePublished":"2022-01-31T15:18:36+00:00","mainEntityOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/"},"wordCount":1182,"commentCount":0,"publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/#primaryimage"},"thumbnailUrl":"http:\/\/vg08.met.vgwort.de\/na\/a890be7ade1148409a9dcbba48d254ab","articleSection":["1\/2022","2022","VBA und Programmiertechniken"],"inLanguage":"de","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/","url":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/","name":"Auf VBA-Code zugreifen mit der CodePane-Klasse - Access im Unternehmen","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/#website"},"primaryImageOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/#primaryimage"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/#primaryimage"},"thumbnailUrl":"http:\/\/vg08.met.vgwort.de\/na\/a890be7ade1148409a9dcbba48d254ab","datePublished":"2022-01-31T15:18:36+00:00","breadcrumb":{"@id":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/#breadcrumb"},"inLanguage":"de","potentialAction":[{"@type":"ReadAction","target":["https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/"]}]},{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/#primaryimage","url":"http:\/\/vg08.met.vgwort.de\/na\/a890be7ade1148409a9dcbba48d254ab","contentUrl":"http:\/\/vg08.met.vgwort.de\/na\/a890be7ade1148409a9dcbba48d254ab"},{"@type":"BreadcrumbList","@id":"https:\/\/access-im-unternehmen.de\/Auf_VBACode_zugreifen_mit_der_CodePaneKlasse\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/access-im-unternehmen.de\/"},{"@type":"ListItem","position":2,"name":"Auf VBA-Code zugreifen mit der CodePane-Klasse"}]},{"@type":"WebSite","@id":"https:\/\/access-im-unternehmen.de\/#website","url":"https:\/\/access-im-unternehmen.de\/","name":"Access im Unternehmen","description":"Das Magazin f\u00fcr Datenbankentwickler auf Basis von Microsoft Access","publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/access-im-unternehmen.de\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"de"},{"@type":"Organization","@id":"https:\/\/access-im-unternehmen.de\/#organization","name":"Andr\u00e9 Minhorst Verlag","url":"https:\/\/access-im-unternehmen.de\/","logo":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/logo\/image\/","url":"https:\/\/access-im-unternehmen.de\/wp-content\/uploads\/2019\/09\/aiu_wp.png","contentUrl":"https:\/\/access-im-unternehmen.de\/wp-content\/uploads\/2019\/09\/aiu_wp.png","width":370,"height":111,"caption":"Andr\u00e9 Minhorst Verlag"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f","name":"Andr\u00e9 Minhorst","image":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","url":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","caption":"Andr\u00e9 Minhorst"}}]}},"_links":{"self":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55001354","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/comments?post=55001354"}],"version-history":[{"count":0,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55001354\/revisions"}],"wp:attachment":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/media?parent=55001354"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/categories?post=55001354"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/tags?post=55001354"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}