{"id":55000217,"date":"2004-06-01T00:00:00","date_gmt":"2020-05-06T15:17:44","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=217"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Malen_nach_Zahlen","status":"publish","type":"post","link":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/","title":{"rendered":"Malen nach Zahlen"},"content":{"rendered":"

\"\"<\/p>\n

André Minhorst, Duisburg<\/b><\/p>\n

Was wäre eine Rechnung ohne die Linie zur Trennung von Einzelpositionen und Rechnungssumme oder zum Unterstreichen der überschrift Oder ein optisch schöner Bericht, in dem der Briefkopf durch eine Linie vom Inhalt getrennt ist Die meisten dieser Linien können Sie statisch in den Bericht einfügen, doch mit ein wenig VBA können Sie noch wesentlich mehr für die Optik Ihrer Berichte tun. Im vorliegenden Beitrag erfahren Sie, wie es geht.<\/b><\/p>\n

Die nachfolgenden Beispiele für die optische Aufbereitung von Berichten basieren alle auf der Anwendung der Line-Methode von VBA. Um nachfolgende Unklarheiten bezüglich der Anwendung dieser Methode im Voraus zu beiseitigen, erfahren Sie erst einmal alles über das einzige Werkzeug, mit dem Sie Ihre künstlerische Ader in Access ausleben können (mit Ausnahme der Circle-Methode).<\/p>\n

Die Line-Methode kann mehr, als der Name verrät: Mit ihr können Sie nämlich nicht nur Linien, sondern auch Rechtecke in einen Bericht zaubern. Das Ganze funkioniert nur in den Prozeduren, die durch die Ereigniseigenschaft Beim Drucken der verschiedenen Berichtsbereiche ausgelöst wird. Eine Ausnahme bildet die Bei Seite-Ereigniseigenschaft, die man auch zum Zeichnen von Linien und Rechtecken verwenden kann.<\/p>\n

Um vernünftig mit der Line-Methode arbeiten zu können, legen Sie erstmal die Maßeinheit für den Bericht fest. Dazu stellen Sie den Wert der Eigenschaft ScaleMode ein – in Deutschland kommt hier vermutlich der Wert 6 (Millimeter) oder 7 (Zentimeter) zum Einsatz. Es stehen auch Werte wie Twips, Punkte oder Pixel zur Verfügung, die aber in diesem Fall eher unhandlich sind. Wenn Sie ohnehin nur die Eigenschaften wie Koordinaten von Berichtsbereichen oder Steuerelementen als Grundlage für das Zeichnen von Linien und Rechtecken verwenden, können Sie die Eigenschaft ScaleMode unberührt lassen. Ebenfalls interessant sind die vier Eigenschaften ScaleTop, ScaleLeft, ScaleHeight und ScaleWidth, die der Ausgabe der Koordinaten und der Abmessungen der einzelnen Bereiche dienen. Die folgende Prozedur, die Sie für die Ereigniseigenschaft Bei Seite hinterlegen, gibt beispielsweise die kompletten Maße einer Seite aus:<\/p>\n

Private Sub Report_Page()\r\n  Me.ScaleMode = 7\r\n  Debug.Print \"Left: \" & Me.ScaleLeft\r\n  Debug.Print \"Top: \" & Me.ScaleTop\r\n  Debug.Print \"Width: \" & Me.ScaleWidth\r\n  Debug.Print \"Height: \" & Me.ScaleHeight\r\nEnd Sub<\/pre>\n
Für einen jungfräulichen Bericht zeigt die Prozedur Folgendes im Testfenster an:<\/p>\n
Left: 0\r\nTop: 0\r\nWidth: 15,86796\r\nHeight: 24,56394<\/pre>\n
Die Paramter der Line-Methode können auf unterschiedliche Art übergeben werden. Im nachfolgenden Beitrag kommt die folgende zum Zuge:<\/p>\n
object.Line [[Step](x1, y1)] - [Step](x2, y2)[, [color][, B[F]]]<\/pre>\n
Dabei geben x1 und y1 den Startpunkt der Linie beziehungsweise den ersten Eckpunkt des Rechtecks an. x2 und y2 enthalten die Koordinate des Endpunktes der Linie beziehungsweise des gegenüberliegenden Punktes des Rechtecks. Unter Farbe geben Sie eine unter Access übliche Farbkonstante an und für Konstante geben Sie entweder keinen Wert für eine Linie oder den Buchstaben B für ein Rechteck an. Zusätzlich können Sie den Parameter B zu BF ergänzen, um ein gefülltes Rechteck anzuzeigen. Wenn Sie den Parameter Step verwenden, werden die Parameter x1, y1, x2 und y2 relativ zu dem Punkt ermittelt, der durch die Eigenschaften CurrentX und CurrentY des jeweiligen Bereichs angegeben ist.<\/p>\n
Hinweis<\/h3>\n
Versuchen Sie es nicht mit der in der Online-Hilfe neuerer Access-Versionen angegebenen Fassung der Line-Methode. Sie ist schlichtweg falsch. <\/p>\n
Ein einfaches Beispiel zum Start ist das Einrahmen einer kompletten Berichtsseite inklusive Berichtskopf und -fuß. Diese Aufgabe handeln Sie in einer einzigen Zeile ab, indem Sie die Eigenschaften ScaleTop, ScaleLeft, ScaleHeight und ScaleWidth in die Line-Methode einfließen lassen.<\/p>\n
Eigentlich sollte die folgende Anweisung in der Ereignisprozedur Bei Seite des Berichts alles Notwendige erledigen und beispielsweise einen roten Rahmen um den Bericht legen:<\/p>\n
Me.Line (Me.ScaleLeft, Me.ScaleTop)-(Me.ScaleWidth, Me.ScaleHeight), &HFF, B<\/pre>\n
<\/p>\n
Da aber zwischen Theorie und Praxis immer noch ein kleiner Unterschied besteht, erscheinen dann die rechte und die untere Linie des Rechtecks  nicht mehr im Bericht. Wenn Sie die Anweisung um wenige Millimeter anpassen wie in folgender Prozedur, sieht das Ergebnis wie in Bild 1 aus:<\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 1:  Ein komplett eingerahmter Bericht<\/span><\/b><\/p>\n
Private Sub Report_Page()\r\n    Me.ScaleMode = 7\r\n    Me.Line (Me.ScaleLeft, _        Me.ScaleTop)-(Me.ScaleWidth, _        Me.ScaleHeight), &HFF, B\r\nEnd Sub<\/pre>\n
Interessanter wird das Einrahmen, wenn Sie eine Tabelle mit Daten komplett mit einem Gitternetz versehen möchten. Im folgenden Beispiel soll das in einem Bericht mit einer Artikelliste passieren.<\/p>\n
Erstellen Sie zunächst einen Bericht, dessen Entwurfsansicht wie in Bild 2 aussieht. Der Bericht selbst enthält noch kein einziges grafisches Element wie eine Linie über- oder unterhalb des Detailbereichs. Sämtliche Linien, die in der Druckansicht des Berichts wie in Bild 3 zu erkennen sind, werden per VBA-Code erstellt.<\/p>\n
Die dafür zuständige Prozedur finden Sie in Quellcode 1. Für ihren Aufruf ist die Ereigniseigenschaft Beim Drucken des Detailbereichs zuständig. Die Funktion erstellt das Gitternetz in zwei Schritten: Zunächst zeichnet sie für jedes Steuerelement außer dem rechts außen liegenden eine Linie rechts von dem Steuerelement, die der Höhe des Detailbereichs entspricht. Anschließend zieht sie einen Rahmen um den kompletten Detailbereich, der die bereits bestehenden Linien zu einem Gitternetz ergänzt.<\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 2:  Entwurfsansicht einer Artikelliste<\/span><\/b><\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 3:  Artikelliste mit Gitternetz<\/span><\/b><\/p>\n
Private Sub Detailbereich_Print(Cancel As Integer, _    PrintCount As Integer)\r\n    Dim ctl As Control\r\n    For Each ctl In Me.Section(acDetail).Controls\r\n        If Not ctl.Name = \"Mindestbestand\" Then\r\n            With ctl\r\n                Me.Line ((.Left + .Width), 0)-(.Left _                    + .Width, Me.Height)\r\n            End With\r\n        End If\r\n    Next\r\n    With Me\r\n        Me.Line (0, 0)-(.Width, .Height), 0, B\r\n    End With\r\n    Set ctl = Nothing\r\nEnd Sub<\/pre>\n
Quellcode 1<\/b><\/p>\n
Bei der hier vorliegenden Menge der Steuerelemente könnte die Prozedur auch jedem Steuerelement einzeln die rechts daneben liegende Linie hinzufügen, aber die Lösung mit der Schleife über alle Steuerelemente mit Ausnahme des rechten ist wesentlich eleganter und kann so leicht auf andere Formulare übertragen werden.<\/p>\n
Theoretisch können Sie auch neben das letzte Steuerelement eine Linie zeichnen, da diese mit dem rechten Teil des Rahmens um den kompletten Detailbereich übereinstimmt.<\/p>\n
Als x-Koordinaten für die Linie verwendet die Prozedur die Summe der beiden Eigenschaften Left und Width des jeweiligen Steuerelements, die Höhe ergibt sich aus der Eigenschaft Height des Detailbereichs.<\/p>\n
In vielen Fällen werden Daten nicht wirklich gelöscht, sondern nur mit einem Flag versehen, das den Status des Datensatzes festlegt. Wenn Sie auf diese Weise „gelöschte“ Datensätze einmal zusammen mit nicht gelöschten Datensätzen anzeigen möchten, können Sie die gelöschten Datensätze natürlich auf einfache Weise einfach mit dem entsprechenden Kontrollkästchen anzeigen, das das „Gelöscht“-Flag enthält.<\/p>\n
Etwas pfiffiger ist es, gelöschte Datensätze auch symbolisch als gelöscht anzuzeigen – indem Sie diese einfach durchstreichen, und zwar über die ganze Breite. Als Beispiel verwenden Sie die Artikelliste des vorherigen Beitrags. Zwar gibt es in der Artikeltabelle der Nordwind-Datenbank keine gelöschten Datensätze, aber ersatzweise nehmen Sie in dem Fall mit den Artikeln vorlieb, die als Auslaufartikel gekennzeichnet sind. Bild 4 zeigt, wie der fertige Bericht aussieht. Damit die Striche an die richtige Stelle kommen, verwenden Sie die Prozedur aus Quellcode 2.<\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 4:  Artikelliste mit durchgestrichenen Auslaufartikeln<\/span><\/b><\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 5:  Ausgekreuzte Datensätze<\/span><\/b><\/p>\n
Private Sub Detailbereich_Print(Cancel As Integer, PrintCount As Integer)\r\n    If Me.Auslaufartikel Then\r\n        Me.Line (0, Me.Height \/ 2)-(Me.Width, Me.Height \/ 2), 0\r\n    End If\r\nEnd Sub<\/pre>\n
Quellcode 2<\/b><\/p>\n
Die Prozedur überprüft, ob der aktuelle Datensatz als Auslaufartikel markiert ist. Dazu muss das Feld Auslaufartikel im Detailbereich vorhanden sein, es kann aber durch das Setzen der Eigenschaft Sichtbar auf den Wert Nein ausgeblendet werden. Die Line-Methode zeichnet in dem Fall eine Linie, deren x-Koordinaten von 0 bis zum rechten Rand des Detailbereichs reichen und deren y-Koordinaten auf halber Höhe des Detailbereichs liegen.<\/p>\n
Vielleicht möchten Sie statt der waagerechten Linie durch einen nicht mehr benötigten Datensatz noch etwas radikaler vorgehen und den Datensatz direkt komplett auskreuzen (siehe Bild 5). In dem Fall müssen Sie lediglich die Prozedur aus Quellcode 2 ein wenig anpassen.<\/p>\n
Sie benötigen nun zwei Line-Methoden, die folgendermaßen aussehen:<\/p>\n
Me.Line (0, 0)-(Me.Width, Me.Height), 0\r\nMe.Line (0, Me.Height)-(Me.Width, 0), 0<\/pre>\n
Wie Sie den ganzen Bericht einrahmen, haben Sie bereits erfahren. Mit der gleichen Vorgehensweise können Sie natürlich auch vertikale Linien erzeugen. Manchmal sollen die aber nicht von ganz oben nach ganz unten gehen, sondern sich lediglich zwischen dem Seitenkopf und dem Seitenfuß breit machen.<\/p>\n
Private Sub Report_Page()\r\n    Dim xStart As Integer\r\n    Dim yStart As Integer\r\n    Dim Breite As Integer\r\n    Dim Hoehe As Integer\r\n    xStart = Me.ScaleLeft\r\n    yStart = Me.ScaleTop + Me.Section(acPageHeader).Height\r\n    Breite = Me.ScaleWidth - 10\r\n    Hoehe = Me.ScaleHeight - Me.Section(acPageFooter).Height\r\n    Me.Line (xStart, yStart)-(Breite, Hoehe), &H0, B\r\nEnd Sub<\/pre>\n
Quellcode 3<\/b><\/p>\n
Probleme macht dabei meistens der Platz zwischen dem letzten Datensatz und dem Seitenfuß, der faktisch keinen Inhalt hat und der eigentlich auch nicht mit einer vertikalen Linie versehen werden kann.<\/p>\n
Also verwenden Sie wiederum ein Rechteck über die komplette Seite, das Sie einfach oben und unten um die Höhe des Seitenkopfes beziehungsweise Seitenfußes verkürzen.<\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 6:  Ein Bericht mit Rahmen um den Detailbereich und den verbleibenden Platz bis zum Fußbereich<\/span><\/b><\/p>\n
Die entsprechende Prozedur, die durch die Ereigniseigenschaft Bei Seite ausgelöst wird, finden Sie in Quellcode 3. Der resultierende Bericht sieht wie in Bild 6 aus.<\/p>\n
Mit den hier vorgestellten Möglichkeiten können Sie vermutlich alle benötigten Linien und Rechtecke realisieren. <\/p>\n
Wenn Sie dennoch weitere Anregungen oder Fragen zu diesem Beitrag haben, wenden Sie sich einfach per E-Mail an die Adresse info@access-im-unternehmen.de.<\/p>\n","protected":false},"excerpt":{"rendered":"
Was wäre eine Rechnung ohne die Linie zur Trennung von Einzelpositionen und Rechnungssumme oder zum Unterstreichen der Überschrift Oder ein optisch schöner Bericht, in dem der Briefkopf durch eine Linie vom Inhalt getrennt ist Die meisten dieser Linien können Sie statisch in den Bericht einfügen, doch mit ein wenig VBA können Sie noch wesentlich mehr für die Optik Ihrer Berichte tun. Im vorliegenden Beitrag erfahren Sie, wie es geht.<\/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":[662004,66032004,44000024,44000025],"tags":[],"class_list":["post-55000217","post","type-post","status-publish","format-standard","hentry","category-662004","category-66032004","category-Berichte_und_Reporting","category-VBA_und_Programmiertechniken"],"yoast_head":"\nMalen nach Zahlen - 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\/Malen_nach_Zahlen\/\" \/>\n<meta property=\"og:locale\" content=\"de_DE\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Malen nach Zahlen\" \/>\n<meta property=\"og:description\" content=\"Was wäre eine Rechnung ohne die Linie zur Trennung von Einzelpositionen und Rechnungssumme oder zum Unterstreichen der Überschrift Oder ein optisch schöner Bericht, in dem der Briefkopf durch eine Linie vom Inhalt getrennt ist Die meisten dieser Linien können Sie statisch in den Bericht einfügen, doch mit ein wenig VBA können Sie noch wesentlich mehr für die Optik Ihrer Berichte tun. Im vorliegenden Beitrag erfahren Sie, wie es geht.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/\" \/>\n<meta property=\"og:site_name\" content=\"Access im Unternehmen\" \/>\n<meta property=\"article:published_time\" content=\"2020-05-06T15:17:44+00:00\" \/>\n<meta property=\"og:image\" content=\"http:\/\/vg06.met.vgwort.de\/na\/8b886c67ea244d2cb5486bc9902d895f\" \/>\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=\"8\u00a0Minuten\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\\\/\\\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/#article\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/\"},\"author\":{\"name\":\"Andr\u00e9 Minhorst\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\"},\"headline\":\"Malen nach Zahlen\",\"datePublished\":\"2020-05-06T15:17:44+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/\"},\"wordCount\":1460,\"commentCount\":0,\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg06.met.vgwort.de\\\/na\\\/8b886c67ea244d2cb5486bc9902d895f\",\"articleSection\":[\"2004\",\"3\\\/2004\",\"Berichte und Reporting\",\"VBA und Programmiertechniken\"],\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/\",\"name\":\"Malen nach Zahlen - Access im Unternehmen\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/#primaryimage\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg06.met.vgwort.de\\\/na\\\/8b886c67ea244d2cb5486bc9902d895f\",\"datePublished\":\"2020-05-06T15:17:44+00:00\",\"breadcrumb\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/#breadcrumb\"},\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/#primaryimage\",\"url\":\"http:\\\/\\\/vg06.met.vgwort.de\\\/na\\\/8b886c67ea244d2cb5486bc9902d895f\",\"contentUrl\":\"http:\\\/\\\/vg06.met.vgwort.de\\\/na\\\/8b886c67ea244d2cb5486bc9902d895f\"},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Malen_nach_Zahlen\\\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Malen nach Zahlen\"}]},{\"@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":"Malen nach Zahlen - 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\/Malen_nach_Zahlen\/","og_locale":"de_DE","og_type":"article","og_title":"Malen nach Zahlen","og_description":"Was wäre eine Rechnung ohne die Linie zur Trennung von Einzelpositionen und Rechnungssumme oder zum Unterstreichen der Überschrift Oder ein optisch schöner Bericht, in dem der Briefkopf durch eine Linie vom Inhalt getrennt ist Die meisten dieser Linien können Sie statisch in den Bericht einfügen, doch mit ein wenig VBA können Sie noch wesentlich mehr für die Optik Ihrer Berichte tun. Im vorliegenden Beitrag erfahren Sie, wie es geht.","og_url":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/","og_site_name":"Access im Unternehmen","article_published_time":"2020-05-06T15:17:44+00:00","og_image":[{"url":"http:\/\/vg06.met.vgwort.de\/na\/8b886c67ea244d2cb5486bc9902d895f","type":"","width":"","height":""}],"author":"Andr\u00e9 Minhorst","twitter_card":"summary_large_image","twitter_misc":{"Verfasst von":"Andr\u00e9 Minhorst","Gesch\u00e4tzte Lesezeit":"8\u00a0Minuten"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/#article","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/"},"author":{"name":"Andr\u00e9 Minhorst","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f"},"headline":"Malen nach Zahlen","datePublished":"2020-05-06T15:17:44+00:00","mainEntityOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/"},"wordCount":1460,"commentCount":0,"publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/#primaryimage"},"thumbnailUrl":"http:\/\/vg06.met.vgwort.de\/na\/8b886c67ea244d2cb5486bc9902d895f","articleSection":["2004","3\/2004","Berichte und Reporting","VBA und Programmiertechniken"],"inLanguage":"de","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/","url":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/","name":"Malen nach Zahlen - Access im Unternehmen","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/#website"},"primaryImageOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/#primaryimage"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/#primaryimage"},"thumbnailUrl":"http:\/\/vg06.met.vgwort.de\/na\/8b886c67ea244d2cb5486bc9902d895f","datePublished":"2020-05-06T15:17:44+00:00","breadcrumb":{"@id":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/#breadcrumb"},"inLanguage":"de","potentialAction":[{"@type":"ReadAction","target":["https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/"]}]},{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/#primaryimage","url":"http:\/\/vg06.met.vgwort.de\/na\/8b886c67ea244d2cb5486bc9902d895f","contentUrl":"http:\/\/vg06.met.vgwort.de\/na\/8b886c67ea244d2cb5486bc9902d895f"},{"@type":"BreadcrumbList","@id":"https:\/\/access-im-unternehmen.de\/Malen_nach_Zahlen\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/access-im-unternehmen.de\/"},{"@type":"ListItem","position":2,"name":"Malen nach Zahlen"}]},{"@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\/55000217","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=55000217"}],"version-history":[{"count":0,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55000217\/revisions"}],"wp:attachment":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/media?parent=55000217"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/categories?post=55000217"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/tags?post=55000217"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}