كيف يمكنك حساب عدد مرات ظهور كلمة أو قيمة معينة في Excel؟

في مهام Excel اليومية، من الشائع أن تواجه حالات تتطلب تحديد عدد مرات ظهور كلمة أو قيمة معيّنة داخل خلية واحدة أو عبر نطاق من الخلايا. فربما تريد التحقق من مدى تكرار استخدام كلمة رئيسية في بيانات نصية، أو عدّ مرات ظهور عنصر معين ضمن مجموعة بيانات، أو ببساطة تحليل اتساق المحتوى. ويمكن أن يساعدك حساب عدد مرات الظهور بدقة في التحقق من صحة البيانات، وتحليل النصوص، وإجراء فحوصات الجرد، ومعالجة نتائج الاستبيانات، وأكثر من ذلك بكثير. يقدم هذا المقال عدة طرق عملية لعدّ مرات ظهور الكلمات أو القيم في Excel، ليُسهّل عليك اختيار الأنسب منها لمتطلبات عملك الفعلية.

عدّ عدد مرات ظهور كلمة/قيمة في خلية واحدة أو نطاق باستخدام الصيغ
عدّ عدد مرات ظهور كلمة/قيمة في خلية واحدة أو نطاق بسهولة باستخدام أداة مذهلة
عدّ مرات الظهور باستخدام ماكرو VBA (طريقة ماكرو مخصصة)
عدّ مرات الظهور باستخدام صيغ COUNTIF أو SUMPRODUCT (تطابقات غير حساسة لحالة الأحرف/تطابقات جزئية)
عدّ مرات الظهور باستخدام جدول بيانات محوري في Excel (تلخيص عبر النطاقات)

عدّ عدد مرات ظهور كلمة/قيمة في خلية واحدة أو نطاق باستخدام الصيغ

يمكنك تطبيق الصيغة التالية لعدّ عدد مرات ظهور كلمة أو قيمة محددة في خلية واحدة أو في نطاق معرّف، وهو حلٌ مثالي عندما تبحث عن نتيجة سريعة ومباشرة دون الحاجة إلى أدوات أو ماكرو إضافية.

لعَدّ عدد مرات ظهور كلمة فيخلية واحدة، حدد خلية فارغة لعرض النتيجة، وأدخل الصيغة أدناه، ثم اضغط علىEnter:

=SUMPRODUCT((LEN(A2)-LEN(SUBSTITUTE(A2,D1,«»)))/LEN(D1))

إذا كنت تريد عدّ عدد مرات ظهور كلمة عبرنطاق من الخلايا، فعدّل الصيغة بحيث تشير إلى النطاق بأكمله. أدخلها في خلية فارغة كما يلي:

=SUMPRODUCT((LEN(A2:A15)-LEN(SUBSTITUTE(A2:A15,D1,«»)))/LEN(D1))

ملاحظات:

عدّ عدد مرات ظهور كلمة/قيمة في خلية واحدة أو نطاق باستخدام Kutools لـ Excel

ميزةعدد الكلمات في نصفيKutools لـ Excelتتيح لك حساب عدد مرات ظهور أي كلمة أو قيمة داخل خلية أو نطاق معرّف على الفور. وتُبسّط هذه الميزة عملية العد بشكل كبير للمستخدمين الذين يفضلون تجنّب التعامل مع الصيغ أو أكواد VBA، مما يعزز الكفاءة والدقة في تنفيذ المهام المتكررة وسيناريوهات تحليل البيانات الواسعة النطاق.

1. حدد خلية فارغة للإخراج، ثم انتقل إلىKutools > مساعد الصيغة > مساعد الصيغة.

2. في مربع الحوارمساعد الصيغة، اتبع الخطوات التالية للتهيئة:

سترى على الفور العدد الإجمالي لمرات ظهور الكلمة المستهدفة داخل الخلية أو النطاق المحدد.

عدّ مرات الظهور باستخدام ماكرو VBA (طريقة ماكرو مخصصة)

