كيفية القيام بما يلي: تعريف و تحديد النطاقات في المستندات

ينطبق على
تنطبق المعلومات الموجودة في هذا الموضوع فقط على أنواع المشاريع وإصدارات Microsoft Office التالية: لمزيد من المعلومات، راجع الميزات المتوفرة بواسطة تطبيقات Office و نوع المشروع. نوع المشروع مشروعات على مستوى المستند مشروعات على مستوى التطبيق إصدار Microsoft Office Word 2007 Word 2010

يمكنك تعريف نطاق في مستند Microsoft Office Word باستخدام كائن Range . يمكنك أن تقوم بتحديد المستند بأكمله بعدة طرق، على سبيل المثال، باستخدام الأسلوب Select من كائن Range أو باستخدام الخاصية Content من الفئة Microsoft.Office.Tools.Word.Document (في تخصيص على مستوى المستند ) أو الفئة Microsoft.Office.Interop.Word.Document (في وظيفة إضافية على مستوى التطبيق).

تعريف نطاق

المثال التالي يعرض كيفية إنشاء كائن Range جديد يتضمن الأحرف السبعة الأولى في المستند النشط بما في ذلك الأحرف غير المطبوعة. ثم يقوم بتحديد النص الموجود داخل النطاق.

لتعريف النطاق في تخصيص على مستوى المستند

• قم بإضافة النطاق إلى المستند بواسطة تمرير حرف البدء والانتهاء إلى الأسلوب Range من الفئة Microsoft.Office.Tools.Word.Document لاستخدام هذه التعليمات البرمجية، قم بتشغيلها من الفئة ThisDocument في مشروعك.

  Dim rng As Word.Range = Me.Range(Start:=0, End:=7)
  rng.Select()
  

  object start = 0; 
  object end = 7; 
  Word.Range rng = this.Range(ref start, ref end); 
  
  rng.Select();
  

لتحديد نطاق باستخدام وظيفة إضافية على مستوى التطبيق

• قم بإضافة النطاق إلى المستند بواسطة تمرير حرف البدء والانتهاء إلى الأسلوب Range من الفئة Microsoft.Office.Interop.Word.Document .مثال التعليمة البرمجية التالي يضيف نطاقاً إلى المستند النشط. لاستخدام هذه التعليمات البرمجية، قم بتشغيلها من الفئة ThisAddIn في مشروعك.

  Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)
  rng.Select()
  

  Word.Range rng = this.Application.ActiveDocument.Range(0, 7);
  
  rng.Select();
  

تحديد نطاق في تخصيص على مستوى المستند

تبين الأمثلة التالية كيف يتم تحديد المستند بأكمله باستخدام الأسلوب Select من الكائن Range أو باستخدام الخاصية Content من الفئة Microsoft.Office.Tools.Word.Document

لتحديد المستند بأكمله كنطاق باستخدام الأسلوب Select

• قم باستخدام الأسلوب Select من Range الذي يحتوي على المستند بأكمله. لاستخدام مثال التعليمات البرمجية التالي ، قم بتشغيله من الفئة ThisDocument في مشروعك.

  Me.Range.Select()
  

  object start = this.Content.Start;
  object end = this.Content.End;
  
  this.Range(ref start, ref end).Select();
  

لتحديد المستند بأكمله كنطاق باستخدام الخاصية "Content"

• قم باستخدام الخاصية Content لتعريف نطاق يشمل المستند بأكمله.

  Me.Content.Select()
  

  this.Content.Select();
  

يمكنك أيضاً استخدام الأساليب و الخصائص الخاصة بالكائنات الأخرى لتعريف نطاق.

لتحديد جملة في المستند النشط

• قم بتعيين النطاق باستخدام المجموعة Sentences . قم باستخدام الفهرس للجملة التي تريد تحديدها

  Dim s2 As Word.Range = Me.Sentences(2)
  s2.Select()
  

  Word.Range s2 = this.Sentences[2]; 
  s2.Select();
  

طريقة أخرى لتحديد الجملة هي بتعيين قيم البدء و النهاية للنطاق يدوياً.

لتحديد الجملة عن طريق الإعداد اليدوي لقيم البداية والنهاية

1. قم بإنشاء متغير نطاق.

   Dim rng As Word.Range
   

   Word.Range rng; 
   

