Diagrammachsenformatierung per Zelle einstellen
|
Autor |
Nachricht |
waldbronner
Excelproblemhaber
Verfasst am: 05. Apr 2011, 16:15 Rufname:
Wohnort: Kraichtal
|
|
Version: Office 2007 |
|
Hallo,
habe mal ne Frage. Weiß jemand wie und ob man in einem Excel-Diagramm die Bereiche der z.B. x-Achse formatieren kann ? Ich weiß schon, dass das über "Achse formatieren" und "Achsenoptionen" geht, aber ich hätte das gerne halbwegs automatisch gemacht. Also dass z.B. das Minimum sich nach der Zahl in der Zelle A4 richtet und das Maximum nach der Zahl in Zelle A5.
Hintergrund ist der, dass ich in meiner Spalte A zwar immer 10 Werte stehen habe, diese aber vom Wert her stark varieren können. Mal gehen sie von -10 bis 1500 dann von 0,1 bis 0,9 und so muss ich jedes Mal im Diagramm auf die Achse klicken und das manuell anpassen. Ich weiß zwar, dass man dort auch auf "Auto" stellen kann, aber oft werden die Bereiche dann nicht so angepasst wie ich es mir wünschen würde. Gerade hab ich z.B. Werte die von 30 bis 301 gehen und die automatische Formatierung macht mir da eine Formatierung von 0 bis 400. Ich bräuchte es aber in 0 bis 350 und wie gesagt, wäre es für mich wünschenswert wenn ich den Min-und Maxwert ebenso wie das Hauptintervall so über bestimmte Zellen einer Tabelle einstellen könnte.
viele Grüße
Jürgen
|
|
Zero
Formeln, Diagramme und ein bisschen VBA

Verfasst am: 05. Apr 2011, 17:27 Rufname: Dennis
Wohnort: NDS
|
|
Version: Office 2007 |
|
Hallo
Das geht nur per VBA.
_________________ Gruß zero
|
|
Gast
Verfasst am: 06. Apr 2011, 07:20 Rufname:
|
|
Version: Office 2007 |
|
........und wie ? Hättest Du mir da eine Hilfe ?
viele Grüße
Jürgen
|
|
Zero
Formeln, Diagramme und ein bisschen VBA

Verfasst am: 06. Apr 2011, 19:50 Rufname: Dennis
Wohnort: NDS
|
|
Version: Office 2007 |
|
Hallo
So in etwa vielleicht?
Code: | Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A4:A6")) Is Nothing Then Exit Sub
With ActiveSheet.ChartObjects("Diagramm 1").Chart.Axes(xlValue)
On Error Resume Next
.MinimumScale = Range("A4").Value
.MaximumScale = Range("A5").Value
.MajorUnit = Range("A6").Value
.MinimumScaleIsAuto = (Range("A4") = "")
.MaximumScaleIsAuto = (Range("A5") = "")
.MajorUnitIsAuto = (Range("A6") = "")
End With
End Sub |
_________________ Gruß zero
|
|
weppel
Einsteiger VBA/Formeln
Verfasst am: 30. Apr 2014, 17:43 Rufname: Seppel
|
|
Version: Office 2007 |
|
Hallo VBA Gemeinde,
zu diesem Thread bräuchte ich mal Hilfe.
Ich möchte die Daten aus dem Diagramm in 2 Zellen schreiben. Ist das möglich.
Mein Versuch sieht so aus, - gescheidert!
Code: |
.....
Worksheets("Diagramm").Range("AQ10") = .ChartObjects("Diagramm 1").Chart.Axes(xlValue).MinimumScale.Value
Worksheets("Diagramm").Range("AR10") = .ChartObjects("Diagramm 1").Chart.Axes(xlValue).MaximumScale.Value |
Ich danke für eine Anteilnahme!
_________________ Grüße Weppel (Seppel)
|
|
Zero
Formeln, Diagramme und ein bisschen VBA

Verfasst am: 30. Apr 2014, 19:19 Rufname: Dennis
Wohnort: NDS
|
|
Version: Office 2007 |
|
Hallo
Klar. Siehe oben.
_________________ Gruß zero
|
|
Du kannst Beiträge in dieses Forum schreiben. Du kannst auf Beiträge in diesem Forum antworten. Du kannst deine Beiträge in diesem Forum nicht bearbeiten. Du kannst deine Beiträge in diesem Forum nicht löschen. Du kannst an Umfragen in diesem Forum nicht mitmachen. Du kannst Dateien in diesem Forum nicht posten Du kannst Dateien in diesem Forum herunterladen
|
|
|
Verwandte Themen |
Forum / Themen |
Antworten |
Autor |
Aufrufe |
Letzter Beitrag |
 |
Excel Formeln: Formel in Zelle nicht Sichtbar machen |
5 |
Fire |
8408 |
26. Jan 2005, 18:00 Fire  |
 |
Excel Formeln: Dateinamen für zu öffnende Tabelle in Zelle vorgeben, wie? |
4 |
excessor |
1698 |
24. Jan 2005, 22:52 A.Knecht  |
 |
Excel Formeln: Worte aus einer Zelle in 2 Zellen schreiben |
2 |
Sven79 |
1322 |
12. Jan 2005, 01:20 Sven79  |
 |
Excel Formeln: Bei der Formel "=C5-((B6-B5)*G3)" soll die Zelle G |
2 |
Gast |
1502 |
26. Nov 2004, 15:55 Gast  |
 |
Excel Formeln: SVERWEIS, Wert aus der nächsten zelle |
9 |
Dave |
5483 |
11. Okt 2004, 13:50 Dave  |
 |
Excel Formeln: Leerzeichen in Zelle löschen |
3 |
pkegelking |
1807 |
01. Okt 2004, 11:57 pkegelking  |
 |
Excel Formeln: inhalt einer zelle suchen und wiedergeben |
2 |
winni |
5568 |
23. Sep 2004, 16:47 winni  |
 |
Excel Formeln: Bild für Hyperlinks die per Formel definiert sind |
1 |
Streak |
579 |
07. Sep 2004, 13:43 fl618  |
 |
Excel Formeln: Formatieren in Abhängigkeit von Zelle 'links'? |
9 |
abidmon |
2819 |
06. Sep 2004, 10:03 abidmon  |
 |
Excel Formeln: Autom. Farbänderung einer Zelle. |
1 |
Stefan 66 |
5197 |
19. Aug 2004, 14:51 fl618  |
 |
Excel Formeln: Suche Zelle nach einem ähnlichem Wert ab... (wildcart) |
2 |
Ranzi |
2538 |
09. Aug 2004, 18:22 icke  |
 |
Excel Formeln: Hyperlink per VBA kopieren |
1 |
Gast |
1118 |
03. Aug 2004, 16:57 ae  |
|
|