كيفية تحديد جميع المعادلات في Word؟

Author: Amanda Li Last Modified: 2025-08-06

كيفية تحديد جميع المعادلات في Word؟ يقدم هذا البرنامج التعليمي طرقًا مختلفة لتحديد جميع المعادلات بفعالية.

تحديد جميع المعادلات باستخدام البحث والاستبدال
تحديد جميع المعادلات بسرعة باستخدام Kutool for Word
تحديد جميع المعادلات باستخدام VBA

تحديد جميع المعادلات باستخدام البحث والاستبدال

وظيفة البحث والاستبدال في Word هي طريقة شائعة لتحديد المعادلات.

انقر فوق Home > Find > Advanced Find لفتح مربع حوار البحث والاستبدال.
في مربع الحوار البحث والاستبدال، انقر فوق الزر المزيد لإظهار المزيد من الخيارات.
انقر خاص > أي رقم، ثم انقر بحث تالي.
نصيحة: يمكنك أيضًا إدخال “^#” مباشرة في مربع البحث عن النص وانقر على بحث تالي.

ملاحظة: هذه الطريقة تحدد معادلة واحدة فقط في كل مرة. لتحديد الكل دفعة واحدة، استخدم طريقة Kutools أو VBA أدناه.

تحديد جميع المعادلات بسرعة باستخدام Kutools for Word

يوفر Kutools for Word أسهل طريقة لتحديد جميع المعادلات بنقرة واحدة.

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

تحميل الآن

انقر فوق Kutools > فقرات > تحديد المعادلات لتحديد جميع المعادلات في المستند دفعة واحدة. نصيحة: إذا قمت بتحديد جزء من المستند أولاً، سيتم تحديد المعادلات الموجودة في ذلك الجزء فقط.

النتيجة

تم تحديد جميع المعادلات من التحديد:
تم تحديد جميع المعادلات من المستند بالكامل:

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

تحديد جميع المعادلات باستخدام VBA

يختار الكود التالي لـ VBA جميع المعادلات في مستند Word فورًا.

اضغط على Alt + F11 لفتح محرر VBA.

انقر إدراج > وحدة، ثم انسخ والصق الكود التالي لـ VBA في نافذة الوحدة.

Sub SelectAllEquations()
Dim xMath As OMath
Dim I As Integer
With ActiveDocument
    .DeleteAllEditableRanges wdEditorEveryone
    For I = 1 To .OMaths.Count
        Set xMath = .OMaths.Item(I)
        xMath.Range.Paragraphs(1).Range.Editors.Add wdEditorEveryone
    Next
    .SelectAllEditableRanges wdEditorEveryone
    .DeleteAllEditableRanges wdEditorEveryone
End With
End Sub