بالنسبة للمستخدمين الذين يحتاجون إلى خيارات عد أكثر مرونة أو تقدمًا—مثل عد تطابقات الكلمات الكاملة فقط، أو التبديل بين العد الحساس وغير الحساس لحالة الأحرف، أو أتمتة العملية عبر مجموعات بيانات كبيرة—يُعد الحل القائم على ماكرو VBA خيارًا عمليًا. فهو يتيح لك تخصيص وضع المطابقة، مما يوفّر الوقت ويحسّن الاتساق عبر العمليات المتكررة.

السيناريو المناسب: عندما تحتاج إلى عدّ مخصص—مثل تجاهل حالة الأحرف أو مطابقة الكلمات الكاملة فقط—أو عندما تريد أتمتة عملية العد كجزء من سير عملك.

احتياطات: احفظ دائمًا نسخةً احتياطيةً من ملفاتك قبل تشغيل الماكرو، ولا تفعّله إلا من مصادر موثوقة.

1. افتح محرر VBA بالنقر علىأدوات المطور > Visual Basic. في نافذة VBA، انقر علىإدراج > وحدة نمطية، والصق الكود التالي في الوحدة النمطية:

Sub CountOccurrencesOfWord()
    Dim rng As Range
    Dim wordToCount As String
    Dim caseSensitive As Integer
    Dim wholeWordOnly As Integer
    Dim totalCount As Long
    Dim cell As Range
    Dim cellText As String
    Dim i As Integer
    
    On Error Resume Next
    
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select the range to count:", "KutoolsforExcel", rng.Address, Type:=8)
    
    wordToCount = Application.InputBox("Enter the word or value to count:", "KutoolsforExcel", "", Type:=2)
    
    caseSensitive = MsgBox("Enable case sensitive count? (OK = Yes, Cancel = No)", vbOKCancel, "KutoolsforExcel")
    
    wholeWordOnly = MsgBox("Count whole words only? (OK = Yes, Cancel = No)", vbOKCancel, "KutoolsforExcel")
    
    totalCount = 0
    
    For Each cell In rng
        cellText = cell.Value
        
        If Not IsError(cellText) And Len(cellText) > 0 Then
            If wholeWordOnly = vbOK Then
                Dim regEx As Object
                Set regEx = CreateObject("VBScript.RegExp")
                
                regEx.Pattern = "\b" & wordToCount & "\b"
                regEx.Global = True
                regEx.IgnoreCase = (caseSensitive <> vbOK)
                
                If regEx.Test(cellText) Then
                    totalCount = totalCount + regEx.Execute(cellText).Count
                End If
            Else
                If caseSensitive = vbOK Then
                    i = (Len(cellText) - Len(Replace(cellText, wordToCount, ""))) / Len(wordToCount)
                Else
                    i = (Len(LCase(cellText)) - Len(Replace(LCase(cellText), LCase(wordToCount), ""))) / Len(wordToCount)
                End If
                
                totalCount = totalCount + i
            End If
        End If
    Next cell
    
    MsgBox "Total occurrences: " & totalCount, vbInformation, "KutoolsforExcel"
End Sub

2.بعد إدخال الكود، انقر على زرالتشغيل. سيعرض لك مربع حوار يطلب منك تحديد النطاق الذي تريد العد فيه، ثم يمكّنك من تحديد الكلمة أو القيمة المستهدفة، واختيار ما إذا كنت تريد عدًّا حساسًا لحالة الأحرف و/أو عد تطابقات الكلمات الكاملة فقط.

نصائح:

• إذا اخترت «عد الكلمات الكاملة فقط»، فلن تُحتسب التطابقات الجزئية (مثل «he» داخل «the»).
• استخدم الوضع غير الحساس لحالة الأحرف لإجراء استطلاعات أو تحليلات عامة أكثر دقة على بيانات تحتوي على حالات أحرف مختلطة.
• يتجاهل الماكرو الخلايا الفارغة أو تلك التي تحتوي على أخطاء أثناء عملية الحساب.

استكشاف الأخطاء وإصلاحها: إذا واجهت أخطاءً أثناء التشغيل، تأكد من خلو بياناتك من أخطاء في الصيغ أو قيم فارغة. وإذا كان برنامج Excel يمنع الماكرو، فقم بتمكينه من إعدادات مركز الثقة.

