Thema Datum  Von Nutzer Rating
Antwort
Rot Sorterierung und Diagramm erstellen mit Makro
 10.02.2015 14:18:18 max
NotSolved
10.02.2015 14:31:06 max
NotSolved
10.02.2015 16:00:11 Gast71182
NotSolved
11.02.2015 19:31:52 Max
NotSolved

Ansicht des Beitrags:
Von:
max		 Datum:
10.02.2015 14:18:18		 Views:
1424		 Rating:
     
Antwort:
  Ja
Thema:
Sorterierung und Diagramm erstellen mit Makro

Servus,
ich hab eine Excel Makro zum Auslesen von einigen Messwerten, ich würde die am Ende gerne sortieren und in einem Diagramm darstellen.
Leider funktioniert der Code nicht wie gewünscht.
Hier mal der Code:

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
'Sortieren nach Passed-Werten
letztezeile = oTargetSheet.Cells(Rows.Count, 5).End(xlUp).Row 'Sucht die letzte beschriebene Zeile
    oTargetSheet.Sort.SortFields.Clear
    oTargetSheet.Sort.SortFields.Add Key:=Range( _
        "B2:B" & letztezeile), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
        xlSortNormal
    With oTargetSheet.Sort
        .SetRange Range("A2:F" & letztezeile)
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
        End With
         
         
    oTargetSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlColumnClustered
    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection.Name = oTargetSheet.Range("B2:B" & letztezeile).Value
    ActiveChart.SeriesCollection.Values = oTargetSheet.Cells(2, 1).Value
    ActiveChart.SeriesCollection.XValues = oTargetSheet.Range("E2:E" & letztezeile).Value

Weiß jemand von euch woran dass liegen könnte?

Vielen Dank schonmal!
Gruß,
Max

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 Sorterierung und Diagramm erstellen mit Makro
 10.02.2015 14:18:18 max
NotSolved
10.02.2015 14:31:06 max
NotSolved
10.02.2015 16:00:11 Gast71182
NotSolved
11.02.2015 19:31:52 Max
NotSolved