Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
644to648
644to648
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Größe von Diagrammen variabel nach Wert?

Forumthread: Größe von Diagrammen variabel nach Wert?

Größe von Diagrammen variabel nach Wert?
04.08.2005 11:23:10
Diagrammen
Moin,
ein Kreisdiagramm darzustellen ist ja an sich kein Problem.
Ich möchte nun zwei Kreisdiagramme vergleichbar machen.
Beide sollen nicht absolut, sondern in Prozent beschriftet werden. Die Größe des Diagramms (also der Kreisdurchmesser) dagegen soll abhängig von der absoluten Summe aller Werte des Diagramms sein.
Ich hab also mal den Rekorder angeworfen und kam zu folgendem:


Sub Makro1()
ActiveSheet.ChartObjects("Diagramm 2").Activate
ActiveChart.ChartArea.Select
ActiveSheet.Shapes("Diagramm 2").ScaleWidth 0.7, msoFalse, _
msoScaleFromTopLeft
ActiveSheet.Shapes("Diagramm 2").ScaleHeight 0.67, msoFalse, _
msoScaleFromBottomRight
End Sub


Nun denke ich mir, dass ich 'einfach' die Teile "ScaleWidth" und "ScaleHeight" durch eine Zelle im Arbeitsblatt ersetzen kann und den Umfang per Formel ausrechne.
Kann mir jemand einen Gedankenanstoß geben?
Gruß,
Klaus M.vdT.
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Größe von Diagrammen variabel nach Wert?
04.08.2005 18:41:15
Diagrammen
hallo Klaus,
probiers so:


Sub x()
Dim w As Single, h As Single
w = ActiveSheet.[a1]
h = ActiveSheet.[a2]
With ActiveSheet.Shapes("Diagramm 1")
    .ScaleWidth w, msoFalse, msoScaleFromTopLeft
    .ScaleHeight h, msoFalse, msoScaleFromBottomRight
End With
End Sub

     gruß Herbert
Anzeige
AW: Größe von Diagrammen variabel nach Wert?
05.08.2005 08:06:49
Diagrammen
Hui!
mit dem Ansatz komme ich auf jedem Fall weiter. Vielen Dank!
Gruß,
Klaus M.vdT.
AW: Größe von Diagrammen variabel nach Wert?
05.08.2005 08:47:38
Diagrammen
Hi,
so gehts:

Sub anpassen()
Dim w As Single, h As Single
w = ActiveSheet.[a1]
h = ActiveSheet.[a2]
ActiveSheet.ChartObjects("Diagramm 1").Activate
With ActiveChart.PlotArea
.Width = w
.Height = h
End With
End Sub

Der Rest ist nur noch Fleißarbeit, das krieg ich hin.
Dank und Gruß,
Klaus M.vdT.
Anzeige
AW: Größe von Diagrammen variabel nach Wert?
05.08.2005 17:01:21
Diagrammen
um "PlotArea" zu ändern,brauchst du das Diagramm nicht aktivieren:

Sub anpassen()
Dim w As Single, h As Single
w = ActiveSheet.[a1]
h = ActiveSheet.[a2]
With ActiveSheet.ChartObjects("Diagramm 1").Chart.PlotArea
.Width = w
.Height = h
End With
End Sub

gruß Herbert
Anzeige
AW: Größe von Diagrammen variabel nach Wert?
08.08.2005 08:00:12
Diagrammen
Juchu! Ein Activate weniger :)
Nochmal vielen Dank, hat mir super weiter geholfen.
Gruß,
Klaus M.vdT.
;

Forumthreads zu verwandten Themen

Zeilen autom nach Werten d. Spalte C sortieren
obelix-xxl

Hallo,
ich bitte um Unterstützung bei der Lösung mittels Makro für nachfolgende Aufgabenstellung.
Im aktuellen Tabellenblatt "Raum 1" sind in der Spalte C einer jeden Zeile ganze Zahlen von 1 bis 30 eingetragen. Diese Zeilen sollen automatisch nach Eingabe des Wertes in Spalte C sortier...
02.10.2008 09:16:11
Thread-ID: 1013794
15 Beiträge
vermsichte Diagramm-Daten aus Excel sortieren
Niklas

Hallo Leute!
Ich hab folgendes Problem!
Ein Programm gibt mir Kurvenverläufe von verschiedenen Kurven in einer txt. Datei aus!
Ich habe die Kurvenwerte auch schon in ein excel sheet exportiert.
Es sind 8 Kurven... also 8 Diagramme.
Leider speichert das Programm die Kurvendat...
24.04.2009 09:25:43
Thread-ID: 1070836
6 Beiträge
Anzeige
Falsche Bildgröße nach dem Sortieren?
Kasimir

