Thema Datum  Von Nutzer Rating
Antwort
26.04.2016 11:08:06 Fyneia
NotSolved
26.04.2016 11:46:50 Gast33519
NotSolved
Rot Excel Diagramm mit Daten füllen
26.04.2016 13:22:01 Gast54365
NotSolved

Ansicht des Beitrags:
Von:
Gast54365
Datum:
26.04.2016 13:22:01
Views:
858
Rating: Antwort:
  Ja
Thema:
Excel Diagramm mit Daten füllen

Hallo! Habe mir das mal angeschaut. Weiß nicht, ob es da richtige ist, aber würde es so probieren. VG

 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Sub Makro2()
  
Dim zähler As Integer
Dim eintrag As Integer
eintrag = 1
  
    ActiveSheet.ChartObjects("Diagramm 1").Activate
      
    For zähler = 1 To 38
  
Do While Not IsEmpty(ActiveSheet.Cells(14 + (zähler - 1) * 38, 4))
 
    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection(eintrag).Values = ActiveSheet.Range(ActiveSheet.Cells(14 + (zähler - 1) * 38, 4), ActiveSheet.Cells(14 + (zähler - 1) * 38 + 37, 4))
  
   ActiveChart.SeriesCollection(eintrag).Values = ActiveSheet.Range(ActiveSheet.Cells(14 + (zähler - 1) * 38, 3), ActiveSheet.Cells(14 + (zähler - 1) * 38 + 37, 3))
  
      
    eintrag = eintrag + 1
Loop
  
    Next zähler
      
  
End Sub

 


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
26.04.2016 11:08:06 Fyneia
NotSolved
26.04.2016 11:46:50 Gast33519
NotSolved
Rot Excel Diagramm mit Daten füllen
26.04.2016 13:22:01 Gast54365
NotSolved