Salt la conținutul principal
 

Cum să sumați / să numărați numere aldine într-o gamă de celule din Excel?

Autor: Xiaoyang Ultima modificare: 2022-05-16

Când aveți un interval de date care conține câteva numere îndrăznețe într-o foaie de lucru, iar acum doriți să însumați sau să numărați numai celulele aldine, desigur le puteți adăuga una câte una manual, dar va consuma mult timp. Cum ați putea însuma sau număra doar celulele îndrăznețe din Excel într-un mod ușor și rapid?

Numărați numere aldine într-un interval cu funcția definită de utilizator (VBA și formulă)
Sumați numerele aldine într-un interval cu funcția definită de utilizator (VBA și formulă)
Mai mulți fac clic pentru a număra și a suma celulelor îndrăznețe într-un interval cu Kutools pentru Excel


Numărați numerele aldine într-un interval cu funcția definită de utilizator

Următoarele Funcție definită de utilizator vă poate ajuta să obțineți rapid numărul de celule îndrăznețe. Vă rugăm să faceți acest lucru:

1. Țineți apăsat butonul ALT + F11 tastele și deschide fișierul Fereastra Microsoft Visual Basic pentru aplicații.

2. Clic Insera > Moduleși lipiți următorul cod în Fereastra modulului.

Cod VBA: Numărați numere aldine într-o gamă de celule

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. Apoi salvați acest cod și tastați această formulă = CountBold (A1: C9) într-o celulă goală, vezi captura de ecran:

doc-count-bold-celule1

4. Apoi apăsați Intrați tasta și veți număra celulele aldine din intervalul A1: C9.

doc-count-bold-celule2

Notă:A1: C9 în formulă indică intervalul pe care doriți să îl utilizați pentru a număra celulele aldine, îl puteți schimba după cum doriți.


Sumați numerele aldine într-un interval cu funcția definită de utilizator

Și dacă doriți să însumați doar numerele aldine dintr-un interval de date, pot crea, de asemenea, o funcție definită de utilizator pentru a o rezolva.

1. Țineți apăsată tasta ALT + F11 tastele și deschide fișierul Fereastra Microsoft Visual Basic pentru aplicații.

2. Clic Insera > Moduleși lipiți următorul cod în Fereastra modulului.

Cod VBA: Sumați numerele aldine într-o gamă de celule

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. Apoi salvați acest cod și tastați această formulă = sumbold (A1: C9) într-o celulă goală, vezi captura de ecran:

doc-count-bold-celule3

4. Și apoi apăsați Intrați tasta, toate numerele aldine din gama A1: C9 au fost adăugate. Vedeți captura de ecran:

doc-count-bold-celule4

Notă:A1: C9 în formula indică intervalul pe care doriți să îl utilizați pentru a însuma celulele aldine, îl puteți schimba în funcție de nevoile dvs.


Mai mulți fac clic pentru a număra și a suma celulelor îndrăznețe într-un interval cu Kutools pentru Excel

YPuteți număra sau suma cu ușurință toate celulele îndrăznețe dintr-un interval cu mai multe clicuri fără a gestiona codul VBA complicat și a aminti formule.

Înainte de a aplica Kutools pentru Excel, Vă rugăm să descărcați-l și instalați-l mai întâi.

1. Pentru numărarea celulelor aldine, selectați o celulă goală pentru localizarea rezultatului, apoi faceți clic pe Kutools > Funcții Kutools > Statistică și matematică > COUNTBYFONTBOLD.

Și pentru a însuma celule îndrăznețe, faceți clic pe Kutools > Funcții Kutools > Statistică și matematică > SUMBYFONTBOLD. Vedeți captura de ecran:

2. În Fargumente unction caseta de dialog, specificați intervalul cu celule aldine pe care trebuie să le numărați sau să le sumați în caseta de referință, apoi faceți clic pe OK butonul.

Acum, numărarea sau însumarea tuturor celulelor aldine din intervalul specificat sunt populate imediat în celula selectată. Vedeți captura de ecran:

  Dacă doriți să aveți o perioadă de încercare gratuită (30 de zile) a acestui utilitar, vă rugăm să faceți clic pentru a-l descărca, și apoi mergeți pentru a aplica operația conform pașilor de mai sus.


Păstrați constantă referința celulei de formulă cu Kutools pentru Excel


Articole pe aceeași temă:

Cum se identifică și se selectează toate celulele sau textele aldine din Excel?

Cele mai bune instrumente de productivitate de birou

🤖 Kutools AI Aide: Revoluționați analiza datelor pe baza: Execuție inteligentă   |  Generați codul  |  Creați formule personalizate  |  Analizați datele și generați diagrame  |  Invocați funcțiile Kutools...
Caracteristici populare: Găsiți, evidențiați sau identificați duplicatele   |  Ștergeți rândurile goale   |  Combinați coloane sau celule fără a pierde date   |   Rundă fără Formula ...
Super căutare: VLookup cu mai multe criterii    VLookup cu valori multiple  |   VLookup pe mai multe foi   |   Căutare fuzzy ....
Listă derulantă avansată: Creați rapid o listă derulantă   |  Listă drop-down dependentă   |  Listă derulantă cu selectare multiplă ....
Manager de coloane: Adăugați un număr specific de coloane  |  Mutați coloanele  |  Comutați starea vizibilității coloanelor ascunse  |  Comparați intervale și coloane ...
Caracteristici prezentate: Focus pe grilă   |  Vedere de proiectare   |   Big Formula Bar    Manager registru de lucru și foi   |  Biblioteca de resurse (Text automat)   |  Data Picker   |  Combinați foi de lucru   |  Criptare/Decriptare celule    Trimiteți e-mailuri după listă   |  Super Filtru   |   Filtru special (filtrează bold/italic/barat...) ...
Top 15 seturi de instrumente12 Text Instrumente (Adăuga text, Eliminați caractere,...)   |   50+ Diagramă Tipuri de (Gantt Chart,...)   |   40+ Practic Formule (Calculați vârsta pe baza zilei de naștere,...)   |   19 inserare Instrumente (Introduceți codul QR, Inserați imaginea din cale,...)   |   12 Convertire Instrumente (Numere la cuvinte, conversie valutara,...)   |   7 Merge & Split Instrumente (Rânduri combinate avansate, Celule divizate,...)   |   ... și altele

Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp.  Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...


Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!