Schriftarten per Makro auslesen in Excel
Schritt-für-Schritt-Anleitung
Um die Schriftgröße von Zellen in Excel über ein Makro auszulesen, kannst Du die folgenden Schritte ausführen. Diese Anleitung nutzt VBA (Visual Basic for Applications).
-
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.
-
Kopiere den folgenden Code in das Modul:
Sub til()
schrift = Range("A1").Font.Size
MsgBox schrift
End Sub
-
Schließe den VBA-Editor und kehre zu Excel zurück.
-
Führe das Makro aus, indem Du ALT + F8 drückst, das Makro til auswählst und auf Ausführen klickst.
Für die allgemeine Schriftgröße, die in den Windows-Einstellungen festgelegt ist, kannst Du diesen Code verwenden:
Sub optio()
schriftoptio = Application.StandardFontSize
MsgBox schriftoptio
End Sub
Häufige Fehler und Lösungen
Alternative Methoden
Wenn Du die Schriftarten nicht über VBA auslesen möchtest, kannst Du auch die Windows-Systemsteuerung nutzen, um die Schriftgröße zu überprüfen:
- Gehe zu
Einstellungen > System > Anzeige.
- Dort findest Du die Option zur Skalierung und Layout, wo Du die aktuelle Schriftgröße sehen kannst.
Diese Methode ist jedoch nicht automatisiert und erfordert manuelle Überprüfung.
Praktische Beispiele
Hier sind einige praktische Beispiele für die Verwendung von Makros:
-
Schriftgröße in einer bestimmten Zelle auslesen:
Sub SchriftGroesse()
Dim schrift As Single
schrift = Range("B2").Font.Size
MsgBox "Die Schriftgröße in B2 ist: " & schrift
End Sub
-
Schriftgröße aller Zellen in einem Bereich auslesen:
Sub SchriftGroesseBereich()
Dim zelle As Range
Dim nachricht As String
For Each zelle In Range("A1:A10")
nachricht = nachricht & zelle.Address & ": " & zelle.Font.Size & vbCrLf
Next zelle
MsgBox nachricht
End Sub
Tipps für Profis
- Verwende
Option Explicit am Anfang Deines Moduls, um sicherzustellen, dass alle Variablen deklariert sind. Dies hilft, Fehler zu vermeiden.
- Teste Deine Makros in einer Kopie Deiner Excel-Datei, um Datenverlust zu vermeiden.
- Experimentiere mit Schleifen, um mehrere Zellen oder Bereiche einfach auszulesen.
FAQ: Häufige Fragen
1. Kann ich die Schriftgröße für alle Zellen in einem Arbeitsblatt auslesen?
Ja, Du kannst eine Schleife verwenden, um die Schriftgröße für jede Zelle in einem Arbeitsblatt auszulesen. Siehe das Beispiel im Abschnitt "Praktische Beispiele".
2. Gibt es eine Möglichkeit, die Schriftgröße aller Arbeitsblätter gleichzeitig zu prüfen?
Ja, Du kannst eine Schleife implementieren, die durch alle Arbeitsblätter iteriert und die Schriftgröße für die gewünschten Zellen abruft.
3. Funktionieren diese Makros in Excel 365?
Ja, die vorgestellten Makros funktionieren auch in Excel 365 sowie in anderen Versionen von Excel, die VBA unterstützen.