KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

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

المؤلفصنتاريخ التعديل

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

لقطة شاشة تُظهر مجموعة بيانات تحتوي على قيم مكررة وعدد القيم في أول حالة


عدّ أول ظهور للعناصر باستخدام صيغة

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

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

للبدء، اتبع الخطوات التالية:

1. حدد خلية فارغة بجانب أول قيمة في مجموعة البيانات الخاصة بك (على سبيل المثال، إذا كانت بياناتك في A1:A10، فاختر الخلية B1)، ثم أدخل الصيغة التالية:

=(COUNTIF($A$1:$A1,$A1)=1)+0

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

لقطة شاشة تُظهر تطبيق صيغة لحساب عدد الحالات الأولى
سهم
لقطة شاشة تُظهر نتيجة صيغة حساب الحالات الأولى

تلميح:في هذه الصيغة، يشير$A$1 إلى أول خلية في نطاق بياناتك (غيّرها حسب الحاجة)، ويشير$A1 إلى الصف الحالي. إذا لم تبدأ بياناتك في الخلية A1، فعدّل المراجع وفقًا لذلك. ويضمن الجمع بين المراجع المطلقة والنسبية سلوك العد الصحيح عند نسخ الصيغة لأسفل.

2. لحساب العدد الإجمالي لأول الظواهر، حدد خلية فارغة أخرى (مثل الخلية الموجودة أسفل عمود الصيغة الجديد) وأدخل:

=SUM(B1:B10)

اضغطEnter لإرجاع العدد. يجب أن يتطابق النطاق B1:B10 مع الخلايا التي أدخلت فيها الصيغة السابقة. عدِّل مراجع الخلايا إذا كان طول بياناتك مختلفًا أو كانت الصيغة في عمود آخر.

لقطة شاشة تُظهر صيغة SUM لحساب عدد الحالات الأولى في Excelسهم يمينلقطة شاشة تُظهر نتيجة حساب الحالات الأولى

ملاحظات إضافية:توفر هذه الصيغة عدًّا يتجدد تلقائيًا في الوقت الفعلي عند تغيير القيم أو إضافتها أو حذفها. انتبه إلى أن نطاقات الصيغ قد تحتاج إلى التوسيع إذا تغيّر نطاق بياناتك (مثلما يحدث عند إدراج صفوف جديدة). فكّر في تحويل بياناتك إلىجدول Excelلنشر الصيغة تلقائيًا.


عدّ أول ظهور للعناصر باستخدام Kutools لـ Excel

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

Kutools لـ Excel،مزوَّد بالذكاء الاصطناعي🤖، ويقدّم أكثر من 300 ميزة مفيدة لتبسيط مهامك.

بعدتثبيتKutools لـ Excel مجانًا، يُرجى المتابعة كما يلي:

1. حدد جميع الخلايا في النطاق الذي تريد عدّ أول ظهور فيه (مثلًا، A1:A10)، ثم انقرKutools > تحديد > تحديد الخلايا المكررة/الفريدةفي الشريط. راجع لقطة الشاشة أدناه:

لقطة شاشة تُظهر خيار تحديد الخلايا المكررة والفريدة (Select Duplicate & Unique Cells) ضمن تبويب Kutools في الشريط

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

لقطة شاشة لمربع حوار تحديد الخلايا المكررة والفريدة (Select Duplicate & Unique Cells)

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

لقطة شاشة تُظهر مربع حوار النتيجة مع عدد الحالة الأولى

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

السيناريوهات المناسبة والتحذيرات:تُعد طريقة Kutools مثالية جدًّا للمستخدمين الذين يتعاملون بانتظام مع جداول بيانات ضخمة أو يحتاجون إلى تمييز النتائج فورًا، إذ تجنّب أخطاء الصيغ وتقلل الاعتماد على الإدخال اليدوي. ومع ذلك، فهي تتطلب تثبيت إضافة Kutools على جهازك. لضمان دقة النتائج، تأكد من مراجعة خلايا التحديد قبل تشغيل الأداة. وإذا رغبت في التراجع عن التمييز، يمكنك ببساطة استخدام وظيفة التراجع في Excel (Ctrl + Z).


عدّ أول ظهور للعناصر باستخدام ماكرو كود VBA

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

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

1. في Excel، انقرأدوات المطور > Visual Basic. عندما تظهر نافذةMicrosoft Visual Basic for Applications، انتقل إلىإدراج > وحدة نمطية، والصق الكود التالي في نافذة الوحدة النمطية:

Sub CountFirstInstances()
    Dim rng As Range
    Dim dict As Object
    Dim cell As Range
    Dim firstInstanceCount As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select the range to count first instances:", xTitleId, rng.Address, Type:=8)
    
    Set dict = CreateObject("Scripting.Dictionary")
    firstInstanceCount = 0
    
    For Each cell In rng
        If Not dict.exists(cell.Value) Then
            dict.Add cell.Value, 1
            firstInstanceCount = firstInstanceCount + 1
        End If
    Next cell
    
    MsgBox "The number of first instances in the selected range is: " & firstInstanceCount, vbInformation, "First Instance Count"
End Sub

2. بعد لصق الكود، انقر على زرزر التشغيل (تشغيل) أو اضغطF5 لتنفيذ الماكرو. عند ظهور المطالبة، حدد النطاق الذي ترغب في تحليله (مثلًا: A1:A10)، ثم اضغطموافق. وسيظهر مربع حوار يعرض عدد أول الظواهر (أي القيم الفريدة وأول ظهور لكل قيمة مكررة) في نطاق التحديد الخاص بك.

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

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

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


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

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

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

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


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

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

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

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

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