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

Ինչպե՞ս Excel- ում մի շարք բջիջներում ամփոփել / հաշվել համարձակ թվերը:

Երբ ունեք տվյալների տիրույթ, որը աշխատանքային թերթում պարունակում է համարձակ թվեր, և այժմ ցանկանում եք ամփոփել կամ հաշվել միայն համարձակ բջիջները, իհարկե, դրանք մեկ առ մեկ կարող եք ավելացնել ձեռքով, բայց դա ժամանակատար է: Ինչպե՞ս կարող եք Excel- ում պարզ և հաշվել համարձակ բջիջները հեշտ և արագ եղանակով:

Հաշվի՛ր համարձակ թվեր տիրույթում ՝ օգտագործողի կողմից սահմանված գործառույթով (VBA և բանաձև)
Օգտատիրոջ կողմից սահմանված գործառույթի (VBA և բանաձև) հետ մի շարք համարձակ թվեր:
Մի քանի կտտացրեք համարձակ բջիջները հաշվելու և գումարելու համար Excel- ի համար նախատեսված Kutools- ի հետ մի շարք


Հաշվի՛ր համարձակ թվեր տիրույթում ՝ օգտագործողի կողմից սահմանված գործառույթով

Հետեւյալ Օգտագործողի սահմանած գործառույթը կարող է օգնել ձեզ արագորեն ստանալ համարձակ բջիջների քանակը: Խնդրում եմ, արեք այսպես.

1, Պահեք պահեք ALT + F11 ստեղները, և այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլի պատուհան.

VBA կոդ. Համարի համարձակ թվերը մի շարք բջիջներում

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. Ապա պահեք այս կոդը և մուտքագրեք այս բանաձևը = CountBold (A1: C9) դատարկ բջիջի մեջ, տես նկարի նկարը.

դոկ-հաշվարկել-համարձակ բջիջներ 1

4, Դրանից հետո սեղմեք Մտնել ստեղնը, և դուք կհաշվեք համարձակ բջիջները A1: C9 տիրույթում:

դոկ-հաշվարկել-համարձակ բջիջներ 2

Նշում:A1: C9 բանաձևում նշվում է այն տիրույթը, որը ցանկանում եք օգտագործել գործառույթը համարձակ բջիջները հաշվելու համար, այն կարող եք փոխել որպես ձեր կարիքը:


Օգտատիրոջ կողմից սահմանված գործառույթի հետ մի շարք համարձակ թվեր

Եվ եթե տվյալների տիրույթում ցանկանում եք ամփոփել միայն համարձակ թվերը, ապա ես կարող եմ նաև ստեղծել օգտագործողի կողմից սահմանված գործառույթ, որպեսզի այն լուծվի:

1. Անջատեք ALT + F11 ստեղները, և այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլի պատուհան.

VBA կոդ. Բազմաթիվ բջիջներում համարձակ համարների գումար

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, Ապա պահեք այս կոդը և մուտքագրեք այս բանաձևը = գումարած (A1: C9) դատարկ բջիջի մեջ, տես նկարի նկարը.

դոկ-հաշվարկել-համարձակ բջիջներ 3

4. Եվ հետո սեղմեք Մտնել բանալին, A1: C9 տիրույթի բոլոր համարձակ համարները գումարվել են: Տեսեք,

դոկ-հաշվարկել-համարձակ բջիջներ 4

Նշում:A1: C9 բանաձևում նշվում է այն տիրույթը, որը ցանկանում եք օգտագործել գործառույթը ՝ համարձակ բջիջներն ամփոփելու համար, այն կարող եք փոխել ըստ ձեր կարիքի:


Մի քանի կտտացրեք համարձակ բջիջները հաշվելու և գումարելու համար Excel- ի համար նախատեսված Kutools- ի հետ մի շարք

YԴուք կարող եք հեշտությամբ հաշվել կամ ամփոփել բոլոր համարձակ բջիջները մի շարք կտտոցներով ՝ առանց բարդ VBA կոդի հետ աշխատելու և բանաձևեր հիշելու:

Նախքան դիմելը Excel- ի համար նախատեսված գործիքներ, խնդրում եմ նախ ներբեռնեք և տեղադրեք այն.

1. Համարձակ բջիջները հաշվելու համար ընտրեք դատարկ բջիջ արդյունքը գտնելու համար, ապա կտտացրեք Կուտոլս > Kutools գործառույթները > Վիճակագրական և մաթեմատիկա > COUNTBYFONTBOLD.

