次の方法で共有


SmartTag インターフェイス

Visual Studio の Office 開発ツールを使用してカスタマイズされた Word 文書内のスマート タグを表します。

名前空間:  Microsoft.Office.Tools.Word
アセンブリ:  Microsoft.Office.Tools.Word (Microsoft.Office.Tools.Word.dll 内)

構文

'宣言
<GuidAttribute("2b90a8e2-4e6c-4c27-bd35-a6ba7b344223")> _
Public Interface SmartTag _
    Inherits SmartTagBase
[GuidAttribute("2b90a8e2-4e6c-4c27-bd35-a6ba7b344223")]
public interface SmartTag : SmartTagBase

SmartTag 型で公開されるメンバーは以下のとおりです。

プロパティ

  名前 説明
パブリック プロパティ Actions スマート タグによって公開されるアクションの配列を取得または設定します。 この型またはメンバーは 2007 Microsoft Office システムのプロジェクト専用です。スマート タグは Office 2010 では使用されていません。
. (SmartTagBase から継承されます。)
パブリック プロパティ Caption スマート タグの名前を取得します。 この型またはメンバーは 2007 Microsoft Office システムのプロジェクト専用です。スマート タグは Office 2010 では使用されていません。
. (SmartTagBase から継承されます。)
パブリック プロパティ DefaultExtension この SmartTag オブジェクトの既定の拡張機能を取得します。 この型またはメンバーは 2007 Microsoft Office システムのプロジェクト専用です。スマート タグは Office 2010 では使用されていません。
.
パブリック プロパティ Expressions スマート タグで認識する正規表現のコレクションを取得します。 この型またはメンバーは 2007 Microsoft Office システムのプロジェクト専用です。スマート タグは Office 2010 では使用されていません。
. (SmartTagBase から継承されます。)
パブリック プロパティ Extension この SmartTag オブジェクトのカスタムの拡張機能を取得します。
パブリック プロパティ SmartTagType スマート タグの一意の識別子として機能する名前空間を取得します。 この型またはメンバーは 2007 Microsoft Office システムのプロジェクト専用です。スマート タグは Office 2010 では使用されていません。
. (SmartTagBase から継承されます。)
パブリック プロパティ Terms スマート タグで認識するリテラル文字列のコレクションを取得します。 この型またはメンバーは 2007 Microsoft Office システムのプロジェクト専用です。スマート タグは Office 2010 では使用されていません。
. (SmartTagBase から継承されます。)

このページのトップへ

メソッド

  名前 説明
パブリック メソッド Remove スマート タグから正規表現レコグナイザーを削除します。 この型またはメンバーは 2007 Microsoft Office システムのプロジェクト専用です。スマート タグは Office 2010 では使用されていません。
. (SmartTagBase から継承されます。)

このページのトップへ

解説

スマート タグを作成するには、Globals.Factory.CreateSmartTag メソッドを使用して SmartTag オブジェクトを作成します。

[!メモ]

これは、Visual Studio Tools for Office Runtime によって実装されたインターフェイスです。コードに実装されるものではありません。詳細については、「Visual Studio Tools for Office Runtime の概要」を参照してください。

使用方法

この型は、Word 2007 のプロジェクトでのみ使用されることを目的としています。Word 2010 でのスマート タグの使用は推奨されていません。

次のコード例は、スマート タグの作成方法を示します。このスマート タグ アクションは、実行時にこのアクションのメニュー キャプションを変更し、認識したテキストの場所を表示します。

Private WithEvents displayAddress As Microsoft.Office.Tools.Word.Action

