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

MS Word- ում հեշտությամբ կարող եք հաշվել բառերի քանակը, բայց Excel- ը չունի ներկառուցված գործիք աշխատանքային թերթում բառերի քանակը հաշվելու համար: Այնուամենայնիվ, Excel- ում կարող եք հաշվել բառերի քանակը հետևյալ մեթոդներով.

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

Հաշվիր բառերի քանակը բանաձևով

Ահա երկու բանաձև, որպեսզի հաշվեք բառերը մեկ խցում և միջակայքում գտնվող բջիջներում:

Հաշվեք բառերը մեկ խցում

Խնդրում ենք մուտքագրել այս բանաձևը =IF(LEN(TRIM(A2))=0,0,LEN(TRIM(A2))-LEN(SUBSTITUTE(A2," ",""))+1) մեջ Ֆորմուլա Բար, ապա սեղմել կոճակը Մտնել բանալի.

ՆշումԲանաձևում A2- ն այն բջիջն է, որի ներսում դուք հաշվելու եք բառերի քանակը:

Արդյունքը կարող եք տեսնել, ինչպես ցույց է տրված ստորև նշված էկրանի նկարը.

Հաշվեք բառերը զանգվածի բանաձեւով մի շարք բջիջներում

Եթե ​​ցանկանում եք բառերը հաշվել մի շարք բջիջներում, խնդրում ենք մուտքագրել բանաձև =SUM(IF(LEN(TRIM(A2:A3))=0,0,LEN(TRIM(A2:A3))-LEN(SUBSTITUTE(A2:A3," ",""))+1)) մեջ բանաձևի գոտի, ապա սեղմել Հերթափոխություն + Ctrl + Մտնել ստեղները միաժամանակ ՝ արդյունքը ստանալու համար: Տեսեք,

Նշում: A2: A3- ը ձեր հաշված բառերի տիրույթն է:

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

Բացի այդ, Դուք կարող եք հաշվել բջիջում օգտագործողի կողմից սահմանված գործառույթներով բառերը, արեք հետևյալը.

1. Մամուլ ալտ + F11 ստեղները միասին բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.

2. Winodw- ում կտտացրեք Տեղադրել > Մոդուլներ, ապա պատճենեք և տեղադրեք ներքևում VBA կոդի մեջ Մոդուլի մեջ: Տեսեք,

VBA կոդ. Բառի բառերի քանակը հաշվում է բջիջում:

Function intWordCount(rng As Range) As Integer
'Update by Extendoffice 2018/3/7
    intWordCount = UBound(Split(Application.WorksheetFunction.Trim(rng.Value), " "), 1) + 1
End Function

2. Սեղմեք ալտ + Q ստեղները փակելու համար Microsoft Visual Basic հավելվածների համար վինոդ Ձեր աշխատաթերթում ընտրեք դատարկ բջիջ, մուտքագրեք «=intwordcount(A2)”Ֆորմուլայի շարքում և սեղմել այն Մտնել արդյունքը ստանալու բանալին: Տեսեք,

ՆշումԲանաձևում A2- ն այն բջիջն է, որի ներսում դուք հաշվելու եք բառերի քանակը:

Եթե ​​ցանկանում եք հաշվել բառերի քանակը որոշակի տիրույթում, խնդրում ենք կիրառել հետևյալ մեթոդը:

Հաշվի՛ր VBA կոդով նշված տիրույթի բառերի քանակը

Հաջորդ VBA կոդը կարող է օգնել արագ հաշվել նշված տիրույթում գտնվող բառերի քանակը:

1. Մամուլ ալտ + F11 ստեղները միասին բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.

2. Winodw- ում կտտացրեք Տեղադրել > Մոդուլներ, ապա պատճենեք և տեղադրեք ներքևում VBA կոդի մեջ Մոդուլի մեջ: Տեսեք,

VBA կոդ. Ընտրված տիրույթում հաշվել բառերի քանակը:

Sub CountWords()
    Dim xRg As Range
    Dim xRgEach As Range
    Dim xAddress As String
    Dim xRgVal As String
    Dim xRgNum As Long
    Dim xNum As Long
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select a range:", "Kutools For Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    If Application.WorksheetFunction.CountBlank(xRg) = xRg.Count Then
        MsgBox "Words In Selection Is: 0", vbInformation, "Kutools For Excel"
        Exit Sub
    End If
    For Each xRgEach In xRg
        xRgVal = xRgEach.Value
        xRgVal = Application.WorksheetFunction.Trim(xRgVal)
        If xRgEach.Value <> "" Then
            xNum = Len(xRgVal) - Len(Replace(xRgVal, " ", "")) + 1
            xRgNum = xRgNum + xNum
        End If
    Next xRgEach
    MsgBox "Words In Selection Is: " & Format(xRgNum, "#,##0"), vbOKOnly, "Kutools For Excel"
    Application.ScreenUpdating = True
End Sub

3. Սեղմեք F5 ծածկագիրը գործելու համար: Պատուհանման մեջ Excel- ի համար նախատեսված գործիքներ երկխոսության տուփ, խնդրում ենք ընտրել այն տիրույթը, որի ներսում հաշվելու եք բառերի քանակը, ապա կտտացրեք այն OK կոճակ Տեսեք,

Հետո մեկ ուրիշը Excel- ի համար նախատեսված գործիքներ երկխոսության պատուհանը բացվում է ՝ ձեզ ընտրված տիրույթում բառերի ընդհանուր քանակը ցույց տալու համար: Տեսեք,

Հաշվեք Excel- ի համար Kutools- ի բառերի քանակը (միայն կտտացնում է)

YԴուք կարող եք փորձել այն Հաշվեք բառերը միջակայքում Excel- ի համար Kutools- ի օգտակար բջիջում կամ տիրույթում ընդամենը մի քանի կտտոցով բառերի քանակը հեշտությամբ հաշվելու համար:

1. Ընտրեք բջիջ արդյունքը վերադարձնելու համար, ապա կտտացրեք Կուտոլս > Բանաձևի օգնական > Բանաձևի օգնական.

2. Մեջ Բանաձևեր օգնողը երկխոսության տուփ, խնդրում ենք կազմաձևել հետևյալը.

• Է Ընտրեք բանաձեւ տուփ, ընտրեք Հաշվեք ընդհանուր բառերը;
  TipsԴուք կարող եք ստուգել ֆիլտր տուփը, մուտքագրեք հիմնաբառ ՝ բանաձևն արագ զտելու համար, որքան անհրաժեշտ է:
• Է Շարք տուփ, նշեք այն բջիջը կամ տիրույթը, որում ցանկանում եք հաշվել ընդհանուր բառերը;
• Սեղմեք է OK կոճակ Տեսեք,

Դրանից հետո դուք կստանաք բառերի քանակը նշված բջիջում կամ տիրույթում:

Excel- ի համար Kutools- ի հետ հեշտությամբ հաշվեք բառերի քանակը

---

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

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

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

Կարդալ ավելին... Անվճար ներբեռնում... Գնեք ... 

---

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

• Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
• Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
• Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:

Կարդալ ավելին... Անվճար ներբեռնում... Գնեք ...