Իսկ համարձակ բջիջներն ամփոփելու համար կտտացրեք Կուտոլս > Kutools գործառույթները > Վիճակագրական և մաթեմատիկա > SUMBYFONTBOLD, Տեսեք,

2. Ֆ-ումunction Փաստարկներ երկխոսության տուփ, նշեք համարձակ բջիջներով այն տիրույթը, որը դուք պետք է հաշվեք կամ գումարեք Հղման վանդակում, ապա կտտացրեք այն OK կոճակը:

Այժմ նշված տիրույթում գտնվող բոլոր համարձակ բջիջների հաշվարկը կամ ամփոփումը անմիջապես լրացվում են ընտրված խցում: Տեսեք,

  Եթե ​​ցանկանում եք ունենալ անվճար փորձաշրջան (30-օր) այս կոմունալ, խնդրում ենք կտտացնել այն ներբեռնելու համար, և այնուհետև անցեք գործողությունը կիրառելու վերը նշված քայլերին համապատասխան:


Excel- ի համար Kutools- ի հետ անընդհատ պահեք բանաձևի բջիջների տեղեկանքը


Առնչվող հոդվածներ:

Ինչպե՞ս ընտրել և ընտրել Excel- ում բոլոր համարձակ բջիջները կամ տեքստերը:


Գրասենյակի արտադրողականության լավագույն գործիքները

Excel-ի համար Kutools-ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80%-ով

  • Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
  • Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
  • Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
  • Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
  • Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
  • Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
  • Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
  • Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
  • Ավելի քան 300 հզոր հատկություններ. Աջակցում է Office / Excel 2007-2021 և 365: Աջակցում է բոլոր լեզուներին: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հնարավորություններ 30-օրյա անվճար փորձարկում: 60-օրյա գումարի վերադարձի երաշխիք:
kte էջանիշը 201905

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
officetab ներքևում
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (21)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
բարև, օգտագործելով excel 2013 հոլանդերենը kutools 6.5-ով, բայց չեմ կարող սթափվել՝ օգտագործելով ընթերցման դասավորությունը: հարցրեք նախքան բղավելը լուծվի այս տարբերակում ???
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
[quote]Ողջույն, օգտագործելով excel 2013 հոլանդերենը kutools 6.5-ով, բայց չեմ կարող չմոռանալ կարդալու դասավորությունը: հարցրեք նախքան բղավելը լուծվի այս տարբերակում ???Քերսթենի կողմից[/quote] Բարև, խնդրում եմ կապվեք ինձ հետ jaychivo# հասցեովextendoffice.com. Խնդրում ենք # փոխարինել @-ով: :-)
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բջիջի գույնի հիման վրա հաշվելու միջոց կա՞, եթե տեքստը թավ է:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
ՍԱ ՀՐԱՇԱԼԻ Է !!!! Այն հիանալի աշխատեց !! Շնորհակալություն
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Սա հիանալի աշխատում է, բացառությամբ, որ այն չի ավելացնում իմ տասնորդական թվերը, միայն ավելացնում է ամբողջ դոլարը: Եթե ​​դուք ունեք ուղղում դրա համար, ես շատ շնորհակալ կլինեմ:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բարև Քեթի, օգտագործիր ստորև բերված կոդը, քանի որ գումարը ցույց է տալիս տասնորդական թվերը: Գործառույթ SumBold(rng As Range) Dim rCell As Range Application.Volatile SumBold = 0 յուրաքանչյուր rCell-ի համար rng Եթե rCell.Font.Bold Այնուհետեւ _ SumBold = SumBold + rCell Next End ֆունկցիա
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Սա բուժում է: Ես միայն մեկ խնդիր ունեմ... այն կարծես թե ոչինչ չի ավելացնում տասնորդական կետից հետո: Ցանկացած օգնություն մեծապես գնահատելի կլինի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Շնորհակալություն... աշխատում է...
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ես պատճենեցի և տեղադրեցի կոդը excel-ում, բայց ստացա՞ր #NAME: սխալ. Ես համոզվեցի, որ միացրել եմ մակրոները և օգտագործել excel 2010 տարբերակը (չգիտեմ՝ դա ինչ-որ բան փոխո՞ւմ է): Որևէ մեկը կարո՞ղ է օգնել, խնդրում եմ:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
[quote]Ես պատճենեցի և տեղադրեցի կոդը excel-ում, բայց ստացա՞ք #NAME: սխալ. Ես համոզվեցի, որ միացրել եմ մակրոները և օգտագործել excel 2010 տարբերակը (չգիտեմ՝ դա ինչ-որ բան փոխո՞ւմ է): Որևէ մեկը կարո՞ղ է օգնել, խնդրում եմ:Մեյի կողմից[/quote] Դուք պետք է հետևեք հրահանգին: Այն ասում է. «Սեղմեք Տեղադրել > Մոդուլ և տեղադրեք հետևյալ կոդը մոդուլի պատուհանում», և դուք պետք է հենց այդպես էլ անեք: Համոզվեք, որ կոդը տեղադրում եք մոդուլի պատուհանում, այլ ոչ թե թերթիկի կոդի պատուհանում:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ես օգտագործում եմ excel-ը mac 2011-ի համար: Ինչպե՞ս կարող եմ գործարկել կոդը իմ համակարգում: շնորհակալություն
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
RE: CountBold բանաձև Այս բանաձևը դինամիկ չի թվում: Մինչ այն աշխատում է առաջին անցման ժամանակ, եթե ես փոխում եմ համարձակ բջիջները, հաշվիչները չեն թարմացվում, մինչև նորից չմտնեմ բանաձևը: Ինչ-որ խորհուրդներ:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Այո, սա նույնն է ինձ համար, հակառակ դեպքում այն ​​հիանալի է աշխատում: Բայց եթե դա հնարավոր լիներ լուծել այնպես, որ այն թարմացներ հաշվարկը յուրաքանչյուր բջիջի ապաընտրումից հետո, ինչպես մյուս հիմնական հաշվարկները, կատարյալ կլիներ:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Սիրելի տղաներ,
Բանաձևը չի թարմացվի, եթե պարզապես փոխեք թվային բջիջների ձևաչափը:
Այն թարմացվում է միայն այն ժամանակ, երբ փոխում եք բջջային բովանդակությունը:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
А если в ячейках числа и текст? надо просуммировать только ячейки с числами жирным шрифтом.
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ma se metto in grassetto nuove celle, la somma non si aggiorna !!!
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բարև Կարլո,

