DataColumn.GetProperty メソッド (Visio)

指定されたデータ列のプロパティの値を取得します。

構文

式。GetProperty (プロパティ)

式DataColumn オブジェクトを返す式。

パラメーター

戻り値

バリアント型

注釈

Microsoft Visio 図面の図形をデータ レコードセットのデータにリンクする場合、Visio はそのデータ レコードセットの列を、図形データの各項目に対応するシェイプシートの図形データ セクションの行にマップします。

データ列のプロパティによって、データ列はシェイプシートの図形データ セクションの特定のセルにマップされます。 たとえば、列挙値 visDataColumnPropertyDisplayName で表される DisplayName プロパティを GetProperty メソッドに渡すことで、特定の図形データ項目の ShapeSheet の [図形データ] セクションの [ラベル] セルの値を取得できます。 さらに、このプロパティは、[図形データ] ダイアログ ボックスの 図形 データ項目のラベルと、Visio ユーザー インターフェイスの [外部 データ] ウィンドウに表示されるデータ列の名前を設定します。

Property パラメーターに設定可能な値は、次のとおりです。これらの値は VisDataColumnProperties で宣言されています。

例

次の Microsoft Visual Basic for Applications (VBA) マクロは、GetProperty メソッドを使用して、メソッドに渡されたデータ レコードセットの最初の列の [図形データ] セクションの [ラベル] セルの値を取得し、イミディエイト ウィンドウに表示する方法を示しています。 次に 、SetProperty メソッドを使用して値を設定し、新しい値を表示します。 この値を変更すると、データ レコードセット内の行にリンクされているすべての図形の [図形データ] ダイアログ ボックスの図形データ項目のラベルが変更されます。

ラベル セルの値を取得および設定するために、VisDataColumnProperties 列挙の visDataColumnPropertyDisplayName を DataColumn.GetProperty メソッドと DataColumn.SetProperty メソッドに渡します。

このマクロを実行する前に、VBA プロジェクトにマクロに渡すデータ レコードセットを最低 1 つは作成してください。

 
Public Sub GetProperty_Example(vsoDataRecordset As Visio.DataRecordset) 
    Dim strPropertyName As String 
    Dim strNewName As String 
    Dim vsoDataColumn As Visio.DataColumn 
 
    strNewName = "New Property Name" 
    Set vsoDataColumn = vsoDataRecordset.DataColumns(1) 
 
    strPropertyName = vsoDataColumn.GetProperty(visDataColumnPropertyDisplayName) 
    Debug.Print strPropertyName 
 
    vsoDataColumn.SetProperty visDataColumnPropertyDisplayName, strNewName 
    strPropertyName = vsoDataColumn.GetProperty(visDataColumnPropertyDisplayName) 
    Debug.Print strPropertyName 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。