Bagaimana cara menghitung jumlah kata dalam sel atau sel rentang di Excel?
Anda dapat dengan mudah menghitung jumlah kata di MS Word, tetapi Excel tidak memiliki alat bawaan untuk menghitung jumlah kata dalam lembar kerja. Namun, Anda bisa menghitung jumlah kata di Excel dengan metode berikut:
Hitung jumlah kata dengan rumus
Hitung jumlah kata dalam satu sel dengan User Defined Functions
Hitung jumlah kata dalam rentang tertentu dengan kode VBA
Mudah menghitung jumlah kata dengan Kutools for Excel (beberapa klik)
Hitung jumlah kata dengan rumus
Berikut adalah dua rumus bagi Anda untuk menghitung kata dalam satu sel dan dalam sel rentang.
Hitung kata dalam satu sel
Harap masukkan rumus ini =IF(LEN(TRIM(A2))=0,0,LEN(TRIM(A2))-LEN(SUBSTITUTE(A2," ",""))+1) ke dalam Formula Bar, lalu tekan Enter kunci.
Note: Dalam rumusnya, A2 adalah sel yang akan Anda hitung jumlah kata di dalamnya.
Anda dapat melihat hasilnya seperti gambar di bawah ini:
Hitung kata dalam satu rentang sel dengan rumus array
Jika Anda ingin menghitung kata dalam satu rentang sel, masukkan rumus =SUM(IF(LEN(TRIM(A2:A3))=0,0,LEN(TRIM(A2:A3))-LEN(SUBSTITUTE(A2:A3," ",""))+1)) ke dalam bilah rumus, lalu tekan perubahan + Ctrl + Enter kunci secara bersamaan untuk mendapatkan hasilnya. Lihat tangkapan layar:
Note: A2: A3 adalah rentang dengan kata-kata yang akan Anda hitung.
Hitung total kata dengan mudah dalam sel atau rentang sel di Excel:
Grafik Hitung Total Kata kegunaan Kutools for Excel dapat membantu Anda dengan cepat menghitung total kata dalam sel atau rentang sel di Excel seperti yang ditunjukkan demo di bawah ini.
Unduh dan coba sekarang! (30- jalur bebas hari)
Hitung jumlah kata dengan User Defined Functions
Selain itu, Anda dapat menghitung kata dalam sel dengan User Defined Functions, lakukan hal berikut:
1. tekan lain + F11 kunci bersama untuk membuka Microsoft Visual Basic untuk aplikasi jendela.
2. Di winodw, klik Menyisipkan > Modul, lalu salin dan tempel kode VBA di bawah ini ke dalam Modul. Lihat tangkapan layar:
Kode VBA: Hitung jumlah kata dalam sel.
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. tekan lain + Q kunci untuk menutup Microsoft Visual Basic untuk Aplikasi winodw. Pilih sel kosong di lembar kerja Anda, masukkan rumus "=intwordcount(A2)”Ke Formula Bar, lalu tekan Enter kunci untuk mendapatkan hasil. Lihat tangkapan layar:
Note: Dalam rumusnya, A2 adalah sel yang akan Anda hitung jumlah kata di dalamnya.
Jika Anda ingin menghitung jumlah kata dalam rentang tertentu, harap terapkan metode berikut.
Hitung jumlah kata dalam rentang tertentu dengan kode VBA
Kode VBA berikut dapat membantu Anda menghitung jumlah kata dengan cepat dalam rentang tertentu.
1. tekan lain + F11 kunci bersama untuk membuka Microsoft Visual Basic untuk aplikasi jendela.
2. Di winodw, klik Menyisipkan > Modul, lalu salin dan tempel kode VBA di bawah ini ke dalam Modul. Lihat tangkapan layar:
Kode VBA: Hitung jumlah kata dalam rentang yang dipilih.
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 Sub3. tekan F5 kunci untuk menjalankan kode. Dalam bermunculan Kutools for Excel kotak dialog, pilih rentang yang akan Anda hitung jumlah kata di dalamnya, lalu klik OK tombol. Lihat tangkapan layar:
Lalu lainnya Kutools for Excel kotak dialog muncul untuk menampilkan jumlah kata dalam rentang yang dipilih. Lihat tangkapan layar:
Hitung jumlah kata dengan Kutools for Excel (hanya klik)
YAnda dapat mencoba Hitung kata dalam jangkauan kegunaan Kutools for Excel untuk dengan mudah menghitung jumlah kata dalam sel atau rentang hanya dengan beberapa klik.
Sebelum melamar Kutools for Excel, Mohon unduh dan instal terlebih dahulu.
1. Pilih sel untuk mengembalikan hasilnya, lalu klik Kutools > Pembantu Formula > Pembantu Formula.
2. Dalam Rumus Pembantu kotak dialog, konfigurasikan sebagai berikut.
- Dalam majalah Pilih rumus kotak, pilih Hitung total kata;
Tips: Anda dapat memeriksa Filter kotak, masukkan kata kunci untuk memfilter rumus dengan cepat sesuai kebutuhan Anda. - Dalam majalah Jarak kotak, tentukan sel atau rentang di mana Anda ingin menghitung total kata;
- klik OK tombol. Lihat tangkapan layar:
Kemudian Anda akan mendapatkan jumlah kata dalam sel atau rentang tertentu.
Jika Anda ingin memiliki uji coba gratis (30-day) dari utilitas ini, silahkan klik untuk mendownloadnya, lalu lanjutkan untuk menerapkan operasi sesuai langkah di atas.
Mudah menghitung jumlah kata dengan Kutools for Excel
Kutools for Excel termasuk 300+ fitur canggih untuk Microsoft Excel. Bebas mencoba tanpa batasan dalam 30 hari. Unduh sekarang!
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Canggih untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Office Tab Menghadirkan antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