Gald օգնելու համար: Այն բանից հետո, երբ նոր բջիջներ կհայտնեք, գումարն ինքնաբերաբար չի թարմացվի: Բայց երբ կրկնակի սեղմեք բանաձևի բջիջը, այնուհետև սեղմեք Enter, գումարը կթարմացվի: Խնդրում ենք փորձել:

Sincerely,
Mandy
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բարև Մենդի
շնորհակալություն ձեր պատասխանի համար,
Այո, ես գիտեմ, որ կրկնակի սեղմումից հետո գումարը կբարձրանա:
Գումարը ավտոմատ կերպով թարմացնելու որևէ միջոց կա՞:

Regards
Carlo
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բարև Կարլո,

Կներեք, որ գումարը ավտոմատ կերպով թարմացնելու լուծում չունեմ: Ամենահեշտ ձևը, որի մասին կարող եմ մտածել, սեղմելն է Ctrl + Alt + F9՝ բոլոր բաց աշխատանքային գրքույկների բոլոր թերթերը վերահաշվարկելու համար: Հաճելի օր.

Sincerely,
Mandy
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ես օգտագործում եմ ֆունկցիան և շարունակում եմ ստանալ #NAME-ը: սխալ. Ես օգտագործում եմ Excel 365 և Windows11:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Բարև, Էնթոնի

Դուք պատճենե՞լ և տեղադրե՞լ եք կոդը մեջ Մոդուլներ of Microsoft Visual Basic հավելվածների համար պատուհան ձեր աշխատաթերթում? Կոդը կպցնելուց հետո, դուք պետք է մուտքագրեք բանաձևը, ինչպես ձեզ հարկավոր է:

Կամ կարող եք վերբեռնել ձեր ֆայլը այստեղ, մենք կարող ենք ստուգել, ​​թե որտեղ է խնդիրը:

Thank you!
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր

Հետեւեք մեզ

Հեղինակային իրավունքի © 2009 - www.extendoffice.com. | Բոլոր իրավունքները պաշտպանված են. Powered by ExtendOffice. | | Կայքի քարտեզ
Microsoft- ը և Office- ի պատկերանշանը հանդիսանում են Microsoft Corporation- ի ապրանքային նշաններ կամ գրանցված ապրանքային նշաններ ԱՄՆ-ում և (կամ) այլ երկրներում:
Պաշտպանված է Sectigo SSL- ի կողմից