Note: The other languages of the website are Google-translated. Back to English

Wie summiere / zähle ich fette Zahlen in einer Reihe von Zellen in Excel?

Wenn Sie einen Datenbereich haben, der einige fettgedruckte Zahlen in einem Arbeitsblatt enthält, und Sie jetzt nur die fettgedruckten Zellen summieren oder zählen möchten, können Sie diese natürlich manuell einzeln addieren, dies ist jedoch zeitaufwändig. Wie können Sie auf einfache und schnelle Weise nur die fett gedruckten Zellen in Excel summieren oder zählen?

Zählen Sie fette Zahlen in einem Bereich mit benutzerdefinierter Funktion (VBA und Formel).
Summieren Sie fette Zahlen in einem Bereich mit benutzerdefinierter Funktion (VBA und Formel).
Mit Kutools for Excel können Sie durch Klicken mehrere fette Zellen in einem Bereich zählen und summieren


Zählen Sie fett gedruckte Zahlen in einem Bereich mit benutzerdefinierter Funktion

Folgende Benutzerdefinierte Funktion kann Ihnen helfen, schnell die Anzahl der fett gedruckten Zellen zu ermitteln. Bitte machen Sie Folgendes:

1. Halten Sie die Taste gedrückt ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen-Fenster.

2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modulfenster.

VBA-Code: Zählen Sie fette Zahlen in einem Zellbereich

Function CountBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xCount As Double
For Each Rng In WorkRng
    If Rng.Font.Bold Then
        xCount = xCount + 1
    End If
Next
CountBold = xCount
End Function

3. Speichern Sie dann diesen Code und geben Sie diese Formel ein = CountBold (A1: C9) in eine leere Zelle, siehe Screenshot:

doc-count-fette-zellen1

4. Dann drücken Weiter Taste, und Sie zählen die fett gedruckten Zellen im Bereich A1: C9.

doc-count-fette-zellen2

Hinweis:A1: C9 In der Formel wird der Bereich angegeben, in dem Sie die Funktion zum Zählen der fett gedruckten Zellen verwenden möchten. Sie können ihn nach Bedarf ändern.


Summieren Sie fette Zahlen in einem Bereich mit benutzerdefinierter Funktion

Und wenn Sie nur die fetten Zahlen in einem Datenbereich summieren möchten, kann ich auch eine benutzerdefinierte Funktion erstellen, mit der Sie sie lösen können.

1. Halten Sie die ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen-Fenster.

2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modulfenster.

VBA-Code: Summieren Sie fette Zahlen in einem Zellbereich

Function SumBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xSum As Double
For Each Rng In WorkRng
    If Rng.Font.Bold Then
        xSum = xSum + Rng.Value
    End If
Next
SumBold = xSum
End Function

3. Speichern Sie dann diesen Code und geben Sie diese Formel ein = Sumpf (A1: C9) in eine leere Zelle, siehe Screenshot:

doc-count-fette-zellen3

4. Und dann drücken Weiter Taste, alle fetten Zahlen im Bereich A1: C9 wurden addiert. Siehe Screenshot:

doc-count-fette-zellen4

Hinweis:A1: C9 In der Formel wird der Bereich angegeben, in dem die Funktion zum Summieren der fett gedruckten Zellen verwendet werden soll. Sie können ihn nach Bedarf ändern.


Mit Kutools for Excel können Sie durch Klicken mehrere fette Zellen in einem Bereich zählen und summieren

YSie können alle fetten Zellen in einem Bereich mit mehreren Klicks einfach zählen oder summieren, ohne komplizierten VBA-Code zu verarbeiten und sich Formeln zu merken.

Vor der Bewerbung Kutools for Excel, Bitte Laden Sie es zuerst herunter und installieren Sie es.

1. Um fette Zellen zu zählen, wählen Sie bitte eine leere Zelle aus, um das Ergebnis zu lokalisieren, und klicken Sie dann auf Kutoolen > Kutools-Funktionen > Statistical & Math > COUNTBYFONTBOLD.

Klicken Sie zum Summieren fett gedruckter Zellen auf Kutoolen > Kutools-Funktionen > Statistical & Math > SUMBYFONTBOLD. Siehe Screenshot:

2. In der F.Argumente Geben Sie im Dialogfeld den Bereich mit fett gedruckten Zellen an, die Sie zählen oder summieren müssen, und klicken Sie dann auf OK .

Jetzt wird das Zählen oder Summieren aller fettgedruckten Zellen im angegebenen Bereich sofort in die ausgewählte Zelle eingetragen. Siehe Screenshot:

  Wenn Sie eine kostenlose Testversion wünschen (30-Tag) dieses Dienstprogramms, Bitte klicken Sie, um es herunterzuladenund wenden Sie dann die Operation gemäß den obigen Schritten an.


Halten Sie die Referenz der Formelzellen mit Kutools for Excel konstant


In Verbindung stehende Artikel:

Wie identifiziere und wähle ich alle fett gedruckten Zellen oder Texte in Excel aus?


Die besten Tools für die Office-Produktivität

Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einfügen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen / Spalten... doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
  • Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
  • Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2021 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. 30-tägige kostenlose Testversion mit allen Funktionen. 60 Tage Geld-zurück-Garantie.
