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

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

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

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

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

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

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

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

  1. افتح مستند Word الذي تريد البحث فيه واستبدال كلمات متعددة، ثم اضغط علىAlt + F11 لفتح نافذةمايكروسوفت فيجوال بيسك للتطبيقات.
  2. في نافذةمايكروسوفت فيجوال بيسك للتطبيقات، انقر علىإدراج>وحدة. ثم انسخ كود 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، أدخل الكلمات المتعددة التي تريد البحث والاستبدال، مفصولة بفواصل، ثم انقر علىموافق.

    أدخل الإدخالات المراد استبدالها في هذا الحوار

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

    أدخل الإدخالات الجديدة للاستخدام في هذا الحوار

ملاحظة:في هذا المثال، تم استبدال “KTE” بـ “جديد”، و“KTO” و“KTW” بـ “اختبار” و“إنهاء” على التوالي. غيّر هذه القيم لتناسب احتياجاتك.

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

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

Kutools for Word

Kutools for Word يُمكّنك من إنجاز مهامك اليومية على المستندات بسرعة أكبر، بفضل أدواته العملية المدمجة مباشرةً في Microsoft Word—بدون الحاجة إلى برمجة أو إعدادات معقدة.

  • الكتابة بالذكاء الاصطناعي، والتنقيح، والترجمة، والتلخيص
  • البحث والاستبدال الجماعي عبر المستندات
  • دمج وتقسيم مستندات Word بسهولة
  • تحويل Word ↔ PDF دفعة واحدة
تنزيلمعرفة المزيد

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

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

    خيار الاستبدال الدفعي في تبويب Kutools على الشريط

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

      نافذة البحث والاستبدال الدفعي

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

هل تبحث عن طريقة أسرع للتعامل مع المهام المتكررة في Word؟ جرّب Kutools for Word واجعل عملك اليومي أكثر سهولة!

تنزيلمعرفة المزيد

أفضل أدوات إنتاجية أوفيس

Kutools for Word – ارتقِ بتجربتك في Word مع أكثر من100 ميزة رائعة!

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

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

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

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

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

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

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

🌍يدعم أكثر من 40 لغة: استخدم كوتولز باللغة التي تفضلها – يدعم الإنجليزية، الإسبانية، الألمانية، الفرنسية، الصينية، وأكثر من 40 لغة أخرى!

Kutools for Word تبويبات على الشريط
 
 

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

  • تمكين التحرير والقراءة المبوبة في Word وExcel وPowerPoint وPublisher وAccess وVisio وProject.
  • افتح وأنشئ مستندات متعددة في علامات تبويب جديدة ضمن نفس النافذة، وليس في نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50%، ويقلل مئات نقرات الفأرة لك كل يوم!

✨ Kutools for Office – تثبيت واحد، خمسة أدوات قوية!

يتضمنOffice Tab Pro·Kutools لـ Excel·Kutools لـ Outlook·Kutools for Word·Kutools for PowerPoint

📦 احصل على جميع أدوات 5 في حزمة واحدة | 🔗 تكامل سلس مع Microsoft Office | ⚡ وقت الحفظ وعزّز إنتاجيتك فورًا

أفضل أدوات إنتاجية أوفيس

Kutools for Word- أدوات 100+ لـ Word

تنزيل مجانياشترِ الآنمعرفة المزيد عن Kutools