كيفية استخراج قيم فريدة من أعمدة متعددة في إكسيل؟

لنفترض أن لديك عدة أعمدة بقيم متعددة ، فإن بعض القيم مكررة في نفس العمود أو عمود مختلف. والآن تريد العثور على القيم الموجودة في أي من العمودين مرة واحدة فقط. هل هناك أي حيل سريعة يمكنك اتباعها لاستخراج قيم فريدة من عدة أعمدة في Excel؟

• استخراج قيم فريدة من أعمدة متعددة باستخدام صيغة صفيف
• استخراج قيم فريدة من أعمدة متعددة باستخدام Pivot Table
• استخرج القيم الفريدة من أعمدة متعددة برمز VBA
• استخرج قيمًا فريدة من عمود واحد بميزة مذهلة

استخراج قيم فريدة من أعمدة متعددة باستخدام صيغة صفيف

فيما يلي صيغة صفيف يمكن أن تساعدك أيضًا في استخراج القيم الفريدة من أعمدة متعددة.

1. بافتراض القيم الخاصة بك في النطاق أكسنومك: كسنومكس، الرجاء إدخال الصيغة التالية في الخلية E2:

2. ثم اضغط Shift + Ctrl + Enter معًا ، ثم اسحب مقبض التعبئة لاستخراج القيم الفريدة حتى تظهر الخلايا الفارغة. انظر لقطة الشاشة:

استخراج قيم فريدة من أعمدة متعددة باستخدام Pivot Table

إذا كنت معتادًا على الجدول المحوري ، يمكنك بسهولة استخراج القيم الفريدة من عدة أعمدة باتباع الخطوات التالية:

1. في البداية ، يرجى إدخال عمود فارغ جديد على يسار بياناتك ، في هذا المثال ، سأدرج العمود A بجانب البيانات الأصلية.

2. انقر فوق خلية واحدة في البيانات الخاصة بك ، واضغط على ألت + D مفاتيح ، ثم اضغط P مفتاح على الفور لفتح معالج PivotTable و PivotChart، اختر نطاقات التوحيد المتعددة في المعالج الخطوة 1 ، انظر الصورة:

3. ثم اضغط التالى زر ، تحقق قم بإنشاء حقل صفحة واحد لي الخيار في المعالج الخطوة 2 ، انظر الصورة:

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

5. بعد تحديد نطاق البيانات ، تابع النقر فوق التالى، في خطوة المعالج 3 ، اختر المكان الذي تريد وضع تقرير PivotTable فيه كما تريد.

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

7. ثم تحقق من الحقل القيمة أو اسحب القيمة إلى الصفوف التسمية ، ستحصل الآن على القيم الفريدة من الأعمدة المتعددة على النحو التالي:

استخرج القيم الفريدة من أعمدة متعددة برمز VBA

باستخدام رمز VBA التالي ، يمكنك أيضًا استخراج القيم الفريدة من أعمدة متعددة.

1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

2. انقر إدراج > وحدة، والصق التعليمة البرمجية التالية في نافذة الوحدة النمطية.

فبا: استخراج قيم فريدة من أعمدة متعددة

Sub Uniquedata()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
Set dt = CreateObject("Scripting.Dictionary")
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
For Each rng In InputRng
    If rng.Value <> "" Then
        dt(rng.Value) = ""
    End If
Next
OutRng.Range("A1").Resize(dt.Count) = Application.WorksheetFunction.Transpose(dt.Keys)
End Sub

3. ثم اضغط F5 لتشغيل هذا الرمز ، وسيظهر مربع موجه لتذكيرك بتحديد نطاق البيانات الذي تريد استخدامه. انظر لقطة الشاشة:

4. ثم انقر فوق OK، سيظهر مربع موجه آخر للسماح لك باختيار مكان لوضع النتيجة ، انظر لقطة الشاشة:

5. انقر OK لإغلاق مربع الحوار هذا ، وقد تم استخراج جميع القيم الفريدة مرة واحدة.

استخرج قيمًا فريدة من عمود واحد بميزة مذهلة

في بعض الأحيان ، تحتاج إلى استخراج القيم الفريدة من عمود واحد ، فالطرق المذكورة أعلاه لن تساعدك ، هنا ، يمكنني أن أوصي بأداة مفيدة-كوتولس ل إكسيل، بما لديها استخراج الخلايا بقيم فريدة (تضمين أول تكرار) فائدة ، يمكنك استخراج القيم الفريدة بسرعة.

بعد تثبيت كوتولس ل إكسيل، يرجى القيام بذلك على النحو التالي:

1. انقر فوق الخلية حيث تريد إخراج النتيجة. (ملاحظة: لا تنقر فوق خلية في الصف الأول.)

2. ثم اضغط كوتولس > مساعد الصيغة > مساعد الصيغة، انظر لقطة الشاشة:

3. في مساعد الصيغ مربع الحوار ، يرجى القيام بالعمليات التالية:

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

4. ثم اضغط Ok ، واسحب مقبض التعبئة إلى الخلايا التي تريد سرد جميع القيم الفريدة حتى يتم عرض الخلايا الفارغة ، انظر الصورة:

تحميل مجاني Kutools لبرنامج Excel الآن!

المزيد من المقالات ذات الصلة:

---

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

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

• إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
• سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
• دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
• حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
• نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
• استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
• سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
• اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
• أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.

اقرأ أكثر... تحميل مجاني ... شراء... 

---

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

• تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
• فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
• يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!

اقرأ أكثر... تحميل مجاني ... شراء...