Skip to main content

كيفية البحث عن الكلمات واستبدالها متعددة في نفس الوقت في مستند Word؟

Author: Siluvia Last Modified: 2025-05-30

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

في هذا البرنامج التعليمي، سنوضح لك كيفية البحث عن الكلمات واستبدالها متعددة في نفس الوقت في مستند Word باستخدام طريقتين:

البحث عن الكلمات واستبدالها متعددة في نفس الوقت في Word باستخدام VBA
البحث عن الكلمات واستبدالها متعددة بسهولة في نفس الوقت في Word باستخدام ميزة رائعة


البحث عن الكلمات واستبدالها متعددة في نفس الوقت في Word باستخدام VBA

يمكنك استخدام كود VBA للبحث عن الكلمات واستبدالها متعددة دفعة واحدة في مستند Word. اتبع الخطوات التالية:

  1. افتح مستند Word الذي تريد البحث فيه عن الكلمات واستبدالها متعددة، ثم اضغط على Alt + F11 لفتح نافذة Microsoft Visual Basic for Applications.
  2. في نافذة Microsoft Visual Basic for Applications ، انقر فوق إدراج > وحدة. ثم قم بنسخ الكود التالي من VBA إلى الوحدة النافذة:
    Sub FindAndReplaceMultiItems()
    'Update by ExtendOffice 2018/10/25
        Dim xFind As String
        Dim xReplace As String
        Dim xFindArr, xReplaceArr
        Dim I As Long
        Application.ScreenUpdating = False
        xFind = InputBox("Enter items to be found here, separated by comma: ", "Kutools for Word")
        xReplace = InputBox("Enter new items here, separated by comma: ", "Kutools for Word")
        xFindArr = Split(xFind, ",")
        xReplaceArr = Split(xReplace, ",")
        If UBound(xFindArr) <> UBound(xReplaceArr) Then
            MsgBox "Find and replace characters must be equal.", vbInformation, "Kutools for Word"
            Exit Sub
        End If
        For I = 0 To UBound(xFindArr)
            Selection.HomeKey Unit:=wdStory
            With Selection.Find
                .ClearFormatting
                .Replacement.ClearFormatting
                .Text = xFindArr(I)
                .Replacement.Text = xReplaceArr(I)
                .Format = False
                .MatchWholeWord = False
            End With
            Selection.Find.Execute Replace:=wdReplaceAll
        Next
        Application.ScreenUpdating = True
    End Sub
  3. اضغط على F5 لتشغيل الكود.
  4. في أول مربع حوار Kutools for Word، أدخل الكلمات المتعددة التي تريد البحث عنها واستبدالها، مفصولة بفواصل، ثم انقر فوق موافق.

    Enter entries to be replaced in this dialog

  5. في ثاني مربع حوار Kutools for Word، أدخل كلمات الاستبدال، أيضًا مفصولة بفواصل، ثم انقر فوق موافق.

    Enter new entries to use in this dialog

ملاحظة: في هذا المثال، يتم استبدال “KTE” بـ “New”، و”KTO” و”KTW” بـ “Test” و”Finish”. قم بتعديل هذه الكلمات حسب احتياجاتك.


البحث عن الكلمات واستبدالها متعددة بسهولة في نفس الوقت في Word باستخدام ميزة رائعة

ميزة البحث والاستبدال الجماعي من Kutools for Word هي أداة قوية تُبسّط عملية البحث عن النصوص واستبدالها متعددة في نفس الوقت داخل مستند واحد أو عبر عدة مستندات. على عكس وظائف Word القياسية، تتيح هذه الميزة معالجة الاستبدالات دفعة واحدة بكفاءة أكبر، مما يوفر لك الكثير من الوقت والجهد.

Kutools for Word،المزود بذكاء اصطناعي 🤖، يقدم أكثر من 100 ميزات عملية لتبسيط مهامك.

اتبع الخطوات التالية لإجراء عملية البحث والاستبدال الجماعي:

  1. قم بتشغيل Microsoft Word، ثم انقر فوق Kutools > الاستبدال الجماعي.

    Batch Replacement option on the Kutools tab on the ribbon

  2. في نافذة البحث والاستبدال الجماعي ، قم بتكوين الإعدادات كما يلي:
    1. انقر فوق زر إضافة صف لإدراج حقول البحث والاستبدال. على سبيل المثال، إذا كنت بحاجة إلى استبدال ثلاثة نصوص مختلفة، قم بإنشاء ثلاثة صفوف.
    2. في كل صف، أدخل النص المراد استبداله في عمود البحث والنص الجديد في عمود الاستبدال .
      تلميح: يمكنك أيضًا تحديد نوع البحث، نطاق البحث، لون التمييز، والتنسيق لكل قاعدة بحث واستبدال، كما هو موضح باللون البرتقالي في لقطة الشاشة أدناه.
    3. انقر فوق الزر Add button وحدده إضافة ملف أو إضافة مجلد لإضافة مستند واحد أو أكثر حيث تريد تنفيذ عملية البحث والاستبدال.
    4. انقر فوق زر الاستبدال لتنفيذ العملية.

      Batch Find and Replace window

بمجرد الانتهاء، سيتم استبدال الكلمات المحددة عبر المستندات المختارة في نفس الوقت.

Kutools for Word هو الإضافة النهائية لبرنامج Word التي تُبسّط عملك وتعزز مهاراتك في معالجة المستندات. احصل عليه الآن!

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

Kutools for Word – عزز تجربتك في Word مع أكثر من 100 ميزة مذهلة!

🤖 ميزات Kutools AI: مساعد الذكاء الاصطناعي / مساعد الوقت الحقيقي / تلميع فائق (مع الحفاظ على التنسيق) / ترجمة فائقة (مع الحفاظ على التنسيق) / إخفاء المعلومات باستخدام الذكاء الاصطناعي / التدقيق اللغوي بالذكاء الاصطناعي...

📘 إتقان المستندات: تقسيم الصفحات / دمج المستندات / تصدير التحديد بصيغ متعددة (PDF/TXT/DOC/HTML...) / تحويل جماعي إلى PDF...

تحرير المحتوى: البحث والاستبدال الجماعي عبر عدة ملفات / تغيير حجم جميع الصور / تحويل الجدول بين الصفوف والأعمدة / تحويل الجدول إلى نص...

🧹 تنظيف بلا عناء: إزالة المسافات الزائدة / فواصل الأقسام / مربعات النص / الارتباطات التشعبية / للمزيد من أدوات الإزالة، توجه إلى مجموعة إزالة...

إدراجات إبداعية: إدراج فواصل الآلاف / مربعات اختيار / أزرار راديو / رمز QR / الباركود / صور متعددة / اكتشف المزيد في مجموعة إدراج...

🔍 تحديدات دقيقة: تحديد صفحات معينة / الجداول / الأشكال / فقرات العنوان / عزز التنقل مع المزيد من ميزات التحديد...

تحسينات مميزة: انتقل إلى أي موقع / إدراج تلقائي للنصوص المتكررة / التبديل بين نوافذ المستندات /11 أداة تحويل...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 هل ترغب في تجربة هذه الميزات؟ قم بتنزيل Kutools for Word الآن! 🚀