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

كيف يمكنك التحقق مما إذا كان عنوان البريد الإلكتروني صالحًا في Excel؟

المؤلفXiaoyangتاريخ التعديل

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

لقطة شاشة للتحقق مما إذا كان عنوان البريد الإلكتروني صالحًا

التحقق مما إذا كان عنوان البريد الإلكتروني صالحًا أم لا باستخدام صيغة

رمز VBA – يمكن إدخال عناوين البريد الإلكتروني فقط تلقائيًّا


التحقق مما إذا كان عنوان البريد الإلكتروني صالحًا أم لا باستخدام صيغة

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

افحص الصيغة أدناه للتأكد من أن عنوان البريد الإلكتروني يحتوي على نقطة واحدة على الأقل (".")، وأن تلي رمز العَت (@) نقطةً ما، وهما شرطان أساسيان في تنسيقات عناوين البريد الإلكتروني الصالحة.

1. أدخل أو الصق الصيغة أدناه في خلية فارغة لعرض نتيجة الفحص:

=AND(IFERROR(FIND(".",A2),FALSE),IFERROR(FIND(".",A2,FIND(«@»,A2)),FALSE))

2. بعد إدخال الصيغة، اضغطEnter للتأكيد. بعد ذلك، اسحب مقبض التعبئة لأسفل لتطبيق هذه الصيغة على الخلايا الأخرى في العمود المستهدف. ستعيد الصيغةTRUE للإدخالات التي تجتاز الفحص (صالحة على الأرجح)، وFALSE للإدخالات التي لا تستوفي هذه المتطلبات.

لقطة شاشة لاستخدام صيغة للتحقق مما إذا كان عنوان البريد الإلكتروني صالحًا أم لا

ملاحظات ونصائح:

  • تتحقّق هذه الصيغة فقط من التنسيق الأساسي: فهي تتأكد من وجود النقاط وموقعها بالنسبة لرمز العَت (@)، لكنها لا تضمن وجود النطاق أو اسم المستخدم، ولا تستبعد بعض الحالات النادرة رغم صلاحيتها.
  • إذا احتوت بياناتك على مسافات، أو أحرف خاصة، أو علامات ترقيم زائدة في نهايتها، فقد يؤدي ذلك إلى نتائج غير صحيحة أثناء التحقق من الصلاحية.
  • لإجراء فحص أكثر دقة لتنسيق البريد الإلكتروني، يُوصى بإضافة فحوصات تكميلية أو استخدام VBA/وحدات الماكرو كما هو موضح أدناه.

رمز VBA – يمكن إدخال عناوين البريد الإلكتروني فقط تلقائيًّا

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

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

1. انقرأدوات المطور > Visual Basic، ثم في نافذةMicrosoft Visual Basic for Applications، انقرإدراج > وحدة نمطية (Module)، والصق رمز VBA التالي في الوحدة النمطية:

Sub ValidateEmailAddresses()
    Dim rng As Range
    Dim cell As Range
    Dim email As String
    Dim atPos As Long
    Dim dotPos As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.InputBox("Select email range", xTitleId, Selection.Address, Type:=8)
    
    For Each cell In rng
        email = Trim(cell.Value)
        atPos = InStr(1, email, "@")
        
        If atPos > 1 Then
            dotPos = InStr(atPos + 1, email, ".")
            
            If dotPos > atPos + 1 Then
                cell.Interior.ColorIndex = xlNone ' Format as valid
            Else
                cell.Interior.Color = vbYellow ' Flag as invalid
                cell.AddComment "Invalid email format"
            End If
        Else
            cell.Interior.Color = vbYellow ' Flag as invalid
            cell.AddComment "Invalid email format"
        End If
    Next cell
End Sub

2. لتشغيل الماكرو، انقر على زرزر التشغيل. بعد النقر، سيظهر مربّع حوار يطلب منك تحديد النطاق الذي يحتوي على عناوين البريد الإلكتروني. سيتم تمييز الإدخالات غير الصالحة باللون الأصفر وإضافة تعليق («تنسيق بريد إلكتروني غير صالح») إليها، بينما تبقى الإدخالات الصالحة دون أي تغيير.

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

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

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

مقالات ذات صلة إضافية:

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

  • محرر متعدد الأسطر فائق الكفاءة من شريط الصيغة (يمكّنك من تحرير أسطر نصية متعددة والمعادلات بسهولة)؛وضع القراءة (ليُسهّل عليك قراءة وتحرير عدد كبير من الخلايا)؛لصق إلى نطاق التصفية...
  • نسخ صفوف أو أعمدة تحتوي على خلايا مدمجةمع الاحتفاظ بالبيانات؛ تقسيم محتوى الخلايا؛دمج خلايا الصفوف المكررة وحساب المجموع أو المتوسط... منع إدخال قيم مكررة في الخلايا؛مقارنة النطاقات...
  • تحديد الصفوف المكررة أو الفريدة؛تحديد الصفوف الفارغة (جميع الخلايا فارغة)؛البحث المتقدم والعثور على المشابهعبر العديد من ملفات العمل؛ تحديد عشوائي...
  • إدخال محتوى متعدد الخلايا من النسخ الدقيقدون تغيير مراجع الصيغ؛إنشاء مراجع تلقائيةلأوراق عمل متعددة؛إدراج رموز التعداد النقطي، ومربعات الاختيار والمزيد...
  • احفظ الصيغ المفضلة وأدخلها بسرعة، والنطاقات، والرسوم البيانية، والصور؛شفر الخلايابكلمة مرور؛أنشئ قائمة بريد إلكترونيوأرسل رسائل البريد الإلكتروني...
  • استخراج النص، وإضافة نص، وحذف الأحرف من موقع معين،وإزالة المسافات؛ وإنشاء إحصاءات صفحة البيانات وطباعتها؛والتحويل بين محتوى الخلايا والتعليقات...
  • مرشح متقدم (لحفظ مخططات التصفية وتطبيقها على أوراق عمل أخرى)؛ترتيب متقدمحسب الشهر أو الأسبوع أو اليوم، والتكرار، وغير ذلك؛تصفية خاصةحسب التنسيق العريض أو المائل...
  • ادمج ملفات العمل وأوراق العمل؛ واجمع الجداول استنادًا إلى العمود الرئيسي؛وقسّم البيانات إلى أوراق عمل متعددة؛وحَوِّل ملفات XLS وXLSX وPDF دفعةً واحدة...
  • تجميع حسب جدول البيانات المحوريرقم الأسبوع، ويوم الأسبوع والمزيد... عرض الخلايا غير المؤمَّنة وقفل التحديدبألوان مختلفة؛تمييز الخلايا التي تحتوي على صيغة أو اسم...
kte tab 201905
  • تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، بالإضافة إلى Publisher وAccess وVisio وProject.
  • افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50% ويوفّر عليك مئات نقرات الفأرة كل يوم!
officetab bottom