Nasıl yapılır: Belgelerde Aralıkları Program Aracılığıyla Genişletme

Makale
02/26/2013

Microsoft Office Word belgesinde bir Range nesnesi tanımladıktan sonra onun başlangıç ve bitiş noktalarını MoveStart ve MoveEnd yöntemlerini kullanarak değiştirebilirsiniz.MoveStart ve MoveEnd yöntemleri Unit ve Count olmak üzere aynı iki parametreyi alır.Count bağımsız değişkeni hareket ettirilecek birim sayısı olup Unit bağımsız değişkeni de aşağıdaki WdUnits değerlerinden biri olabilir:

Uygulama alanı: Bu konudaki bilgiler Word 2013 ve Word 2010 uygulamalarının belge düzeyi projelerine ve uygulama düzeyi projelerine yöneliktir. Daha fazla bilgi için bkz. Office Uygulamalarında Kullanılabilir Özellikler ve Proje Türü.

Aşağıdaki örnekte yedi karakterlik bir aralık tanımlanır.Sonrasında aralığın başlangıç konumunu ilk konumdan yedi karakter sonraya taşır.Aralığın bitiş konumunun da başlangıç konumunun 7 karakter ardında olması nedeniyle sonuç sıfır karakterden oluşan bir aralıktır.Kodda bunun ardından bitiş konumu geçerli bitiş konumunun yedi karakter sonrasına taşınır.

Bir aralığı genişletmek için

Bir karakter aralığı tanımlayın.Daha fazla bilgi için bkz. Nasıl yapılır: Belgelerde Aralıkları Program Aracılığıyla Tanımlama ve Seçme.

Aşağıdaki kod örneği belge düzeyi özelleştirmelerinde kullanılabilir.
```
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);
```
Aşağıdaki kod örneği uygulama düzeyi eklentilerinde kullanılabilir.Bu örnekte etkin belge kullanılır.
```
Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)
```
```
Word.Range rng = this.Application.ActiveDocument.Range(0, 7);
```

Aralığın başlangıç konumunu taşımak için Range nesnesinin MoveStart yöntemini kullanın.

rng.MoveStart(Unit:=Word.WdUnits.wdCharacter, Count:=7)

rng.MoveStart(Word.WdUnits.wdCharacter, 7);

Aralığın bitiş konumunu taşımak için Range nesnesinin MoveEnd yöntemini kullanın.

rng.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=7)

rng.MoveEnd(Word.WdUnits.wdCharacter, 7);

Belge Düzeyi Özelleştirmesi Kodu

Belge düzeyi özelleştirmesindeki bir aralığı taşımak için

Aşağıdaki örnekte belge düzeyi özelleştirmesi için tüm kod gösterilir.Bu kodu kullanmak için projenizdeki ThisDocument sınıfından kodu çalıştırın.

' 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);

Uygulama Düzeyi Eklentisi Kodu

Uygulama düzeyi eklentisindeki bir aralığı taşımak için

Aşağıdaki örnekte uygulama düzeyi eklentisi için tüm kod gösterilir.Bu kodu kullanmak için projenizdeki ThisAddIn sınıfından kodu çalıştırın.

' 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);