Thema Datum  Von Nutzer Rating
Antwort
Rot Diagramm via VBA
 07.06.2011 21:00:05 Daniel
NotSolved

Ansicht des Beitrags:
Von:
Daniel		 Datum:
07.06.2011 21:00:05		 Views:
1825		 Rating:
     
Antwort:
  Ja
Thema:
Diagramm via VBA

Hallo,

ich habe folgendes Problem:

ich möchte bei diesem Diagramm eine bestimmte Menge an Daten einlesen. Es soll alles in einem satz drinnen stehen, aber variabel sein und abhängig, wieviele felder befüllt sind. mit der while schleife bekomm ich ja meine anzahl(maxi) raus, die ich brauche. Mein problem ist jetzt, wie ändere ich

ActiveChart.SeriesCollection(1).Values = _
        "='4. Quanitatives Ergebnis'!$AC$4:$AC$15"
    ActiveChart.SeriesCollection(1).XValues = _
        "='4. Quanitatives Ergebnis'!$Y$4:$Y$15"

das die nicht nur bis zeile 15 gehen, sondern halt 4+maxi zeilen einlesen.

hat wer einen rat??

Danke im vorraus!

 

Sub abcanalyse()

Dim maxi As Double
maxi = 0
While (Cells(4 + maxi, 25) <> "")
maxi = maxi + 1
Wend

ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlLineMarkersStacked
    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection(1).Name = "=""ABC-Analyse"""
    ActiveChart.SeriesCollection(1).Values = _
        "='4. Quanitatives Ergebnis'!$AC$4:$AC$15"
    ActiveChart.SeriesCollection(1).XValues = _
        "='4. Quanitatives Ergebnis'!$Y$4:$Y$15"
 
    ActiveChart.ApplyLayout (5)

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:
WYSIWYG-Editor, ctl00_Content_editor1



  • 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 Diagramm via VBA
 07.06.2011 21:00:05 Daniel
NotSolved