Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Kreisdiagramm in Größe automatisch anpassen

Kreisdiagramm in Größe automatisch anpassen
Rudolf
Hallo Excel-Freunde,
ich möchte innerhalb einer Dokumentation mehrere Kreisdiagramme einflechten. Für die Darstellung des Kreises mit den Segmenten ist jedem Kreis eine eigene Wertetabelle zugeordnet:
Beispiel:
1. Kreis: Wert A = 10; Wert B = 20; Wert C = 30 (Gesamtwert also 60)
2. Kreis: Wert A = 50; Wert B = 90; Wert C = 40 (Gesamtwert also 180)
Nun möchte ich jedoch die Größe der einzelnen Kreise (also den Durchmesser) davon abhängig machen, welche "Menge" sie vertritt. Der 2. Kreis soll somit optisch größer dargestellt werden. Kann man das "automatisiert" erreichen oder bleibt einem nur übrig, den jeweiligen Diagrammbereich "per Hand" größer oder kleiner ziehen?
Gruss
Rudolf
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Kreisdiagramm in Größe automatisch anpassen
23.02.2010 14:27:31
Beverly
Hi Rudolf,
das kann man per VBA machen - nach diesem Prinzip:
    With ActiveSheet.ChartObjects("Diagramm 1").Chart.PlotArea
.Width = 210
.Height = 210
End With

Die Werte für .Width und .Height musst du anpassen


Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Kreisdiagramm in Größe automatisch anpassen


Schritt-für-Schritt-Anleitung

  1. Werte eingeben: Erstelle mehrere Wertetabellen für deine Kreisdiagramme. Zum Beispiel:

    • Kreis 1: Wert A = 10; Wert B = 20; Wert C = 30 (Gesamtwert = 60)
    • Kreis 2: Wert A = 50; Wert B = 90; Wert C = 40 (Gesamtwert = 180)
  2. Diagramme erstellen: Füge die Kreisdiagramme in Excel ein. Wähle die entsprechenden Daten aus und gehe über EinfügenDiagrammeKreisdiagramm.

  3. Diagramme formatieren: Um die Größe der Diagramme automatisch anzupassen, kannst du VBA (Visual Basic for Applications) verwenden. Füge den folgenden Code in ein neues Modul ein:

    Sub GrößeAnpassen()
       Dim Diagramm As ChartObject
       For Each Diagramm In ActiveSheet.ChartObjects
           With Diagramm.Chart.PlotArea
               .Width = 100 + (Diagramm.Chart.SeriesCollection(1).Values / 10) ' Beispiel für Anpassung
               .Height = 100 + (Diagramm.Chart.SeriesCollection(1).Values / 10) ' Beispiel für Anpassung
           End With
       Next Diagramm
    End Sub
  4. Makro ausführen: Schließe den VBA-Editor und führe das Makro aus, um die Größe der Diagramme basierend auf den Werten automatisch anzupassen.


Häufige Fehler und Lösungen

  • Problem: Das Diagramm wird nicht korrekt skaliert.

    • Lösung: Überprüfe den VBA-Code auf Korrektheit. Achte darauf, dass die Werte in der Diagrammreihe korrekt referenziert werden.
  • Problem: Diagramm wird nicht angezeigt.

    • Lösung: Stelle sicher, dass das Diagramm korrekt eingefügt wurde und die Datenquelle nicht leer ist.

Alternative Methoden

Falls du keine VBA verwenden möchtest, kannst du die Größe der Diagramme manuell anpassen. Klicke einfach auf das Diagramm und ziehe die Ecken, um die Größe zu ändern. Diese Methode ist jedoch nicht automatisiert und erfordert mehr Aufwand, besonders bei mehreren Kreisdiagrammen.


Praktische Beispiele

  • Kreisdiagramm mit Summen: Du kannst die Summe der Werte in einem Kreisdiagramm anzeigen, indem du die Optionen im Diagrammformat anpasst.
  • Mehrere Kreisdiagramme in einem Diagramm: Um mehrere Kreisdiagramme in einem Diagramm darzustellen, kannst du Datenreihen kombinieren und ein kombiniertes Diagramm erstellen.

Tipps für Profis

  • Diagramm nach Größe sortieren: Um die Diagramme nach Größe zu sortieren, kannst du die Werte in deiner Datenquelle anpassen, bevor du das Diagramm erstellst.
  • Verwendung von Balkendiagrammen: Wenn du die Werte besser vergleichen möchtest, könnte ein Balkendiagramm nach Größe eine gute Alternative sein.

FAQ: Häufige Fragen

1. Kann ich die Größe des Kreises in Excel direkt anpassen? Ja, du kannst die Größe des Kreises anpassen, indem du die Werte in der Datenquelle änderst oder VBA verwendest.

2. Wie kann ich mehrere Kreisdiagramme in einem Diagramm darstellen? Du kannst die Datenreihen kombinieren und ein kombiniertes Diagramm erstellen, um mehrere Kreisdiagramme in einem Diagramm anzuzeigen.

Beliebteste Forumthreads (12 Monate)

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