Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Alle Fonts im Diagramm ändern?

Forumthread: Alle Fonts im Diagramm ändern?

Alle Fonts im Diagramm ändern?
Thomas
Hallo,
gibt es eine Möglichkeit, wirklich allen möglichen Textbereichen in einem Diagramm eine bestimmte Schriftart zuzuweisen?
Wenn nein, könnt ihr mir sagen, welche Text-Elemente in einem Diagramm prinzipiell vorkommen können? Dann muss ich sie nach der Reihe abändern, wäre auch kein Problem!
Vielen Dank im Voraus,
Thomas
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Alle Fonts im Diagramm ändern?
Ramses
Hallo
damit kannst du allen Diagrammen eine bestimmte Schriftart und -grösse zuweisen.

Sub test()
Dim myD As ChartObject
For Each myD In ActiveSheet.ChartObjects
myD.Activate
With Selection.Font
.Name = "Arial"
.Size = 10
End With
Next
End Sub

Alternativ kannst du mal den makrorekorder anwerfen und die Schriftart zuweisen.
Es genügt das ganze Diagramm auszuwählen und eine Schriftart zuzuweisen. Damit erhalten alle Textbestandteile die gleiche Schriftart und -grösse
Gruss Rainer
Anzeige
Nimm lieber das....
Ramses
Hallo
das ist eleganter,... sonst schimpft mich Nepumuk wegen dem Activate ;-))) *lol*

Sub test()
Dim myD As ChartObject
For Each myD In ActiveSheet.ChartObjects
With myD
.Chart.ChartArea.Font.Name = "Arial"
.Chart.ChartArea.Font.Size = 10
End With
Next
End Sub

Gruss Rainer
Anzeige
Wenn er denn wenigstens wieder schimpfen würde...
Boris
Hi Rainer,
"...sonst schimpft mich Nepumuk wegen dem Activate ..."
Aber er hat sich ja sogar schon aus den Profilen ausgetragen - scheint es also wirklich ernst zu meinen (aber warum eigentlich?!?)
Grüße Boris
Keine Ahnung....
Ramses
Hallo Boris
ich finde es ebenfalls höchst bedauerlich :-( dass er nicht mehr hier im Forum ist.
Der Grund bleibt leider auch mir verborgen.
Vermutlich liesen die Punkte dazwischen "T......l" zuviel Interpretationspielraum :-(
Wenigstens ist nur in diesem Forum nicht mehr aktiv,... sein KnowHow ist also nicht ganz verloren,... aber trotzdem ist es sehr schade.
Er ist für mich immer so eine kleine Motivationsspitze ( siehe diesen Beitrag ;-) ) gewesen, mich mit den Objecten und den API Funktionen zu beschäftigen.
Gruss Rainer
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Schriftart und -größe in Excel-Diagrammen ändern


Schritt-für-Schritt-Anleitung

Um die Schriftart und Schriftgröße in einem Excel-Diagramm zu ändern, kannst Du folgende Schritte befolgen:

  1. Diagramm auswählen: Klicke auf das Diagramm, dessen Schriftart Du ändern möchtest.

  2. Makro verwenden: Du kannst ein einfaches VBA-Makro verwenden, um die Schriftart für alle Textbereiche im Diagramm zu ändern. Füge den folgenden Code in den VBA-Editor ein:

    Sub SchriftartAendern()
       Dim myD As ChartObject
       For Each myD In ActiveSheet.ChartObjects
           With myD
               .Chart.ChartArea.Font.Name = "Arial" ' Hier die gewünschte Schriftart anpassen
               .Chart.ChartArea.Font.Size = 10 ' Hier die gewünschte Schriftgröße anpassen
           End With
       Next
    End Sub
  3. Makro ausführen: Starte das Makro, um die Änderungen anzuwenden. Alle Textbestandteile des Diagramms werden nun die gewählte Schriftart und -größe haben.


Häufige Fehler und Lösungen

Fehler 1: Das Makro funktioniert nicht.

  • Lösung: Stelle sicher, dass der VBA-Editor geöffnet ist und das Makro im richtigen Arbeitsblatt ausgeführt wird. Überprüfe auch, ob das Diagramm ausgewählt ist.

Fehler 2: Schriftart ändert sich nicht in allen Diagrammtypen.

  • Lösung: Einige Diagrammtypen haben spezielle Textfelder (z. B. Datenbeschriftungen), die separat formatiert werden müssen. Gehe manuell in die Formatierungsoptionen dieser Elemente.

Alternative Methoden

Falls Du kein VBA verwenden möchtest, kannst Du auch manuell die Schriftart in Deinem Diagramm ändern:

  1. Diagramm auswählen: Klicke auf das Diagramm.
  2. Text auswählen: Klicke auf den Textbereich, den Du ändern möchtest (Titel, Legende, Datenbeschriftungen usw.).
  3. Formatierung anwenden: Klicke mit der rechten Maustaste und wähle "Schriftart" aus dem Kontextmenü. Ändere die Schriftart und -größe nach Belieben.

Diese Methode kannst Du auch verwenden, um die Schriftart für alle Tabellenblätter in einem Dokument zu ändern, allerdings musst Du dies für jedes Diagramm separat durchführen.


Praktische Beispiele

  1. Beispiel für die Änderung von Schriftarten in einem Diagramm:

    • Erstelle ein Säulendiagramm und wende das oben genannte Makro an, um die Schriftart auf "Calibri" und die Größe auf 12 zu ändern.
  2. Schriftgröße für alle Diagramme in einem Dokument ändern:

    • Wenn Du ein Dokument mit mehreren Diagrammen hast, kannst Du das Makro anpassen, um die Schriftgröße für alle Diagramme in einem Arbeitsblatt zu ändern.

Tipps für Profis

  • Nutze den Makrorekorder, um die Schritte zur Schriftartänderung aufzuzeichnen und das entsprechende VBA-Skript zu generieren. So kannst Du Deine spezifischen Anforderungen direkt umsetzen, ohne selbst programmieren zu müssen.
  • Experimentiere mit verschiedenen Schriftarten und -größen, um sicherzustellen, dass Deine Daten in der Präsentation gut lesbar sind. Eine gute Wahl ist es, serifenlose Schriftarten für Diagramme zu verwenden, da sie in der Regel klarer wirken.

FAQ: Häufige Fragen

1. Wie kann ich die Schriftart in mehreren Diagrammen gleichzeitig ändern? Du kannst ein VBA-Makro verwenden, das alle Diagramme im aktiven Arbeitsblatt durchläuft und die Schriftart und -größe gleichzeitig ändert.

2. Kann ich die Schriftart für alle Tabellenblätter in einem Excel-Dokument ändern? Ja, du kannst ein Makro schreiben, das alle Arbeitsblätter durchläuft und die Schriftarten in den Diagrammen anpasst. Achte darauf, das Makro so zu gestalten, dass es auf alle Diagramme in jedem Blatt zugreift.

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