Bookmark.GoToEditableRange(Object) Yöntem
Tanım
Önemli
Bazı bilgiler ürünün ön sürümüyle ilgilidir ve sürüm öncesinde önemli değişiklikler yapılmış olabilir. Burada verilen bilgilerle ilgili olarak Microsoft açık veya zımni hiçbir garanti vermez.
public Microsoft.Office.Interop.Word.Range GoToEditableRange (ref object EditorID);
Parametreler
- EditorID
- Object
Kullanıcının e-posta diğer adını (aynı etki alanında ise), bir e-posta adresini veya WdEditorType bir kullanıcı grubunu temsil eden bir sabiti temsil eden bir dize olabilir. Atlanırsa, tüm kullanıcıların düzenleme iznine sahip olduğu tüm aralıkları seçer.
Döndürülenler
Range Bookmark Kullanıcı veya Kullanıcı grubu tarafından değiştirilebilen bir denetimin alanını temsil eden nesne.
Örnekler
Aşağıdaki kod örneği, Bookmark belgedeki ilk paragrafa metin içeren bir denetim ekler ve tüm kullanıcıları yer işaretine dördüncü kelimenin düzenleyiciler olarak ekler. Örnek daha sonra belgeyi düzeltmelere karşı korur. Son olarak, kod, yer işaretinin düzenlenebilir aralığını bir ileti kutusunda görüntüler.
Bu örnek, belge düzeyinde özelleştirme içindir
private void BookmarkEditors()
{
object editor = Word.WdEditorType.wdEditorEveryone;
this.Paragraphs[1].Range.InsertParagraphBefore();
Microsoft.Office.Tools.Word.Bookmark bookmark1 =
this.Controls.AddBookmark(this.Paragraphs[1].Range,
"bookmark1");
bookmark1.Text = "This text cannot be edited.";
bookmark1.Words[4].Editors.Add(ref editor);
this.Protect(Word.WdProtectionType.wdAllowOnlyReading,
ref missing, ref missing, ref missing, ref missing);
Word.Range range1 = bookmark1.GoToEditableRange(ref editor);
if (range1 != null)
{
MessageBox.Show("The editable Range of bookmark1 spans from " +
range1.Start.ToString() + " to " + range1.End.ToString());
}
}
Private Sub BookmarkEditors()
Dim editor As Object = Word.WdEditorType.wdEditorEveryone
Me.Paragraphs(1).Range.InsertParagraphBefore()
Dim Bookmark1 As Microsoft.Office.Tools.Word.Bookmark = _
Me.Controls.AddBookmark(Me.Paragraphs(1).Range, "Bookmark1")
Bookmark1.Text = "This text cannot be edited."
Bookmark1.Words(4).Editors.Add(editor)
Me.Protect(Word.WdProtectionType.wdAllowOnlyReading)
Dim range1 As Word.Range = Bookmark1.GoToEditableRange(editor)
If Not (range1 Is Nothing) Then
MessageBox.Show("The editable Range of Bookmark1 spans from " _
& range1.Start.ToString & " to " & range1.End.ToString)
End If
End Sub
Açıklamalar
İsteğe Bağlı Parametreler
İsteğe bağlı parametreler hakkında daha fazla bilgi için bkz. Office çözümlerinde Isteğe bağlı parametreler.