Private Sub AddSmartTag()

    ' Create the smart tag for .NET Framework 4 projects.
    Dim smartTagDemo As Microsoft.Office.Tools.Word.SmartTag = Globals.Factory.CreateSmartTag(
        "www.microsoft.com/Demo#DemoSmartTag",
        "Demonstration Smart Tag")

    ' For .NET Framework 3.5 projects, use the following code to create the smart tag.
    ' Dim smartTagDemo As New  _
    '     Microsoft.Office.Tools.Word.SmartTag( _
    '     "www.microsoft.com/Demo#DemoSmartTag", _
    '     "Demonstration Smart Tag")

    ' Specify the terms to recognize.
    smartTagDemo.Terms.Add("term")
    smartTagDemo.Terms.Add("recognize")

    ' Create the action for .NET Framework 4 projects.
    displayAddress = Globals.Factory.CreateAction("To be replaced")

    ' For .NET Framework 3.5 projects, use the following code to create the action.
    ' displayAddress = New Microsoft.Office.Tools.Word.Action("To be replaced")

    ' Add the action to the smart tag.
    smartTagDemo.Actions = New Microsoft.Office.Tools.Word.Action() { _
            displayAddress}

    ' Add the smart tag.
    Me.VstoSmartTags.Add(smartTagDemo)
End Sub

Private Sub DisplayAddress_BeforeCaptionShow(ByVal sender As Object, _
    ByVal e As Microsoft.Office.Tools.Word.ActionEventArgs) _
    Handles displayAddress.BeforeCaptionShow

    Dim clickedAction As Microsoft.Office.Tools.Word.Action = _
        TryCast(sender, Microsoft.Office.Tools.Word.Action)

    If clickedAction IsNot Nothing Then
        clickedAction.Caption = "Display the location of " & e.Text
    End If
End Sub

Private Sub DisplayAddress_Click(ByVal sender As Object, _
    ByVal e As Microsoft.Office.Tools.Word.ActionEventArgs) _
    Handles displayAddress.Click

    Dim termStart As Integer = e.Range.Start
    Dim termEnd As Integer = e.Range.End
    MsgBox("The recognized text '" & e.Text & _
            "' begins at position " & termStart & _
            " and ends at position " & termEnd)
End Sub
private Microsoft.Office.Tools.Word.Action displayAddress;

private void AddSmartTag()
{
    // Create the smart tag for .NET Framework 4 projects.
    Microsoft.Office.Tools.Word.SmartTag smartTagDemo =
        Globals.Factory.CreateSmartTag(
        "www.microsoft.com/Demo#DemoSmartTag",
        "Demonstration Smart Tag");

    // For .NET Framework 3.5 projects, use the following code to create the smart tag.
    // Microsoft.Office.Tools.Word.SmartTag smartTagDemo =
        // new Microsoft.Office.Tools.Word.SmartTag(
        //     "www.microsoft.com/Demo#DemoSmartTag",
        //     "Demonstration Smart Tag");

    // Specify the terms to recognize.
    smartTagDemo.Terms.Add("term");
    smartTagDemo.Terms.Add("recognize");

    // Create the action for .NET Framework 4 projects.
    displayAddress = Globals.Factory.CreateAction("To be replaced"); 

    // For .NET Framework 3.5 projects, use the following code to create the action.
    // displayAddress = new Microsoft.Office.Tools.Word.Action("To be replaced");

    // Add the action to the smart tag.
    smartTagDemo.Actions = new Microsoft.Office.Tools.Word.Action[] { 
        displayAddress };

    // Add the smart tag.
    this.VstoSmartTags.Add(smartTagDemo);

    displayAddress.BeforeCaptionShow += new
        Microsoft.Office.Tools.Word.BeforeCaptionShowEventHandler(
        displayAddress_BeforeCaptionShow);

    displayAddress.Click += new
        Microsoft.Office.Tools.Word.ActionClickEventHandler(
        displayAddress_Click);
}

void displayAddress_BeforeCaptionShow(object sender,
    Microsoft.Office.Tools.Word.ActionEventArgs e)
{
    Microsoft.Office.Tools.Word.Action clickedAction =
        sender as Microsoft.Office.Tools.Word.Action;

    if (clickedAction != null)
    {
        clickedAction.Caption = "Display the location of " +
            e.Text;
    }
}

void displayAddress_Click(object sender,
    Microsoft.Office.Tools.Word.ActionEventArgs e)
{
    int termStart = e.Range.Start;
    int termEnd = e.Range.End;
    System.Windows.Forms.MessageBox.Show("The recognized text '" + e.Text +
        "' begins at position " + termStart.ToString() +
        " and ends at position " + termEnd.ToString());
}

参照

関連項目

Microsoft.Office.Tools.Word 名前空間