Office: (Office 2013) Bericht aus Formular erstellen mit VBA

Wenn einen Prozess unter anderen, als den beschriebenen Umständen testen würde, würde ich das Szenario beschreiben.

Die Formatierung "FETT" dient lediglich der Hervorhebung der relevanten Textteile in einem Kontext zur gestellten Frage.

Eine Tabelle mit zwei Feldern und Datenzeilen zu erstellen, einen Bericht im Entwurf zu öffnen, ein Diagramm mit der Tabelle als Datenherkunft einzufügen und eine Zeile Code im Open-Ereignisbehandler des Berichts zu erstellen (2 Min. insges.?), halte ich für am Thema Interessierte und fortgeschrittene Access-User für zumutbar und angemessen.

Ich vermute, dass es nicht das erste und letzte Mal sein wird, dass eine Access Fehlermeldung etwas verwirrend wirkt.
Die Ursache wird IMHO in der OLE-Kommunikation und/oder dem Ladeverhalten eines Berichts zu finden sein.

Eine Suche nach der Anwendung würde sich lohnen. Zur Hilfestellung für den TE und zugleich um eine sehr verbreitete Meinung zu widerlegen, dass dieses nicht direkt möglich ist.

Werde es mir demnächst zweimal überlegen, ob ich auf Zwischenfragen dieser Art antworten werde.

Meine favorisierte Lösung (für Acc>2000) steht in #9.
Ich bin dann mal weg ... ähh ... raus hier.

 

Also, so funktioniert es jetzt:

Dim a As String
a = "SELECT ..."
DoCmd.OpenReport "Bericht", acViewReport
Reports!Bericht!Diagramm.RowSource = a
Reports!Bericht!Titel.Caption = Forms!Formular.Titel.Caption
With Reports!Bericht
.Printer.ColorMode = 2
End With
DoCmd.Close acReport, Bericht
DoCmd.OpenReport Bericht

Ich hab den Bericht geöffnet, dann die Diagrammeigenschaften festgelegt, ihn geschlossen und nochmal zum Drucken geöffnet.
Das einzige, was momentan noch nicht funktioniert, ist die Eigenschaft ihn in Farbe zu drucken.
Dazu hab ich auch
Application.Printer.ColorMode = acPRCMColor
versucht. Es wird aber weiterhin in Schwarz/Weiß gedruckt.