اقتراح موجز: تُعدّ طريقة VBA هذه مثاليةً خصوصًا للحالات التي لا تستطيع الصيغ القياسية تلبيتها، ويمكن توسيعها بسهولة لتشمل قواعد مطابقة أكثر تعقيدًا أو عمليات معالجة دفعية متكررة.

عدّ مرات الظهور باستخدام صيغ COUNTIF أو SUMPRODUCT (تطابقات غير حساسة لحالة الأحرف/تطابقات جزئية)

يوفّر Excel مجموعةً من الصيغ المرنة لعدّ التطابقات الدقيقة والجزئية، وهي مثالية عندما تبحث عن حلٍّ آليٍّ سريع وسهل التعديل—خاصةً مع قوائم القيم، أو بيانات الاستبيانات، أو عند تصفية حالات معيّنة داخل جدول أو عمود كامل.

صيغة COUNTIF: عدّ التطابقات الدقيقة غير الحساسة لحالة الأحرف

إذا كنت تريد عدّ عدد الخلايا في نطاق تطابق كلمة أو قيمة (بغض النظر عن حالة الأحرف)، فأدخل الصيغة أدناه في خلية فارغة (مثل E1):

=COUNTIF(A2:A15, D1)

تحسب هذه الصيغة عدد الخلايا في النطاق A2:A15 التي تحتوي على القيمة نفسها الموجودة في الخلية D1 تمامًا، دون تمييز بين الأحرف الكبيرة والصغيرة (فـ «Apple» و«apple» تُحتسبان كقيمة واحدة). بعد إدخال الصيغة، اضغط على Enter، ويمكنك سحب مقبض التعبئة لنسخها إلى صفوف أخرى عند الحاجة.

COUNTIF مع تطابق جزئي (باستخدام الرموز النائبة)

لعَدّ عدد الخلايا التي تحتوي على كلمة محددة في أي مكان داخل الخلية (وليس التطابقات الدقيقة فقط)، عدّل صيغة COUNTIF كما يلي وأدخلها في خلية فارغة:

=COUNTIF(A2:A15, "*" & D1 & "*")

تحسب هذه النسخة عدد الخلايا التي يظهر فيها محتوى الخلية D1 في أي مكان داخلها، مع تجاهل حالة الأحرف. وهي مفيدة لتحليل ردود الاستبيانات، وأكواد المنتجات، أو أجزاء النصوص.

عدّ التكرارات باستخدام Excel جدول بيانات محوري (تلخيص عبر نطاقات)

تتميّز الجداول المحورية المضمنة في Excel بفعاليتها الاستثنائية في تلخيص البيانات وحساب عدد مرات ظهور قيم أو كلمات معيّنة ضمن قائمة أو جدول، خاصةً عند التعامل مع بيانات منظمة مثل القوائم أو سجلاّت المعاملات أو ردود الاستبيانات. فهي توفر تجميعًا ديناميكيًّا وعدًّا متعدد المعايير، مما يجعلها خيارًا عمليًّا لتحليل البيانات دون الحاجة إلى كتابة أي صيغ أو أكواد.

شرح القيمة: مثالي لتلخيص الجداول الكبيرة، وتحديد التكرارات في إجابات الاستبيانات، وتجميع الأسماء المكرَّرة، أو تحليل عدد عناصر المخزون.

المزايا: لا حاجة إلى الصيغ، واجهة بصرية تفاعلية، وتحديثات فورية بمجرد إدخال بيانات جديدة.
العيوب: أقل ملاءمة للعد داخل خلية واحدة أو عند التعامل مع محتوى نصي غير منظم؛ فهي الأنسب للعد حسب القيم في الأعمدة.

خطوات استخدام جدول بيانات محوري لعدّ تكرارات القيم:

