كيفية التحقق مما إذا كانت الخلية تبدأ أو تنتهي بحرف محدد في Excel؟
عند إدارة البيانات في Excel، قد تواجه مواقف تحتاج فيها إلى التحقق مما إذا كانت بعض الخلايا تبدأ أو تنتهي بحرف معين. على سبيل المثال، قد ترغب في تحديد جميع رموز المنتجات التي تبدأ بـ "s" أو جميع عناوين البريد الإلكتروني التي تنتهي بـ "n". هذا النوع من الفحص شائع في تنظيف البيانات، وتصفية القوائم، ولإعداد التنسيق التلقائي أو قواعد الاختيار. بناءً على تعقيد المهمة وتفضيلات سير العمل لديك، هناك عدة طرق عملية لتحقيق ذلك.
التحقق مما إذا كانت الخلية تبدأ أو تنتهي بحرف محدد باستخدام صيغة
التحقق مما إذا كانت الخلية تبدأ أو تنتهي بحرف محدد باستخدام Kutools لـ Excel
تسليط الضوء بصريًا على الخلايا إذا كانت تبدأ أو تنتهي بحرف محدد باستخدام التنسيق الشرطي
التحقق مما إذا كانت الخلية تبدأ أو تنتهي بحرف محدد باستخدام كود VBA
التحقق مما إذا كانت الخلية تبدأ أو تنتهي بحرف محدد باستخدام صيغة
لنفترض أن لديك قائمة طويلة من القيم وتحتاج إلى تحديد سريع ما إذا كانت كل واحدة منها تبدأ أو تنتهي بحرف معين. توفر صيغ Excel نهجًا مباشرًا ومرونة لهذا الحاجة دون استخدام أدوات إضافية أو إضافات. هذا الحل قابل للتكيف بشكل كبير لمجموعات البيانات الكبيرة، خاصة عند الحاجة إلى فحص YES/NO فوري قائم على الأعمدة لمزيد من التحليل أو التقارير أو قواعد التحقق.
على سبيل المثال، تريد التحقق مما إذا كانت الخلية تبدأ بالحرف “s”، أو تنتهي بالحرف “n”. إليك الصيغ التي يمكنك استخدامها:
1. حدد خلية فارغة (مثل B2) بجانب بياناتك لعرض نتيجة الفحص، أدخل الصيغة التالية في شريط الصيغة، ثم اضغط على مفتاح Enter:
=IF(LEFT(TRIM(A2),1)="s","OK","Not OK")
الصيغة تقوم بقص المسافات الزائدة قبل وبعد A2 والتحقق مما إذا كان الحرف الأول هو "s". إذا تطابق، فإنها تُرجع موافق؛ وإلا تُرجع غير موافق.
2. استمر في تحديد الخلية B2، ثم اسحب مقبض التعبئة لأسفل لنسخ الصيغة لبقية قائمتك. سيسمح لك هذا بفحص كل خلية ذات صلة في النطاق الذي اخترته.
ملاحظات ونصائح:
=IF(RIGHT(TRIM(A2),1)="n","OK","Not OK")
بشكل عام، استخدام الصيغ يكون سريعًا وسهلًا عندما تريد الحصول على النتائج مباشرة في الخلايا لترتيب، تصفيتها، أو إجراء المزيد من الحسابات.
التحقق مما إذا كانت الخلية تبدأ أو تنتهي بحرف محدد باستخدام Kutools لـ Excel
توفر أداة تحديد الخلايا المحددة في Kutools لـ Excel طريقة بديهية وفعالة لتحديد الخلايا التي تبدأ أو تنتهي بحروف محددة. هذا النهج مفيد بشكل خاص عندما تريد تحديد بصري، تسليط الضوء، أو تشغيل الخلايا التي تلبي معاييرك (مثل حذف دفعات، تنسيق، أو نسخ)، بدلاً من مجرد عرض النتيجة في العمود المجاور.
كيفية الاستخدام:
1. ابدأ باختيار النطاق حيث تحتاج إلى التحقق من الحروف الافتتاحية أو الختامية. ثم انقر فوق Kutools > تحديد > تحديد الخلايا المحددة. انظر لقطة الشاشة:
2. في مربع الحوار تحديد الخلايا المحددة، حدد الخلية في منطقة نوع التحديد. في القائمة المنسدلة نوع محدد، اختر يبدأ بـ أو ينتهي بـ، وأدخل الحرف الذي ترغب في التحقق منه. انقر فوق موافق.
3. ستظهر مربع حوار يلخص عدد التطابقات التي تم العثور عليها. أكد لرؤية الخلايا المحددة مميزة.
ملاحظة: تتيح لك هذه الأداة تحديد حتى معيارين. على سبيل المثال، يمكنك تحديد الخلايا التي تبدأ بـ "F" أو تنتهي بـ "s" في نفس الوقت، مما يسهل عمليات الفحص متعددة الشروط.
Kutools لـ Excel - قم بتعزيز Excel بأكثر من 300 أدوات أساسية. استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! احصل عليه الآن
بشكل عام، يوفر Kutools واجهة مباشرة للمستخدمين الذين يفضلون الاختيارات البصرية على الصيغ. إنه مفيد بشكل خاص لأولئك الذين ليسوا مرتاحين لوظائف Excel المعقدة أو الذين يرغبون في تنفيذ عمليات دفعات على الخلايا المتطابقة. ومع ذلك، فإن الاختيار والتظليل لا يوفران نتيجة عمود تلقائية إلا إذا قمت بدمج هذا مع خطوات إضافية.
تسليط الضوء بصريًا على الخلايا إذا كانت تبدأ أو تنتهي بحرف محدد باستخدام التنسيق الشرطي
يقدم التنسيق الشرطي طريقة بسيطة وبصرية لرؤية الخلايا التي تبدأ أو تنتهي بحرف مرغوب فيه، عن طريق تطبيق قواعد اللون أو التنسيق تلقائيًا على الخلايا المتطابقة. هذا الحل مثالي عندما تريد مشاهدة ديناميكية فورية للمطابقات، ولكن ليس بالضرورة الحاجة إلى عمود جديد يعرض النتيجة.
على سبيل المثال، لتسليط الضوء على الخلايا التي تبدأ بـ “s” أو تنتهي بـ “n” في قائمتك:
1. حدد نطاق الخلايا التي ترغب في تنسيقها.
2. انتقل إلى علامة التبويب الرئيسية، انقر فوق التنسيق الشرطي > قاعدة جديدة.
3. اختر استخدام صيغة لتحديد الخلايا المراد تنسيقها.
4. لتسليط الضوء على الخلايا التي تبدأ بـ “s”، أدخل الصيغة التالية:
=LEFT(TRIM(A2),1)="s"
5. انقر فوق زر التنسيق، اضبط لون التعبئة أو نمط الخط المفضل لديك، ثم انقر فوق موافق.
إذا كنت ترغب في تسليط الضوء على الخلايا التي تنتهي بـ “n”، استخدم هذه الصيغة بدلاً من ذلك:
=RIGHT(TRIM(A2),1)="n"
6. انقر فوق موافق عبر جميع مربعات الحوار. الآن سيتم تسليط الضوء على جميع الخلايا المطبقة وفقًا للقاعدة التي اخترتها.
ملاحظات ونصائح عملية:
- تأكد من أن مراجع الصيغة (مثل
A2
) تطابق الخلية الأولى من نطاق التحديد الخاص بك. إذا بدأ نطاق البيانات الخاص بك في صف مختلف، قم بتعديل الصيغة وفقًا لذلك. - يتم تحديث التنسيق الشرطي تلقائيًا عند تغيير بياناتك — إذا أضفت المزيد من الصفوف، قم بتوسيع القاعدة وفقًا لذلك.
- لإزالة التنسيق، ببساطة قم بمسح القواعد من الخلايا المحددة عبر التنسيق الشرطي > مسح القواعد.
- التنسيق الشرطي هو طريقة فعالة لمراجعة البيانات بصريًا، ولكنه لا يضيف أعمدة منطقية أو يؤدي أي إجراءات بعيدًا عن التنسيق. قم بدمجه مع الترتيب أو التصفية لمهام أكثر تقدمًا.
- إذا كانت القواعد المتداخلة تسبب نتائج مربكة، قم بمراجعة ترتيب وأولوية قواعد التنسيق الخاصة بك.
عرض توضيحي: التحقق مما إذا كانت الخلية تبدأ أو تنتهي بحرف محدد باستخدام Kutools لـ Excel
التحقق مما إذا كانت الخلية تبدأ أو تنتهي بحرف محدد باستخدام كود VBA
إذا كنت بحاجة إلى أتمتة العملية، التعامل مع مجموعات بيانات كبيرة، أو تفضل نهجًا أكثر تنوعًا وقابلية للتخصيص، يمكن أن يكون استخدام ماكرو VBA فعالًا للغاية. هذا مفيد بشكل خاص عندما تريد التكرار عبر نطاق، إخراج النتائج تلقائيًا إلى عمود آخر، أو تسليط الضوء على الخلايا التي تلبي معاييرك، وكل ذلك بعملية واحدة.
كيفية الاستخدام:
1. افتح محرر VBA بالنقر فوق أدوات المطور > Visual Basic أو اضغط مباشرة على مفاتيح Alt + F11. في نافذة VBA، انقر فوق إدراج > وحدة، ثم أدخل الرمز المناسب كما هو موضح أدناه.
إذا كنت ترغب في إخراج النتيجة ("موافق"/"غير موافق") في عمود جديد للخلايا التي تبدأ بحرف محدد، استخدم الكود التالي:
Sub CheckCellStartCharacter()
Dim WorkRng As Range
Dim CheckChar As String
Dim i As Long
Dim OutCol As Integer
On Error Resume Next
Set WorkRng = Application.InputBox("Select the range to check", "KutoolsforExcel", Type:=8)
CheckChar = InputBox("Enter the starting character to check (case-sensitive):", "KutoolsforExcel")
If WorkRng Is Nothing Or CheckChar = "" Then Exit Sub
OutCol = WorkRng.Columns(WorkRng.Columns.Count).Column + 1
For i = 1 To WorkRng.Rows.Count
If Left(Trim(WorkRng.Cells(i, 1).Value), 1) = CheckChar Then
WorkRng.Cells(i, 1).Offset(0, WorkRng.Columns.Count).Value = "OK"
Else
WorkRng.Cells(i, 1).Offset(0, WorkRng.Columns.Count).Value = "Not OK"
End If
Next i
MsgBox "Check complete. Results output in column " & Chr(65 + WorkRng.Columns.Count), vbInformation
End Sub
2. أغلق محرر VBA وعد إلى Excel. اضغط على مفتاح F5 أو انقر فوق تشغيل. ستظهر رسالة تطلب منك تحديد النطاق الذي تريد تحليله وحرف البداية المستهدف. بعد ذلك، سينتج الماكرو "موافق" أو "غير موافق" في العمود الموجود على الفور إلى يمين اختيارك.
إذا كنت تفضل تسليط الضوء على الخلايا التي تنتهي بحرف محدد (بدلاً من إخراج النتيجة)، استخدم الماكرو البديل التالي:
Sub HighlightCellsEndingWithChar()
Dim WorkRng As Range
Dim CheckChar As String
Dim i As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.InputBox("Select range to highlight", xTitleId, Type:=8)
CheckChar = InputBox("Enter the ending character to highlight (case-sensitive):", xTitleId)
If WorkRng Is Nothing Or CheckChar = "" Then Exit Sub
For i = 1 To WorkRng.Rows.Count
If Right(Trim(WorkRng.Cells(i, 1).Value), 1) = CheckChar Then
WorkRng.Cells(i, 1).Interior.Color = vbYellow
End If
Next i
MsgBox "Highlighting complete.", vbInformation
End Sub
لتشغيل: اتبع نفس العملية في محرر VBA، وقم بتنفيذ HighlightCellsEndingWithChar. هذا سيسلط الضوء باللون الأصفر على أي خلية ينتهي قيمتها بالحرف المحدد.
نصائح وملاحظات:
- يجب حفظ جميع أكواد VBA في تنسيق ملف Excel الممكّن للاستخدام (xlsm) لضمان التشغيل الصحيح.
- هذه الماكروات حساسة لحالة الأحرف وتقوم بقص المسافات قبل التحقق من الحروف. قم بتعديل وتخصيص داخل الكود حسب الحاجة.
- VBA مناسبة للمستخدمين المتقدمين أو في الحالات التي تتطلب معالجة الدفعات، العمليات المتكررة، أو أتمتة سير العمل.
- دائماً قم بعمل نسخة احتياطية من بياناتك قبل تشغيل الماكروات في حال حدوث تغييرات غير مقصودة.
أفضل أدوات زيادة الإنتاجية لمجموعة Office
عزز مهاراتك في Excel مع Kutools لـ Excel، وتمتع بكفاءة غير مسبوقة. يقدم Kutools لـ Excel أكثر من300 ميزة متقدمة لتعزيز الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يجلب تجربة التبويبات إلى Office، ويجعل عملك أسهل بكثير
- فعّل تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint
- افتح وأنشئ مستندات متعددة في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ جديدة.
- يمنحك زيادة إنتاجية تصل إلى50% ويوفر عليك مئات النقرات يومياً!