Thema Datum  Von Nutzer Rating
Antwort
19.06.2016 13:12:58 Gast36449
NotSolved
Blau Säulendiagramm erzeugen
 19.06.2016 22:50:21 Gast98734
NotSolved

Ansicht des Beitrags:
Von:
Gast98734		 Datum:
19.06.2016 22:50:21		 Views:
575		 Rating:
     
Antwort:
  Ja
Thema:
Säulendiagramm erzeugen

Hallo! Also auf Grund meiner Version funktioniert das Addchart2 nicht. Mit der "alten" Methode würde es so gehen. Je nachdem kannst du da noch Überschriften etc. hinzufügen. VG

Sub Makro2()
 
Set xAchse = Range("A3:A15")
Set yAchse = Range("C3:C15")
 
Set Bereich = Union(yAchse, xAchse)

ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData Source:=Bereich

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
19.06.2016 13:12:58 Gast36449
NotSolved
Blau Säulendiagramm erzeugen
 19.06.2016 22:50:21 Gast98734
NotSolved