Shape プロパティ (Visio)Shape.Text property (Visio)

図形のすべてのテキストを返します。Returns all of the shape's text. 値の取得と設定が可能です。Read/write.



Shape オブジェクトを表す変数を取得します。expression A variable that represents a Shape object.

戻り値Return value



Shape オブジェクトのtextプロパティによって返される**** 文字列では、フィールドはエスケープ文字 (30 (&H1E)) で表されます。たとえば、 shapeオブジェクトのテキストに図面のファイル名を表示するフィールドが含まれている場合、図形オブジェクトのtextプロパティは、テキストにフィールドが挿入されるエスケープ文字を返します。In the text returned by the Text property of a Shape object, fields are represented by an escape character (30 (&H1E)) For example, if a Shape object's text contains a field that displays the file name of a drawing, the Shape object's Text property returns an escape character where that field is inserted into the text. テキストに展開されたフィールドを含める場合は、図形のcharactersプロパティを取得してから、結果のCharactersオブジェクトのtextプロパティを取得します。If you want the text to contain the expanded field, get the shape's Characters property, and then get the Text property of the resulting Characters object.

図形がグループの場合、返されるテキストは [IsTextEditTarget] セルの値によって異なります。If the shape is a group, the text returned is dependent on the value of the IsTextEditTarget cell.

  • [Istextedittarget] がTrueの場合、 Shapeオブジェクトのtextプロパティは、グループの文字列を返します。If IsTextEditTarget is True, the Text property of the Shape object returns the text of the group.

  • [Istextedittarget] がFalseの場合、図形オブジェクトのtextプロパティは、グループ内の図形のテキストを重ね順の一番上に表示します。If IsTextEditTarget is False, the Text property of the Shape object returns the text of the shape in the group at the top of the stacking order.

他のアプリケーションやガイドのオブジェクトにはTextプロパティはありません。Objects from other applications and guides do not have a Text property.

Visual Studio ソリューションに、Visio の相互参照が含まれている場合、このプロパティは次の種類にマップされます。If your Visual Studio solution includes the Microsoft.Office.Interop.Visio reference, this property maps to the following types:

  • IVShape を表示しません。Microsoft.Office.Interop.Visio.IVShape.Text


次の Microsoft Visual Basic for Applications (VBA) マクロは、図形のTextプロパティを取得する方法を示しています。This Microsoft Visual Basic for Applications (VBA) macro shows how to get the Text property of a shape.

Public Sub ShapeText_Example()  
    Dim vsoRectangle As Visio.Shape  
    Dim vsoOval As Visio.Shape  
    Dim vsoShapeFromCell As Visio.Shape  
    Dim vsoShapeFromCharacters As Visio.Shape  
    Dim vsoCell As Visio.Cell  
    Dim vsoCharacters As Visio.Characters  
    'Create 2 different shapes and add different text to each shape. 
    Set vsoRectangle = ActivePage.DrawRectangle(2, 3, 5, 4)  
    Set vsoOval = ActivePage.DrawOval(2, 5, 5, 7)  
    vsoRectangle.Text = "Rectangle Shape"  
    vsoOval.Text = "Oval Shape"  
    'Get a Cell object from the first shape. 
    Set vsoCell = vsoRectangle.Cells("Width")  
    'Get a Characters object from the second shape. 
    Set vsoCharacters = vsoOval.Characters  
    'Use the Shape property to get the Shape object. 
    Set vsoShapeFromCell = vsoCell.Shape  
    Set vsoShapeFromCharacters = vsoCharacters.Shape  
    'Use each shape's text to verify the proper Shape 
    'object was returned.  
    Debug.Print vsoShapeFromCell.Text  
    Debug.Print vsoShapeFromCharacters.Text  
End Sub

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.