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

مقالة
11/01/2010

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

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

نوع المشروع

مشروعات على مستوى المستند
مشروعات على مستوى التطبيق

إصدار Microsoft Office

Word 2007
Word 2010

بعد تعريف الكائن Range في مستند Microsoft Office Word ، قم بتغيير نقاط بدايته و نهايته باستخدام الأساليب MoveStart و MoveEnd . الأساليب MoveStart و MoveEnd قد تستخدم نفس الوسيطتين ، Unit و Count. الوسيطة Count هي عدد الوحدات التي سيتم نقلها, و الوسيطة Unit يمكن أن تكون أحدى قيم WdUnits التالية :

يحدد المثال التالي نطاقا من سبعة أحرف. ثم يحرك بعد ذلك موضع البداية الخاص بالنطاق سبعة أحرف بعد موضع البدء الأصلي. لأن موضع نهاية النطاق كان أيضاً سبعة أحرف بعد موضع البدء ، فالنتيجة هى نطاق يتكون من عدد صفر من الأحرف. ثم تقوم التعليمات البرمجية بتحريك موضع النهاية سبعة أحرف بعد موضع النهاية الحالي.

لتوسيع نطاق

تعريف نطاق من الأحرف. لمزيد من المعلومات، راجع كيفية القيام بما يلي: تعريف و تحديد النطاقات في المستندات.

يمكن استخدام مثال التعليمات البرمجية التالي في تخصيص على مستوى المستند.
```
Dim rng As Word.Range = Me.Range(Start:=0, End:=7)
```
```
object start = 0;
object end = 7;
Word.Range rng = this.Range(ref start, ref end);
```
يمكن استخدام مثال التعليمة البرمجية التالية في المستوى تطبيق إضافة-في. This مثال uses the نشط مستند.
```
Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)
```
```
Word.Range rng = this.Application.ActiveDocument.Range(0, 7);
```
قم باستخدام الأسلوب MoveStart من الكائن Rangeلتحريك موضع بداية النطاق.
```
rng.MoveStart(Unit:=Word.WdUnits.wdCharacter, Count:=7)
```
```
rng.MoveStart(Word.WdUnits.wdCharacter, 7);
```
قم باستخدام الأسلوب MoveEnd من الكائن Rangeلتحريك موضع نهاية النطاق.
```
rng.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=7)
```
```
rng.MoveEnd(Word.WdUnits.wdCharacter, 7);
```

أوامر التخصيص على مستوى المستند

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

يُظهر المثال التالي التعليمات البرمجية الكاملة لتخصيص على مستوى المستند. لاستخدام هذه التعليمات البرمجية، قم بتشغيلها من الفئة ThisDocument في مشروعك.

' Define a range of 7 characters.
Dim rng As Word.Range = Me.Range(Start:=0, End:=7)

' Move the start position 7 characters.
rng.MoveStart(Unit:=Word.WdUnits.wdCharacter, Count:=7)

' Move the end position 7 characters.
rng.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=7)

// Define a range of 7 characters.
object start = 0;
object end = 7;
Word.Range rng = this.Range(ref start, ref end);

// Move the start position 7 characters.
rng.MoveStart(Word.WdUnits.wdCharacter, 7);

// Move the end position 7 characters.
rng.MoveEnd(Word.WdUnits.wdCharacter, 7);

التعليمات البرمجية الخاصة بالوظيفة الإضافية على مستوى التطبيق

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

The following مثال shows the إكمال تعليمات برمجية for an وظيفة إضافية على المستوى تطبيق. لاستخدام هذه التعليمات البرمجية، قم بتشغيلها من الفئة ThisAddIn في مشروعك.

' Define a range of 7 characters.
Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)

' Move the start position 7 characters.
rng.MoveStart(Unit:=Word.WdUnits.wdCharacter, Count:=7)

' Move the end position 7 characters.
rng.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=7)

// Define a range of 7 characters.
Word.Range rng = this.Application.ActiveDocument.Range(0, 7);

// Move the start position 7 characters.
rng.MoveStart(Word.WdUnits.wdCharacter, 7);

// Move the end position 7 characters.
rng.MoveEnd(Word.WdUnits.wdCharacter, 7);