Supportnet / Forum / Tabellenkalkulation
Blasendiagramm erzeugen
Frage
Hallo zusammen
Habe das gleiche Problem wie schon mal in
diesem Form behandelt
https://supportnet.de/discussion/listmessages.asp?autoid=146874#createreply
Ich bin leider selbst mit diesem Input zu dumm um
mein Problem zu lösen.
Und ich stehe leider auch gewaltig unter Zeitdruck. Das Management braucht seine Grafiken Es soll grundsätzlich eine Risikomatrix mit der X-Achse = Häufigkeit und Y-Achse Schaden dargestellt werden.
Hat jemand Zeit mir dabei kurz zu helfen?
Meine Spalten sind wie folgt
Spalte1 - Name (Betr. Risikobjekt )
Spalte2 - X-Wert (Häufigkeit in )
Spalte3 - Y-Wert (Schaden)
Spalte4 - Größe der Blase
Danke!
Antwort 1 von Beverly
Hi,
erstelle ein Blasendiagramm mit einer Blase, indem du eine Zeile deiner Spalte2 bis Spalte4 markierst und lass anschließend folgenden Code ablaufen
Da ich den genauen Aufbau deiner Wertetabelle nicht kenne, wird davon ausgegangen, dass die Werte in Spalte A bis D ab Zeile 1 stehen.
Bis später,
Karin
erstelle ein Blasendiagramm mit einer Blase, indem du eine Zeile deiner Spalte2 bis Spalte4 markierst und lass anschließend folgenden Code ablaufen
Sub Makro1()
Dim ns As Object
Dim i As Integer
Dim chDiagramm As Chart
Set chDiagramm = ActiveSheet.ChartObjects(1).Chart
With chDiagramm
.ChartType = xlBubble3DEffect
For i = 1 To 100 '<-- Anzahl anpassen
Set ns = .SeriesCollection.NewSeries
ns.XValues = "=Tabelle1!R" & i & "C2"
ns.Values = "=Tabelle1!R" & i & "C3"
ns.Name = "=Tabelle1!R" & i & "C1"
ns.BubbleSizes = "=Tabelle1!R" & i & "C4"
Next i
.SeriesCollection(1).Delete
End With
End Sub
Da ich den genauen Aufbau deiner Wertetabelle nicht kenne, wird davon ausgegangen, dass die Werte in Spalte A bis D ab Zeile 1 stehen.
Bis später,
Karin
Antwort 2 von T_R_I_X_I
Hi Karin
Hat soweit super funktioniert.
Danke für die Rettung in der Not...
Kannst Du mir vielleicht auch noch dabei helfen:
Gleiche Situation aber der Diagrammtyp soll ein Punktdiagramm sein.
Letztere Spalte entfällt dann.
Nochmals herzlichen Dank. Meine Präsentation
vor dem Management scheint dank Dir keine
Katastrophe zu werden.
Liebe Grüsse aus der Schweiz
Trixi
Hat soweit super funktioniert.
Danke für die Rettung in der Not...
Kannst Du mir vielleicht auch noch dabei helfen:
Gleiche Situation aber der Diagrammtyp soll ein Punktdiagramm sein.
Letztere Spalte entfällt dann.
Nochmals herzlichen Dank. Meine Präsentation
vor dem Management scheint dank Dir keine
Katastrophe zu werden.
Liebe Grüsse aus der Schweiz
Trixi
Antwort 3 von Beverly
Hi Trixi,
das kannst du ganz einfach mit dem Makrorecorder aufzeichnen. Gehe dabei ganz mormal so vor, wie du es gewohnt bist, wenn du ein Punkt(XY)-Diagrmam erstellst.
Bis später,
Karin
das kannst du ganz einfach mit dem Makrorecorder aufzeichnen. Gehe dabei ganz mormal so vor, wie du es gewohnt bist, wenn du ein Punkt(XY)-Diagrmam erstellst.
Bis später,
Karin

