Bookmark.ShapeRange Özellik

Tanım

ShapeRangeDenetimdeki tüm nesneleri temsil eden bir koleksiyon alır Shape Bookmark .

public Microsoft.Office.Interop.Word.ShapeRange ShapeRange { get; }

Özellik Değeri

ShapeRange

ShapeRangeDenetimdeki tüm nesneleri temsil eden bir koleksiyon Shape Bookmark .

Örnekler

Aşağıdaki kod örneği, Bookmark belgeye metin içeren bir denetim ekler ve metin kutusu oluştururken yer işaretinin dikey ve yatay konumlarını kullanır. Daha sonra ShapeRange bir ileti kutusunda yer işaretinin içinde adını görüntüler.

Bu örnek, belge düzeyinde özelleştirme içindir

private void BookmarkShapeRange()
{
    this.Paragraphs[1].Range.InsertParagraphBefore();
    Microsoft.Office.Tools.Word.Bookmark bookmark1 =
        this.Controls.AddBookmark(this.Paragraphs[1].Range,
        "bookmark1");
    bookmark1.Text = "This is sample bookmark text.";

    object myRange = bookmark1.Range;
    object vertical = bookmark1.Information[Microsoft.Office
        .Interop.Word.WdInformation.wdVerticalPositionRelativeToPage];
    object horizontal = bookmark1.Information[Microsoft.Office
        .Interop.Word.WdInformation.wdHorizontalPositionRelativeToPage];

    Word.Shape shape = this.Shapes.AddTextbox(Microsoft.Office.Core
        .MsoTextOrientation.msoTextOrientationHorizontal, (float)vertical, 
        (float)horizontal, 50, 50, ref missing);

    MessageBox.Show(bookmark1.ShapeRange.Name.ToString());
}
Private Sub BookmarkShapeRange()

    Me.Paragraphs(1).Range.InsertParagraphBefore()

    Dim Bookmark1 As Microsoft.Office.Tools.Word.Bookmark = _
        Me.Controls.AddBookmark(Me.Paragraphs(1).Range, "Bookmark1")
    Bookmark1.Text = "This is sample bookmark text."

    Dim vertical As Single = Bookmark1.Information(Microsoft.Office _
        .Interop.Word.WdInformation.wdVerticalPositionRelativeToPage)
    Dim horizontal As Single = Bookmark1.Information(Microsoft.Office _
        .Interop.Word.WdInformation.wdHorizontalPositionRelativeToPage)

    Dim shape As Word.Shape = Me.Shapes.AddTextbox(Microsoft.Office.Core _
        .MsoTextOrientation.msoTextOrientationHorizontal, vertical, _
        horizontal, 50, 50)

    MessageBox.Show(Bookmark1.ShapeRange.Name.ToString)

End Sub

Açıklamalar

Şekil aralığı, çizimler, şekiller, resimler, OLE nesneleri, ActiveX denetimleri, metin nesneleri ve belirtme çizgileri içerebilir.

Şunlara uygulanır