Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
16.10.2025 00:15:51
Passwort im Herbersforum ändern
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1408to1412
1408to1412
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Diagramm

Forumthread: Diagramm

Diagramm
19.02.2015 10:24:45
Ludwig
Hallo Experten
Ich möchte per VBA (Button) der Diagrammlinie die Werte den nächsten (+) Spalte zuordnen.
Set rng = cht.SeriesCollection(2).Source ?
Set rng = rng.Offset(0, 1) ?
cht.SeriesCollection(2).Values = rng
Kann mir jemand auf die Sprünge helfen?
Vielen Dank dafür im Voraus
Gruß Ludwig

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Hilfe zur Selbsthilfe..
19.02.2015 12:32:25
Ralf
Hallo Ludwig,
ich kenne mich mit Diagrammen VBAmäßig nicht aus.
Würde ich das machen wollen, würde ich ein STOP im Code setzen, bevor das Problem steht.
Denn kann man im Lokal-Fenster schauen, was mit den Objekten alles möglich ist.
Mit F8 kannst den Code zeilenweise abarbeiten.
Wenn du zu keinem Ergebnis kommst und sonst keiner hilft, kann du ein aussagekräftiges Beispiel hochladen. Keiner baut sich sowas nach.
Gruß
Ralf

Anzeige
AW: Hilfe zur Selbsthilfe..
19.02.2015 13:33:03
Ludwig
Hallo Ralf
Kann ich nachvollziehen. Debugging etc. habe ich schon durch.
Habe ein Bsp. hochgeladen: https://www.herber.de/bbs/user/95878.xlsm
Vielleicht hat doch noch jemand eine Idee!
Gruß Ludwig

AW: Hilfe zur Selbsthilfe..
19.02.2015 14:05:50
Rudi
Hallo,
was anderes fällt mir dazu nicht ein.
Sub DatenreihenAendernPlus()
Dim cht As Chart
Dim rng As Range
Dim wks As Worksheet
Set wks = ThisWorkbook.Worksheets("Differenz")
Set cht = wks.ChartObjects("Diagramm 2").Chart
Set rng = Range(Split(cht.SeriesCollection(2).Formula, ",")(2))
If rng.Column  2 Then
cht.SeriesCollection(2).Values = rng.Offset(, -1)
End If
End Sub

Gruß
Rudi

Anzeige
AW: Hilfe zur Selbsthilfe..
19.02.2015 15:30:40
Ludwig
Hallo Rudi
Super!
Danke!
Gruß Ludwig
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige