Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1684to1688
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1684to1688
1684to1688
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Beschriftungsgröße Diagramme gleichzeitig ändern

Beschriftungsgröße Diagramme gleichzeitig ändern
15.04.2019 12:03:04
Frank
Hallo zusammen,
ich habe mehrere Excel-Tabellen in der sich jeweils in einer Mappe mehrere Diagramme befinden.
Ich möchte gerne die Beschriftungsgröße der Legenden, der Achsen sowie angezeigten Daten gleichzetig ändern, anstatt jedes Diagramm mühselig einzeln, manuell abzuändern.
Gibt es hier evtl. einen Trick um Zeit und Aufwand zu sparen?
LG
Frank

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Beschriftungsgröße Diagramme gleichzeitig ändern
15.04.2019 13:18:33
Rainer
Hallo Frank,
ja, gibt es. Der Geheimtipp heißt VBA.
Es ist allerdings etwas schwer zu sagen, was nun genau angepasst werden muss, da du nicht erwähnst welche Diagrammtypen benutzt werden. Da muss man womöglich mit einer weitreichenden Fehlerbehandlung rechnen, wenn es verschiedene Typen sind. Hast du evtl. eine Beispieldatei?



Sub LoopThroughCharts()
'PURPOSE: Loop through every graph in the active workbook
'SOURCE: www.TheSpreadsheetGuru.com/The-Code-Vault
Dim sht As Worksheet
Dim CurrentSheet As Worksheet
Dim cht As ChartObject
Application.ScreenUpdating = False
Application.EnableEvents = False
Set CurrentSheet = ActiveSheet
For Each sht In ActiveWorkbook.Worksheets
For Each cht In sht.ChartObjects
cht.Activate
'Do something with the chart...
Next cht
Next sht
CurrentSheet.Activate
Application.EnableEvents = True
End Sub

Anzeige
AW: Beschriftungsgröße Diagramme gleichzeitig ändern
15.04.2019 15:43:16
Frank
Danke schon mal für die Rückmeldung, Rainer.
Eine Beispiel-Datei habe ich gerade nicht parat, kann ich aber nachliefern.
Es handelt sich um ganz einfache Balkendiagramme, die alle einheitlich aufgebaut sind:
Legende, Beschriftung der X und Y-Achse, manchmal ist auch eine Sekundärachse vorhanden. Die Datenbeschriftung der Balken ist eingeblendet.
AW: Beschriftungsgröße Diagramme gleichzeitig ändern
15.04.2019 16:32:01
Rainer
Es geht wohl doch einfacher...
Man muss nicht alle Elemente (Titel, Legenden, Labels) einzeln ändern.
Probier mal so:
Sub LoopThroughCharts()
'PURPOSE: Loop through every graph in the active workbook
'SOURCE: www.TheSpreadsheetGuru.com/The-Code-Vault
Dim sht As Worksheet
Dim CurrentSheet As Worksheet
Dim cht As ChartObject
Application.ScreenUpdating = False
Application.EnableEvents = False
Set CurrentSheet = ActiveSheet
For Each sht In ActiveWorkbook.Worksheets
For Each cht In sht.ChartObjects
cht.Activate
'Do something with the chart...
With cht.Chart.ChartArea.Format.TextFrame2.TextRange.Font
.Name = "Elephant"
.Size = 24
End With
Next cht
Next sht
CurrentSheet.Activate
Application.EnableEvents = True
End Sub
Es scheint aber nicht bei allen Diagrammtypen zu klappen. Manchmal gibt es Fehler aus.
Anzeige

150 Forumthreads zu ähnlichen Themen

aus anderer Mappe Spalten importieren VBA
Wolfgang

Hallo,
aus einer anderen Anwendung wird eine Excel-Mappe mit Namen "Liste1" generiert. Wäre denkbar, dass ich aus dieser geöffneten Mappe mittels VBA bestimmte Spalten (z.B. A-C, dann erst wieder F, H etc.) in eine neue Mappe importieren kann. Problem ist vielleicht, dass die Überschriften...
27.09.2009 12:28:39
Thread-ID: 1105822
7 Beiträge
Anzeige
diagramm aus sich verändernden werten einer zelle
Gill

hallo, hier ein hoffentlich kleines problemchen:
in zelle b12 wird ein wert in abhängigkeit der eingaben in zeile 7 ermittelt.
der verlauf der änderungen in b12 soll grafisch dargestellt werden.
ein bekannter meinte, das ginge nur mit vba.
leider kenne ich mich mit vba nicht aus...
17.11.2009 13:30:19
Thread-ID: 1117955
4 Beiträge
Balken im Balkendiagramm
Michael

Hallo Zusammen,
ich möchte gerne einen Balken in einem Balkendiagramm erzeugen.
Es soll folgendes passieren.
Ein gestapeltes Balkendiagramm soll als Hintergrund fungieren.
Hier habe ich 12 x 25 als Wert erfasst.
Die ersten vier werte sind rot, die nächsten gelb und die nächs...
05.01.2011 08:34:27
Thread-ID: 1193968
3 Beiträge
Anzeige
Diagrammtitel aus einer Zelle einfügen
Jörg

Hallo,
ich muss täglich ein Diagramm erstellen, was ich über ein Makro automatisiert habe.
Nun möchte ich als Diagrammtitel immer den Wochentag und das Datum vom Vortag da drin stehen haben, kann ich in den Diagrammtitel irgendwie auch eine Formel hinterlegen, in der sich das Datum befind...
28.05.2002 14:53:04
Thread-ID: 124291
3 Beiträge
Diagramm mit Wert und Prozentangabe
Peter

Hallo Zusammen,
ich habe zwei Werte Betriebsstörungen und Gesamtstunden pro Monat und den daraus errecheten Proozentwert. Wie kann ich im Säulendiagramm die beiden Werte und die Porzentangabe darstellen?
Siehe Beispieldatei: https://www.herber.de/bbs/user/90803.xlsx
Vielen dank vo...
23.05.2014 06:42:50
Thread-ID: 1363035
3 Beiträge
VBA Diagramm Balkenbeschriftung ausrichten
Spenski

Hallo
ich benutze einen code um aus einer tabelle per vba ein diagramm zu erstellen und als .png abzuspeichern.
klappt soweit ganz gut.
mein problem liegt bei der ausrichtung der ausrichtung der beschriftung (siehe bild)
hier der codeteil für die balkenbeschriftung:
ActiveC...
01.10.2014 01:33:24
Thread-ID: 1384249
4 Beiträge
Ausrichtung Datenbeschriftung Säulendiagramm
basti

Hallo,
bei einem gestapeltem Säulendiagramm möchte ich die Datenbeschriftung oberhalb der Säulen platzieren. Gibt es eine Möglichkeit das so zu machen, dass ich quasi sage: "nimm das obere Ende der Säule und addiere einen Wert"?
Momentan sieht das bei mir so aus:
Sub Datenbeschrift_...
11.12.2014 15:32:37
Thread-ID: 1397429
11 Beiträge
Ausrichtung Datenbeschriftung Säulendiagramm
basti

Guten Morgen,
ich hatte schonmal einen Beitrag zu dem Thema offen, ich verstehe in diesem Forum allerdings nicht ganz wie ich auf einem Beitrag antworten kann wenn ich ihn unter "deine Beiträge" öffne. Deswegen mach ich jetz nochmal einen neuen auf. Sorry dafür.
In einem Diagramm mit ge...
08.01.2015 10:39:58
Thread-ID: 1401383
6 Beiträge
Anzeige

Links zu Excel-Dialogen

Frame Label

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
6
3
2
12
2
2
3
10
5
2
1
2
1
1
3
2
3
8
12
7
1
2
18
6