Thema Datum  Von Nutzer Rating
Antwort
Rot Senkrechte Linie an Chart einfügen
11.08.2021 12:12:43 Torsten
Solved
11.08.2021 13:00:10 Mase
*****
Solved
11.08.2021 13:51:34 Gast49212
Solved

Ansicht des Beitrags:
Von:
Torsten
Datum:
11.08.2021 12:12:43
Views:
92
Rating: Antwort:
 Nein
Thema:
Senkrechte Linie an Chart einfügen
Hallo,

ich möchte ein Diagramm (chart-Object) erstellen und diesem zwei vertikale Linien hinzufügen. In dem Diagramm befinden sich etwa 30 Linien zu denen ich zwei vertikale Linien als Abgrenzung eines Bereichs hinzufügen möchte. Die Linien sind nur mit Start- und Endpunkt im Diagramm definiert. Zur Lösung habe ich hier http://www.office-loesung.de/ftopic488904_0_0_asc.php bereits code gefunden, den ich verwenden wollte.

Mit dem Code wird bei mir keine Linie eingefügt, es gibt aber auch keinen Fehler. Ich vermute, dass dies daran liegt, dass meine x-Achse nicht als Zahlen festgelegt sind. Wenn ich einen Zwischritt einfüge, wird dieser immer genau in der Mitte von Beginn und Ende an der Abszisse geplottet. Wenn ich beispielsweise als Zahlen an der Achse 0, 2 und 10 wähle, so steht die 2 in der Mitte, statt entsprechend näher an der 0 zu sein. Die Daten lese ich wie folgt ein:

Dim objShape As InlineShape
        objShape = AppWord.ActiveDocument.InlineShapes.AddChart(4)
With objShape.Chart
.SetSourceData("'[datei.xlsx]Tabelle1'!$A$1:$Z$4", 2)
.Axes(1).AxisBetweenCategories = False
End With

Gibt es eine Möglichkeit dies umzustellen oder muss ich etwas anderes beachten? Ich hatte überlegt die Eigenschaft ScaleType des Axis-Objekts auf linear zu stellen, allerdings steht dort ein Ausnahmefehler. Deswegen kam ich auch darauf, dass die Einträge auf der Achse möglicherweise nicht als Zahlen erkannt werden.

Kann mir dabei jemand helfen?

viele Grüße

Torsten


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Senkrechte Linie an Chart einfügen
11.08.2021 12:12:43 Torsten
Solved
11.08.2021 13:00:10 Mase
*****
Solved
11.08.2021 13:51:34 Gast49212
Solved