SmartTagOptions オブジェクト

SmartTagOptions オブジェクト

Workbook SmartTagOptions

スマート タグで実行できるオプションを表します。

使い方

SmartTagOptions オブジェクトを取得するには、Workbook オブジェクトの SmartTagOptions プロパティを使用します。

SmartTagOptions オブジェクトを取得したら、次に示すプロパティを使用して、スマート タグのオプションの表示や、アクティブ ブックにスマート タグが埋め込まれているかどうかを調べることができます。

• EmbedSmartTags
• DisplaySmartTags

次の使用例は、アクティブ ブックへのスマート タグの埋め込みを可能にし、スマート タグの設定の表示をチェックします。

Sub CheckDisplayOptions()

    'アクティブ ブックへのスマート タグの埋め込みを可能にします。
    ActiveWorkbook.SmartTagOptions.EmbedSmartTags = True

    ' スマート タグの表示オプションをチェックします。
    Select Case ActiveWorkbook.SmartTagOptions.DisplaySmartTags
        Case xlButtonOnly
            MsgBox "スマート タグのボタンだけが表示されます。"
        Case xlDisplayNone
            MsgBox "スマート タグで表示されるものはありません。"
        Case xlIndicatorAndButton
            MsgBox "スマート タグのボタンとインジケータが表示されます。"
    End Select

End Sub