kte tab 201905

Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
officetab unten
Kommentare (22)
Noch keine Bewertungen. Bewerten Sie als Erster!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, ich verwende Excel 2013 Dutch mit kutools 6.5, kann aber das Leselayout nicht verwenden. Fragen Sie, bevor Sie in dieser Version gelöst werden schreien ???
Dieser Kommentar wurde vom Moderator auf der Website minimiert
[quote]Hallo, ich verwende Excel 2013 Dutch mit kutools 6.5, kann aber das Leselayout nicht verwenden. Fragen Sie, bevor Sie in dieser Version gelöst werden schreien ???Von kersten[/quote] Hallo, bitte kontaktieren Sie mich unter jaychivo#extendoffice.com. Bitte ersetzen Sie # durch @. :-)
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Gibt es eine Möglichkeit, basierend auf der Zellenfarbe zu zählen, wenn Text fett gedruckt ist?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
DAS IST FANTASTISCH !!!! Es hat perfekt funktioniert!! Danke
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Dies funktioniert perfekt, außer dass es meine Dezimalstellen nicht hinzuzufügen scheint, sondern nur den ganzen Dollar hinzufügt. Wenn Sie eine Lösung dafür haben, wäre ich sehr dankbar.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Katie, verwenden Sie den folgenden Code, da die Summe Dezimalstellen anzeigt. Funktion SumBold(rng As Range) Dim rCell As Range Application.Volatile SumBold = 0 For Each rCell In rng If rCell.Font.Bold Then _ SumBold = SumBold + rCell Next End Function
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Das funktioniert wunderbar. Ich habe nur ein Problem ... es scheint nichts nach einem Dezimalkomma hinzuzufügen. Jede Hilfe wäre sehr willkommen.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Danke.. es funktioniert...
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich habe Code kopiert und in Excel eingefügt, erhalte aber #NAME? Error. Ich habe darauf geachtet, Makros zu aktivieren und die Excel 2010-Version zu verwenden (weiß nicht, ob sich dadurch etwas ändert). Kann bitte jemand helfen?!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
[quote]Ich habe Code kopiert und in Excel eingefügt, erhalte aber #NAME? Error. Ich habe darauf geachtet, Makros zu aktivieren und die Excel 2010-Version zu verwenden (weiß nicht, ob sich dadurch etwas ändert). Kann bitte jemand helfen?!Von Maey[/quote] Du musst der Anweisung folgen. Es heißt: "Klicken Sie auf Einfügen > Modul und fügen Sie den folgenden Code in das Modulfenster ein", und Sie müssen genau das tun. Stellen Sie sicher, dass Sie den Code in das Modulfenster einfügen, nicht in das Blattcodefenster.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich verwende Excel für Mac 2011. Wie kann ich den Code auf meinem System ausführen? Danke!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
RE: CountBold-Formel Diese Formel scheint nicht dynamisch zu sein. Während es beim ersten Durchgang funktioniert, werden die Zähler nicht aktualisiert, wenn ich die fettgedruckten Zellen ändere, es sei denn, ich gebe die Formel erneut ein. Irgendwelche Tipps?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ja, das ist bei mir genauso, ansonsten funktioniert es super. Aber wenn dies gelöst werden könnte, so dass die Zählung nach jeder Deaktivierung der Zelle wie bei anderen grundlegenden Zählungen aktualisiert wird, wäre es perfekt!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Liebe Leute,
Die Formel wird nicht aktualisiert, wenn Sie nur das Format der Zahlenzellen ändern.
Es wird nur aktualisiert, wenn Sie den Zellinhalt ändern.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
А если в ячейках числа и текст? надо просуммировать только ячейки с числами жирным шрифтом.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ma se metto in grassetto nuove celle, la somma non si aggiorna !!!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Carlo,

Gald zu helfen. Nachdem Sie neue Zellen fett gedruckt haben, wird die Summe nicht automatisch aktualisiert. Aber wenn Sie auf die Formelzelle doppelklicken und dann die Eingabetaste drücken, wird die Summe aktualisiert. Bitte versuchen Sie es.

Mit freundlichen Grüßen
Mandy
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Mandy,
Danke für deine Antwort,
Ja, ich weiß, dass nach einem Doppelklick die Summe hochgestuft wird.
Gibt es eine Möglichkeit, die Summe automatisch zu erhöhen?

Grüße
Carlo
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Carlo,

Tut mir leid, dass ich keine Lösung habe, um die Summe automatisch zu aktualisieren. Der einfachste Weg, den ich mir vorstellen kann, besteht darin, Strg + Alt + F9 zu drücken, um alle Arbeitsblätter in allen geöffneten Arbeitsmappen neu zu berechnen. Einen schönen Tag noch.

Mit freundlichen Grüßen
Mandy
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich benutze die Funktion und erhalte immer wieder die Meldung #NAME? Error. Ich verwende Excel 365 und Windows11.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, Anton

Hast du den Code kopiert und in die Modul of Microsoft Visual Basic für Applikationen-Fenster in deinem Arbeitsblatt? Nachdem Sie den Code eingefügt haben, sollten Sie die Formel nach Bedarf eingeben.

Oder Sie können Ihre Datei hier hochladen, wir können prüfen, wo das Problem liegt.

Vielen Dank!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Anthony,
I was struggling with the same problem. For me, the solution ended up being very simple. I noticed I had 4 Modules listed. I removed all of them and then started over with the above instructions. Now it works perfectly.
Es sind noch keine Kommentare vorhanden
Hinterlassen Sie Ihre Kommentare
Als Gast posten
×
Bewerte diese Nachricht:
0   Figuren
Vorgeschlagene Standorte

Folgen Sie uns

Copyright © 2009 - www.extendoffice.com. | Alle Rechte vorbehalten. Unterstützt von ExtendOffice. | Sitemap
Microsoft und das Office-Logo sind Marken oder eingetragene Marken der Microsoft Corporation in den USA und / oder anderen Ländern.
Geschützt durch Sectigo SSL