كيف يمكنني إزالة التحيات من خلايا الأسماء في Excel؟
في أعمال المكتب اليومية أو مهام تنظيف البيانات، غالبًا ما تصادف قوائم Excel يسبق فيها اسم كل شخص تحية مثل «السيد» (Mr) أو «الآنسة» (Miss) أو «السيدة» (Mrs) وما إلى ذلك. ولأغراض مثل إعداد حملات تسويقية أو إنشاء تقارير أو حتى توحيد مجموعة البيانات الخاصة بك، قد تحتاج إلى إزالة هذه التحيات والاحتفاظ بالأسماء الفعلية فقط. على سبيل المثال، تحويلالسيد جون سميثإلىجون سميثعبر العمود بأكمله من البيانات. ويمكن أن يؤدي تنفيذ ذلك بكفاءة في Excel إلى توفير جهد يدوي هائل، خاصة عند التعامل مع مجموعات بيانات ضخمة أو عندما يكون تنسيق التحيات غير متسق.
إزالة التحيات من خلية الاسم صيغة
إزالة التحيات باستخدام ماكرو VBA بشكل جماعي
إزالة التحيات باستخدام ميزة الملء الفوري (Flash Fill) في Excel
فصل التحيات والأسماء إلى أعمدة منفصلة باستخدام الصيغ
إزالة التحيات من خلية الاسم صيغة
يُعد استخدام صيغة Excel وسيلة مباشرة لإزالة التحيات من خلايا الأسماء. وهي أكثر ملاءمة عندما تتبع جميع أسمائك نمطًا واحدًا، حيث تبدأ الخلية بالتحية متبوعة بمسافة ثم الاسم الكامل للشخص. هذه الطريقة سريعة ولا تحتاج إلى إضافات خارجية، وتؤدي بشكل ممتاز مع القوائم الصغيرة إلى المتوسطة الحجم. ومع ذلك، قد لا تتعامل بكفاءة مع الاختلافات الأكثر تعقيدًا، مثل التحيات المكونة من كلمتين أو التنسيقات غير المتسقة.
لإزالة التحية من خلية الاسم، اتبع الخطوات التالية:
1. في خلية فارغة مجاورة لقائمة الأسماء (افترض أن بياناتك تبدأ من الخلية A2)، أدخل الصيغة التالية:
=RIGHT(A2, LEN(A2) - FIND(" ",A2))تحدد هذه الصيغة أول مسافة في الخلية، ثم تستخرج كل النص الموجود على يمينها، مما يؤدي فعليًّا إلى إزالة التحية.
2. اضغط Enter لتأكيد الصيغة، ثم اسحب مقبض التعبئة (المربع الصغير في الزاوية اليمنى السفلية للخلية) لأسفل لتطبيق هذه الصيغة على جميع الخلايا في العمود حسب الحاجة.
نصائح واحتياطات:إذا كانت بعض الأسماء لا تحتوي على تحية (أي بدون مسافة بعدها)، فقد تُرجع الصيغة خطأً. لذا، ننصحك بالتحقق من بياناتك والتأكد من خلوها من التناقضات قبل تطبيق هذه الطريقة.
إزالة التحيات باستخدام ماكرو VBA بشكل جماعي
لمجموعات البيانات الكبيرة، أو في الحالات التي تكون فيها التحيات ذات تنسيقات غير متسقة أو بأطوال مختلفة، يُعد استخدام ماكرو VBA حلاً فعّالًا. فباستخدام VBA، يمكنك إزالة أنواع متعددة من التحيات دفعة واحدة—وهو أمر مثالي لتنظيف قوائم البريد الإلكتروني الضخمة، أو قواعد بيانات الموارد البشرية، أو أي سيناريو تصبح فيه الصيغ اليدوية غير عملية.
فيما يلي نموذج لبرنامج VBA يزيل من بداية كل اسم في النطاق المحدد قائمةً من الألقاب الشائعة (مثل Mr وMs وMrs وDr وProf وMiss). ويمكنك بسهولة توسيع هذه القائمة لإضافة ألقابٍ إضافية حسب الحاجة.
1. انقر على علامة التبويبالمطور (Developer) > Visual Basic لفتحمحرر VBA. في محرر VBA، انتقل إلىإدراج (Insert) > وحدة نمطية (Module)، والصق الكود التالي في نافذة الوحدة النمطية:
Sub RemoveSalutationBulk()
Dim WorkRng As Range
Dim Rng As Range
Dim cellValue As String
Dim arrSalutations As Variant
Dim i As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Select the range to remove salutations from:", xTitleId, WorkRng.Address, Type:=8)
arrSalutations = Array("Mr. ", "Mr ", "Mrs. ", "Mrs ", "Ms. ", "Ms ", "Miss ", "Dr. ", "Dr ", "Prof. ", "Prof ")
For Each Rng In WorkRng
cellValue = Rng.Value
For i = LBound(arrSalutations) To UBound(arrSalutations)
If InStr(1, cellValue, arrSalutations(i), vbTextCompare) = 1 Then
cellValue = Mid(cellValue, Len(arrSalutations(i)) + 1)
Exit For
End If
Next i
Rng.Value = cellValue
Next Rng
End Sub2. اضغط على زرF5 أو انقر على زر
تشغيل (Run)لتنفيذ الكود. ستظهر نافذة منبثقة تطلب منك تحديد النطاق الذي يحتوي على الأسماء التي تريد معالجتها—فقط حدد الخلايا المناسبة، ثم انقر علىموافق (OK).
ملاحظة:سيقوم هذا الماكرو بإزالة التحيات الموجودة في بداية الخلية فقط، بغض النظر عن حالة الأحرف (كبيرة أو صغيرة). إذا كنت تستخدم أسماءً تتضمن ألقابًا غير شائعة، يمكنك إضافتها إلى مصفوفةarrSalutations في الكود. واحرص دائمًا على عمل نسخة احتياطية من بياناتك قبل تنفيذ أي عمليات دفعية باستخدام VBA لتجنب التغييرات غير المرغوب فيها.
إزالة التحيات باستخدام ميزة الملء الفوري (Flash Fill) في Excel
ابتداءً من Excel 2013، تُسهّل ميزة الملء الفوري (Flash Fill) إزالة التحيات من خلال التعرّف على أنماط البيانات وتطبيقها تلقائيًّا. إنها طريقة سريعة وبديهية — خاصةً للمستخدمين الذين يفضّلون حلاً بصريًّا تفاعليًّا ولديهم بيانات منظمة نسبيًّا. وهي مثالية عندما تكون مجموعة البيانات ليست ضخمة جدًّا ويوجد نمط واضح ومتكرر بين التحية وبقية الاسم. ومع ذلك، قد لا تؤدّي النتائج المرجوّة في الحالات التي تكون فيها البيانات غير منتظمة للغاية أو عند وجود تناقضات.
1. أنشئ عمودًا جديدًا بجانب أسمائك. في الخلية المجاورة لأول خلية بيانات (على سبيل المثال، إذا كانت A2 تحتوي على «السيد جون سميث»، فأدخل في B2 «جون سميث»—بعد حذف التحية).
2. ابدأ بإدخال القيمة التالية في الخلية B3. بمجرد أن يتعرّف Excel على النمط (عادةً بعد إدخال قيمتين إلى ثلاث)، سيقترح تعبئة باقي الخلايا في العمود تلقائيًا بناءً على مثالك.
3. ما عليك سوى الضغط على زرEnter لقبول الاقتراحات، وسيقوم الملء الفوري (Flash Fill) تلقائيًا بإكمال باقي العمود وإزالة التحيات نيابةً عنك.
إذا لم تظهر ميزة الملء الفوري تلقائيًا، يمكنك تفعيلها يدويًّا: انقر على الخلية الموجودة مباشرةً أسفل آخر إدخال لك، ثم اختر من شريط الأدواتبيانات (Data) > الملء الفوري (Flash Fill)، أو استخدم اختصارCtrl+E.
نصائح:قد تكون ميزة الملء الفوري (Flash Fill) حساسة للتناقضات. تأكد من مراجعة النتائج مرتين بحثًا عن الأخطاء، خاصةً إذا لم تتوافق بعض الأسماء مع النمط المتوقع. وتجدر الإشارة إلى أن هذه الميزة لا تُحدَّث تلقائيًا؛ لذا إذا تغيَّرت أسماؤك الأصلية، فستحتاج إلى إعادة تنفيذ عملية الملء الفوري.
المزايا:لا حاجة لحفظ الصيغ، وواجهة بصرية سهلة، وسرعة فائقة في التعامل مع القوائم ذات الأنماط الواضحة.
القيود:غير مناسبة لمجموعات البيانات الكبيرة جدًّا أو الأنماط غير المنتظمة، ومتوفرة فقط في إصدار Excel 2013 أو أحدث.
فصل التحيات والأسماء إلى أعمدة منفصلة باستخدام الصيغ
إذا كنت ترغب في فصل التحية عن بقية الاسم إلى عمودين منفصلين—بدلًا من مجرد حذف التحية—فيمكنك الاستعانة بصيغ Excel لتحقيق ذلك بسهولة. وتُعد هذه الطريقة مثالية عندما تحتاج إلى الاحتفاظ بالتحية لأغراض إعداد التقارير أو الاستخدامات الأخرى، مثل تخصيص المراسلات أو التقسيم حسب اللقب. وتعمل الصيغ بكفاءة أعلى مع البيانات التي تتبع نمطًا ثابتًا باستخدام محدد واحد دائم (مثل المسافة) بين التحية والاسم.
1. لاستخراج التحية، أدخل الصيغة التالية في خلية فارغة (مثل C2 إذا كانت أسماؤك في العمود A):
=LEFT(A2, FIND(" ",A2)-1)تستخرج هذه الصيغة النص الموجود يسار أول مسافة، مما يعزل التحية بفعالية.
اسحب مقبض التعبئة لأسفل لنسخ الصيغة إلى الصفوف الأخرى حسب الحاجة، وستظهر جميع التحيات في العمود الجديد.
2. لاستخراج الاسم فقط، أدخل هذه الصيغة في العمود الفارغ التالي (على سبيل المثال، D2):
=MID(A2, FIND(" ",A2)+1,1024)تسترجع هذه الصيغة كل النص الموجود بعد أول مسافة، أي الاسم الفعلي. ومرة أخرى، اسحب مقبض التعبئة لأسفل لتعبئة باقي الصفوف.
نصائح:يمكنك تعديل مراجع الأعمدة (مثل A2) في الصيغ لتتناسب مع الموقع الفعلي لبياناتك. كن حذرًا إذا كان حقل الاسم فارغًا أو لا يتوافق مع التنسيق المتوقع، فقد يؤدي ذلك إلى أخطاء في الصيغ.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل