Hogyan számoljuk meg az Excel cellájában vagy tartományában lévő szavak számát?

Könnyedén megszámolhatja az MS Word szavainak számát, de az Excel nem rendelkezik beépített eszközzel a munkalap szavainak számolásához. Azonban a következő módszerekkel számolhatja az Excel szavainak számát:

Számolja meg a szavak számát képlettel
Számolja meg a szavak számát egyetlen cellában a Felhasználó által definiált függvényekkel
Számolja meg a szavakat a megadott tartományban VBA kóddal
Könnyen megszámolhatja a szavak számát a Kutools for Excel alkalmazással (több kattintás)

Számolja meg a szavak számát képlettel

Itt van két képlet, amelyekkel megszámolhatja a szavakat egyetlen cellában és egy tartomány cellában.

Számoljon szavakat egyetlen cellában

Kérjük, írja be ezt a képletet =IF(LEN(TRIM(A2))=0,0,LEN(TRIM(A2))-LEN(SUBSTITUTE(A2," ",""))+1) be a Formula Bar, majd nyomja meg a gombot belép kulcs.

Megjegyzések: A képletben A2 az a cella, amelybe beleszámítja a szavak számát.

Az eredményt az alábbi képernyőképen láthatja:

Számolja a szavakat egy cellatartományba tömbképlettel

Ha egy cellatartományban meg akarja számolni a szavakat, adja meg a képletet =SUM(IF(LEN(TRIM(A2:A3))=0,0,LEN(TRIM(A2:A3))-LEN(SUBSTITUTE(A2:A3," ",""))+1)) a képletsávba, majd nyomja meg a műszak + Ctrl + belép gombokat egyszerre az eredmény eléréséhez. Lásd a képernyőképet:

Megjegyzések: A2: A3 az a tartomány, ahol szavakkal számolni fog.

Számolja meg a szavak számát a Felhasználó által definiált függvényekkel

Ezenkívül megszámolhatja a cellában lévő szavakat a Felhasználó által definiált funkciókkal, kérjük, tegye a következőket:

1. nyomja meg más + F11 gombok együtt megnyitni a Microsoft Visual Basic alkalmazásokhoz ablak.

2. A winodw fájlban kattintson a gombra betétlap > Modulok, majd másolja és illessze be a VBA kód alatt a modulba. Lásd a képernyőképet:

VBA kód: Számolja meg a cellában lévő szavak számát.

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. megnyomni a más + Q gombok a Microsoft Visual Basic for Applications winodw. Jelöljön ki egy üres cellát a munkalapon, írja be a következő képletet:=intwordcount(A2)”A Formula Bar-ba, majd nyomja meg a belép kulcs az eredmény eléréséhez. Lásd a képernyőképet:

Megjegyzések: A képletben A2 az a cella, amelybe beleszámítja a szavak számát.

Ha meg akarja számolni a szavak számát egy bizonyos tartományban, kérjük, alkalmazza a következő módszert.

Számolja meg a szavakat a megadott tartományban VBA kóddal

A következő VBA-kód segítségével gyorsan megszámolhatja a megadott tartományban lévő szavak számát.

1. nyomja meg más + F11 gombok együtt megnyitni a Microsoft Visual Basic alkalmazásokhoz ablak.

2. A winodw fájlban kattintson a gombra betétlap > Modulok, majd másolja és illessze be a VBA kód alatt a modulba. Lásd a képernyőképet:

VBA kód: Számolja meg a szavakat a kiválasztott tartományban.

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. megnyomni a F5 gombot a kód futtatásához. A felbukkanóban Kutools az Excel számára párbeszédpanelen válassza ki azt a tartományt, amelyen belül megszámolja a szavak számát, majd kattintson a gombra OK gomb. Lásd a képernyőképet:

Akkor egy másik Kutools az Excel számára megjelenik a párbeszédpanel, amely megmutatja a kiválasztott tartományban lévő szavak teljes számát. Lásd a képernyőképet:

Számolja meg a szavak számát a Kutools for Excel alkalmazással (csak kattintások)

Ykipróbálhatja a Számoljon szavakat a tartományban a Kutools for Excel segédprogram a cellában vagy tartományban lévő szavak számának egyszerű számolásához, csak néhány kattintással.

1. Jelöljön ki egy cellát az eredmény visszaadásához, majd kattintson a gombra Kutools > Formula Segítő > Formula Segítő.

2. Ban,-ben Képletek segítője párbeszédpanelt, kérjük, konfigurálja az alábbiak szerint.

• Ban,-ben Válasszon képletet doboz, válassza ki Számolja meg az összes szót;
  tippek: Ellenőrizheti a Szűrő mezőbe írjon be egy kulcsszót a képlet gyors szűréséhez, amire szüksége van.
• Ban,-ben Választék mezőben adja meg azt a cellát vagy tartományt, amelyben az összes szót meg szeretné számolni;
• Kattintson az OK gomb. Lásd a képernyőképet:

Ezután megkapja a szavak számát egy megadott cellában vagy tartományban.

Könnyen megszámolhatja a szavak számát a Kutools for Excel alkalmazással

---

A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

• újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
• Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
• Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
• Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
• Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
• Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
• Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
• Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
• Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.

Tovább ... Ingyenes letöltés... Vásárlás... 

---

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját

• Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
• Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
• 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!

Tovább ... Ingyenes letöltés... Vásárlás...