• حدد نطاق بياناتك (مثل A1:A100 أو الجدول بأكمله).
• انتقل إلى علامة التبويبإدراج، ثم انقر علىجدول محوري.
• حدد مكان إدراج الجدول المحوري (في ورقة عمل جديدة أو ورقة عمل موجودة)، ثم انقر على «موافق».
• اسحب العمود ذا الصلة (الذي يحتوي على النصوص أو القيم التي تريد عدها) إلى كلٍ من منطقةالصفوفومنطقةالقيمفي قائمة الحقول. وسيقوم الجدول المحوري تلقائيًا بعدد مرات ظهور كل قيمة فريدة.

يمكنك بعد ذلك تحديث جدول النتائج في أي وقت تتغيّر فيه البيانات الأصلية، مما يضمن حصولك على عدٍّ دقيق بأقل جهد ممكن.

نصائح:

• يمكنك تصفية القيم مباشرةً داخل الجدول المحوري للحصول على ملخصات أكثر دقة.
• للحصول على تفصيل دقيق حسب حقول متعددة (مثل العد حسب الكلمة والفئة)، ما عليك سوى إضافة المزيد من الحقول إلى منطقة الصفوف أو الأعمدة.

استكشاف الأخطاء وإصلاحها: إذا لم يُحدَّث الجدول المحوري بعد تغيير البيانات الأصلية، فانقر بزر الماوس الأيمن في أي مكان داخل الجدول المحوري واختر «تحديث». وإذا لم تظهر قائمة الحقول، فانقر على «قائمة الحقول» في تبويب تحليل الجدول المحوري.

مقالات ذات صلة

أفضل أدوات الإنتاجية لمكتبتك

🤖	KUTOOLS AI مساعد: ثوّر تحليل البيانات استنادًا إلى:التنفيذ الذكي   |  إنشاء الكود|  إنشاء الصيغ المخصصة  |  تحليل البيانات وإنشاء المخططات البيانية|  استدعاء الوظائف المحسنة…
	الميزات الشائعة:البحث، التمييز أو وضع علامة على المكررات   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |  التقريب بدون استخدام الصيغة...
	بحث متقدم:VLookup متعدد المعايير  |  VLookup متعدد القيم  |   VLookup عبر أوراق متعددة   |   مطابقة غامضة....
	قائمة منسدلة متقدمة:إنشاء قائمة منسدلة بسرعة   |  قائمة منسدلة تابعة   |  قائمة منسدلة متعددة الاختيار....
	مدير الأعمدة:إضافة عدد محدد من الأعمدة|نقل الأعمدة|تبديل حالة ظهور الأعمدة المخفية|مقارنة النطاقات والأعمدة...
	ميزات مميزة:التركيز على الشبكة   |  عرض التصميم   |شريط الصيغ المحسن   | مدير الدفتر والورقة   |  مكتبة الموارد(نص تلقائي)|  أداة اختيار التاريخ   |  تجميع ورقات العمل  |  تشفير/فك تشفير الخلايا   | إرسال رسائل البريد الإلكتروني حسب القائمة   |  مرشح متقدم   |   تصفية خاصة(تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
	أفضل 15 مجموعات الأدوات:12 أدواتالنصوص(إضافة نص،حذف الأحرف المحددة، ...)|   50+أنواعالمخططات البيانية(مخطط جانت، ...)|   40+ صيغعملية(حساب العمر بناءً على تاريخ الميلاد، ...)|   19 أدواتالإدراج(إدراج رمز QR،إدراج صورة من المسار، ...)|   12 أدواتالتحويل(تحويل إلى كلمات،تحويل العملة، ...)|   7 أدواتدمج وتقسيم(دمج متقدم للصفوف،تقسيم الخلايا، ...)|... وأكثر من ذلك

استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...

مزيد من التفاصيل حول Kutools لـ Excel...تنزيل مجاني...

---

يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير

• تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
• افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
• يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!

مزيد من التفاصيل حول Office Tab...تنزيل مجاني...

---

جميع الإضافات من Kutools في برنامج تثبيت واحد!

Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.

• حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
• برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
• يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
• تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
• أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل

مزيد من التفاصيل حول Kutools for Office...تنزيل مجاني...