كيفية القيام بما يلي: البحث عن النص واستبداله في المستندات
ينطبق على |
---|
تنطبق المعلومات الموجودة في هذا الموضوع فقط على أنواع المشاريع وإصدارات Microsoft Office التالية: لمزيد من المعلومات، راجع الميزات المتوفرة بواسطة تطبيقات Office و نوع المشروع. نوع المشروع
إصدار Microsoft Office
|
استخدم كائن Find للتكرار خلال مستند Microsoft Office Word و البحث عن نص محدد أو التنسيق أو نمط ،واستخدام خاصية Replacement لتحل محل أي من العناصر الموجودة.
التعليمة البرمجية التالية تبحث في التحديد الحالي و تستبدل كافة التواجدات لسلسلة find me بسلسلة Found. لاستخدام هذه التعليمات البرمجية، قم بتشغيلها من الفئة ThisDocument أو ThisAddIn في مشروعك.
مثال
Private Sub SearchReplace()
Dim FindObject As Word.Find = Application.Selection.Find
With FindObject
.ClearFormatting()
.Text = "find me"
.Replacement.ClearFormatting()
.Replacement.Text = "Found"
.Execute(Replace:=Word.WdReplace.wdReplaceAll)
End With
End Sub
private void SearchReplace()
{
Word.Find findObject = Application.Selection.Find;
findObject.ClearFormatting();
findObject.Text = "find me";
findObject.Replacement.ClearFormatting();
findObject.Replacement.Text = "Found";
object replaceAll = Word.WdReplace.wdReplaceAll;
findObject.Execute(ref missing, ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing, ref missing,
ref replaceAll, ref missing, ref missing, ref missing, ref missing);
}
التحويل البرمجي للتعليمات البرمجية
تحتوي فئةFind على أسلوب ClearFormatting وفئة Replacement أيضاً تحتوي على الأسلوب ClearFormatting الخاص بها. عند تنفيذ عمليات بحث و استبدال ، يجب استخدام أسلوب ClearFormatting لكلا الكائنين. إذا استخدمته فقط على كائن Find , قد تحصل على نتائج غير متوقعة في نص الاستبدال.
استخدم أسلوب Execute من كائن Find لاستبدال كل عنصر تم العثور عليه. لتحديد أى العناصر يتم استبدالها، استخدم المعلمة Replace يمكن أن تكون هذه المعلمة إحدى القيم WdReplace التالية:
wdReplaceAll يحل محل كل العناصر التى تم العثور عليها
wdReplaceNone لا يحل محل أى من العناصر التى تم العثور عليها
wdReplaceOne يحل محل أول عنصر تم العثور عليه
راجع أيضًا:
المهام
كيفية القيام بما يلي: البحث عن نص في المستندات
كيفية القيام بما يلي: تعيين خيارات البحث في Word
كيفية القيام بما يلي: التكرار الحلقي عبر العناصر الموجودة في المستندات
كيفية القيام بما يلي: استعادة التحديدات بعد البحث