Fette Schrift in Excel zählen
Schritt-für-Schritt-Anleitung
Um in Excel die Anzahl von "fett" formatierten Zahlen zu zählen, kannst Du ein einfaches VBA-Makro verwenden. Folge diesen Schritten:
-
Öffne Excel und drücke Alt + F11, um den VBA-Editor zu öffnen.
-
Klicke mit der rechten Maustaste auf "VBAProject (DeineDatei.xlsx)" und wähle "Einfügen" > "Modul".
-
Kopiere den folgenden Code in das Modul:
Sub Zaehlen()
Dim Bereich As Range
Dim Zelle As Range
Dim lAnzahl As Long
Set Bereich = Range("A1:F20") ' Passe den Bereich an
For Each Zelle In Bereich
If Zelle.Font.Bold = True Then
lAnzahl = lAnzahl + 1
End If
Next Zelle
MsgBox "Es wurden " & lAnzahl & " fett geschriebene Zellen gefunden.", vbInformation, "Info für " & Application.UserName
End Sub
-
Passe den Bereich an, in dem Du die fettgedruckten Zahlen zählen möchtest.
-
Schließe den VBA-Editor und führe das Makro aus, um die Anzahl der "fetten Schrift" zu ermitteln.
Häufige Fehler und Lösungen
Alternative Methoden
Du kannst auch eine benutzerdefinierte Funktion in VBA erstellen, um die Anzahl der "fetten Schriften" zu zählen:
-
Öffne den VBA-Editor wie zuvor.
-
Kopiere den folgenden Code in ein Modul:
Function FetteZahl(Bereich As Range)
Application.Volatile ' damit bei Änderung ausgeführt wird
Dim Zelle
FetteZahl = 0
For Each Zelle In Bereich
If Zelle.Font.Bold = True Then
FetteZahl = FetteZahl + 1
End If
Next
End Function
-
Verwende die Funktion in einer Zelle, z.B. =FetteZahl(A1:F20) um die Anzahl der fettgedruckten Zahlen zu erhalten.
Praktische Beispiele
Wenn Du die Anzahl der "fetten Schriften" nur in bestimmten Spalten zählen möchtest, kannst Du die WENN-Funktion kombinieren:
=wenn(B1="N";FetteZahl(C1:G1);"")
Dies zählt die fett formatierten Zahlen in den Zellen C1 bis G1, wenn in B1 ein "N" steht.
Tipps für Profis
- Du kannst die Funktion
FetteZahl auch erweitern, um nur bestimmte Werte zu zählen. Zum Beispiel, um nur Zahlen größer als 0 zu zählen, ändere die Bedingung in der Funktion.
- Verwende die Funktion
Application.Volatile, damit die Funktion bei jeder Änderung der Zellen aktualisiert wird.
FAQ: Häufige Fragen
1. Wie aktiviere ich das Makro?
Du musst in den Excel-Optionen die Makros aktivieren. Gehe zu "Datei" > "Optionen" > "Trust Center" > "Einstellungen für den Trust Center".
2. Kann ich die Funktion auch in Excel Online nutzen?
Leider sind VBA-Makros in Excel Online nicht verfügbar. Du musst die Desktop-Version verwenden, um die Makros zu nutzen.
3. Was passiert, wenn ich das Makro schließe?
Das Makro bleibt gespeichert, bis Du die Excel-Datei schließt. Du kannst es jederzeit wieder aufrufen, solange Du die Datei speicherst.