2. تحقق لترى ما إذا كانت هناك جملتان على الأقل في المستند ، قم بتعيين الوسائط Start و End للنطاق، ثم حدد النطاق.

   If Me.Sentences.Count >= 2 Then
   
       Dim startLocation As Object = Me.Sentences(2).Start
       Dim endLocation As Object = Me.Sentences(2).End
   
       ' Supply a Start and End value for the Range.
       rng = Me.Range(Start:=startLocation, End:=endLocation)
   
       ' Select the Range
       rng.Select()
   End If
   

   if (this.Sentences.Count >= 2) 
   {
       object startLocation = this.Sentences[2].Start; 
       object endLocation = this.Sentences[2].End; 
   
       // Supply a Start and End value for the Range. 
       rng = this.Range(ref startLocation, ref endLocation); 
   
       // Select the Range.
       rng.Select();
   }
   

تحديد نطاق باستخدام وظيفة إضافية على مستوى التطبيق

تبين الأمثلة التالية كيف يتم تحديد المستند بأكمله باستخدام الأسلوب Select من الكائن Range أو باستخدام الخاصية Content من الفئة Microsoft.Office.Interop.Word.Document

لتحديد المستند بأكمله كنطاق باستخدام الأسلوب Select

• قم باستخدام الأسلوب Select من Range الذي يحتوي على المستند بأكمله. يحدد المثال التالي من التعليمات البرمجية محتويات المستند النشط. لاستخدام هذه التعليمات البرمجية، قم بتشغيلها من الفئة ThisAddIn في مشروعك.

  Me.Application.ActiveDocument.Range.Select()
  

  this.Application.ActiveDocument.Range(
      this.Application.ActiveDocument.Content.Start,
      this.Application.ActiveDocument.Content.End).Select();
  

لتحديد المستند بأكمله كنطاق باستخدام الخاصية "Content"

• قم باستخدام الخاصية Content لتعريف نطاق يشمل المستند بأكمله.

  Me.Application.ActiveDocument.Content.Select()
  

  this.Application.ActiveDocument.Content.Select();
  

يمكنك أيضاً استخدام الأساليب و الخصائص الخاصة بالكائنات الأخرى لتعريف نطاق.

لتحديد جملة في المستند النشط

• قم بتعيين النطاق باستخدام المجموعة Sentences . قم باستخدام الفهرس للجملة التي تريد تحديدها

  Dim s2 As Word.Range = Me.Application.ActiveDocument.Sentences(2)
  s2.Select()
  

  Word.Range s2 = this.Application.ActiveDocument.Sentences[2];
  s2.Select();
  

طريقة أخرى لتحديد الجملة هي بتعيين قيم البدء و النهاية للنطاق يدوياً.

لتحديد الجملة عن طريق الإعداد اليدوي لقيم البداية والنهاية

1. قم بإنشاء متغير نطاق.

   Dim rng As Word.Range
   

   Word.Range rng;
   

2. تحقق لترى ما إذا كانت هناك جملتان على الأقل في المستند ، قم بتعيين الوسائط Start و End للنطاق، ثم حدد النطاق.

   Dim document As Word.Document = Me.Application.ActiveDocument
   If document.Sentences.Count >= 2 Then
   
       Dim startLocation As Object = document.Sentences(2).Start
       Dim endLocation As Object = document.Sentences(2).End
   
       ' Supply a Start and End value for the Range.
       rng = document.Range(Start:=startLocation, End:=endLocation)
   
       ' Select the Range
       rng.Select()
   End If
   

   Word.Document document = this.Application.ActiveDocument;
   
   if (document.Sentences.Count >= 2)
   {
       object startLocation = document.Sentences[2].Start;
       object endLocation = document.Sentences[2].End;
   
       // Supply a Start and End value for the Range. 
       rng = document.Range(ref startLocation, ref endLocation);
   
       // Select the Range.
       rng.Select();
   }
   

راجع أيضًا:

المهام

كيفية القيام بما يلي: توسيع النطاقات في المستندات

كيفية القيام بما يلي: استرداد أحرف البداية والنهاية في النطاقات

كيفية القيام بما يلي: توسيع النطاقات في المستندات

كيفية القيام بما يلي: إعادة تعيين النطاقات في مستندات Word

كيفية القيام بما يلي: طي النطاقات أو التحديدات في المستندات

كيفية القيام بما يلي: استبعاد علامات الفقرة عند إنشاء النطاقات

موارد أخرى

نظرة عامة على نموذج كائن Word