Hallo an alle!
Ich habe da ein Problem. Ich habe eine Datei, in der in einigen Zellen in Spalte I Grafiken eingebunden sind. In anderen Zellen ebenfalls in Spalte I steht nur Text. Die Zeilen haben alle unterschiedliche Höhen. Die mit Grafik sind höher, die mit nur Text sind nicht so hoch....
23.06.2009 21:33:24
Thread-ID: 1083760
2 Beiträge
Kopierte Werte nach Datum (aus)sortieren
Sirenia

Einen wunderschönen guten Morgen miteinander,
ich stehe vor folgendem Problem:
Ich kopiere Werte aus den Sheets M1-M4 mit diesem Code in die erste freie Reihe eines jeden Sheets (Werte aus Reihe 7 in M1 werden in die erste freie Reihe von M1 geschrieben, usw.).
Private Sub CommandBu...
13.07.2009 12:19:47
Thread-ID: 1088133
17 Beiträge
Bereiche nach Wert sortieren
wothan

Hallo Ihr Lieben
Folgendes Problemchen
In den Spalte stehen: cat;titel ;code;notiz
cat1- a- 2- aa
------ x- 2- xx
------ f- 3- ff
cat2- b- -- bb
------ z- 3- zz
------ c- -- cc
cat3- d- -- dd
------ l- -- ll
------ m- -- mm
cat4- p-...
15.08.2009 11:39:27
Thread-ID: 1096129
4 Beiträge
Diagramm: Beschriftungsänderung Größennachse Y
Hubert

Hallo miteinander
Ich bin mit Diagrammen nicht so bewandert, aber nach Recherche habe ich es geschafft, das folgende Zeitliniendiagramm zu erstellen.
Ich möchte jetzt aber in der Größenachse Y statt der 1, 2, 3 etc den Monatsnamen Jan, Feb, Mrz etc stehen haben. Ich bekomme es nicht hi...
29.06.2013 22:28:48
Thread-ID: 1320461
3 Beiträge
Anzeige
Werte nach Übernahme sortieren
Sylvio

Hallo Leute,
habe eine Userform mit zwei Textboxen in die ich Text eingebe der mir nach klick auf übernehmen in drei Tabellenblätter eingetragen wird.
Text aus Textbox1 in Tabelle1 ab Zeile A4 und gesplittet in Tabelle2 ab Zeile A1
Text aus Textbox2 in Tabelle3 ab Zeile A1.
Nun...
10.07.2013 11:42:13
Thread-ID: 1321827
8 Beiträge
Anzeige
Sortieren nach Werten trotz Buchstaben
Jockel

Hallo,
ich möchte eine Tabelle ab Zeile zwei in der Spalte C sortieren. Das Problem dabei ist, die Werte, die drinnen stehen, sind nicht nur Ziffern, sondern auch Buchstaben und die Ziffern stehen hinten.
Die Strings sehen immer so aus: zwei Buchstaben + zwei Ziffern.
TZ12
BS32<...
09.12.2013 14:20:42
Thread-ID: 1341866
4 Beiträge
Balken im Diagramm nach Wert färben
Stefan

Hallo,
Ich möchte gerne unsere derzeit von Hand gepflegte Plantafel für die Produktion durch ein Excel Diagramm ersetzen, da dies eine große Zeitersparnis bedeuten würde.
Ich habe mir mal die Mühe gemacht und mir in Excel eine Arbeitsmappe erstellt, mit der ich die Daten per Button aus...
01.04.2015 15:50:33
Thread-ID: 1418529
5 Beiträge
Tabelle nach Wert aus der ComboBox sortieren
Larissa

Hallo zusammen,
ich steh vor einem kleinen Problem.
Ich habe eine Tabelle mit Rohren. In den Spalten werden die Geschwindigkeit, die Länge und der Durchmesser angegeben.
Nun soll über ein Fomular nach den drei Kriterien sortiert werden.
Als Durchmesser kommt entweder 1 oder 3...
16.04.2015 09:18:02
Thread-ID: 1421097
8 Beiträge
Zeilen sortieren mit VBA nach Wert
Lukas

Hallo liebe Gemeinde,
folgendes Problem hindert mich an der Fertigstellung meines Projekts.
Ich habe eine Eingabemaske (http://abload.de/img/bildschirmfoto2015-095psja.png) und eine Datenbank (http://abload.de/img/bildschirmfoto2015-0970so1.png), sämtliche Daten werden beim klick auf "...
16.09.2015 22:08:01
Thread-ID: 1447873
12 Beiträge
Zeilen und Spalten nach größe sortieren
Alex

Hallo Zusammen,
ich würde gerne eine Matrix dahingehend sortieren, dass die größten Werte je Zeile sowie die größten Werte je Spalte absteigend sortiert werden. Leider bekomme ich das über "Daten" und "Sortieren" nicht hin. Wichtig wäre mir dabei, dass die Sektoren (Überschriften der Zeile...
10.05.2017 15:24:56
Thread-ID: 1557598
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige