Action الواجهة

مقالة
09/21/2010

يمثل إجراء علامة ذكية في مصنف Excel الذي هو مخصصة باستخدام أدوات تطوير المكتب في Studio Vهوual.

مساحة الاسم: Microsoft.Office.Tools.Excel
التجميع: Microsoft.Office.Tools.Excel (في Microsoft.Office.Tools.Excel.dll)

بناء الجملة

'إقرار
<GuidAttribute("37e25b46-6941-4833-9b08-e692cf461982")> _
Public Interface Action _
    Inherits ActionBase

[GuidAttribute("37e25b46-6941-4833-9b08-e692cf461982")]
public interface Action : ActionBase

ملاحظات

تكون الاجراءات الخيارات متوفر في قائمة المختصرة العلامات ذكى عند علامة ذكية من نوع معين هو التعرف عليها. إلى إنشاء إجراء ما، استخدم Globals.Factory.CreateActionأسلوب إلى إنشاء Actionالكائن. لمزيد من المعلومات، راجع هندسة العلامات الذكية.

ملاحظة

يتم تطبيق هذه الواجهة بواسطة Visual Studio Tools لوقت تشغيل Office. ولم يتم تصميمها لتطبيقها في التعليمة البرمجية الخاصة بك. لمزيد من المعلومات، راجع أدوات Visual Studio نظرة عامة وقت تشغيل Office.

الاستخدام

Th هو نوع هو مخصصة للاستخدام فقط في مشاريع لبرنامج Excel 2007. يتم مهمل علامات ذكى في Excel 2010. لمزيد من المعلومات، راجع نظرة عامة حول العلامات الذكية.

توضح هذه الوثائق الإصدار الخاص بهذا النوع المستخدم في مشاريع Office والذي يستهدف .NET Framework 4. وفي المشاريع التي تستهدف .NET Framework 3.5، قد يكون لدى هذا النوع أعضاء مختلفون وقد لا تعمل نماذج التعليمات البرمجية الخاصة بهذا النوع. للحصول على وثائق حول هذا النوع في المشاريع التي تستهدف .NET Framework 3.5، اطلع على جزء المرجع التالي في وثائق Visual Studio 2008: https://go.microsoft.com/fwlink/?LinkId=160658.

أمثلة

مثال التعليمة البرمجية التالية ينشئ SmartTagمع Actionالذي يتعرف على المصطلح "مبيعات" و تعبير عادي "ssue\s\d [I|i] {5,6}". إجراء الذي يقوم بتعديل قائمة التسمية التوضيحية للإجراء في وقت التشغيل و يعرض العنوان نص الذي تم التعرف عليه. إلى اختبار المثال اكتب الكلمة "مبيعات" في خلية واحدة وخلية "المشكله 12345" والموجودة في آخر السلسلة وثم حاول إجراء علامة ذكى.

WithEvents displayAddress As Microsoft.Office.Tools.Excel.Action

Private Sub AddSmartTag()

    ' Create the smart tag for .NET Framework 4 projects.
    Dim smartTagDemo As Microsoft.Office.Tools.Excel.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.Excel.SmartTag( _
    '    "www.microsoft.com/Demo#DemoSmartTag", _
    '    "Demonstration Smart Tag")

    ' Specify a term and an expression to recognize.
    smartTagDemo.Terms.Add("sale")
    smartTagDemo.Expressions.Add( _
        New System.Text.RegularExpressions.Regex( _
        "[I|i]ssue\s\d{5,6}"))

    ' 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.Excel.Action("To be replaced")

    ' Add the action to the smart tag.
    smartTagDemo.Actions = New Microsoft.Office.Tools.Excel.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.Excel.ActionEventArgs) _
    Handles DisplayAddress.BeforeCaptionShow

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

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

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

    Dim smartTagAddress As String = e.Range.Address( _
        ReferenceStyle:=Excel.XlReferenceStyle.xlA1)
    MsgBox("The recognized text '" & e.Text & _
            "' is at range " & smartTagAddress)
End Sub

private Microsoft.Office.Tools.Excel.Action displayAddress;

private void AddSmartTag()
{
    // Create the smart tag for .NET Framework 4 projects.
    Microsoft.Office.Tools.Excel.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.Excel.SmartTag smartTagDemo =
        // new Microsoft.Office.Tools.Excel.SmartTag(
        //     "www.microsoft.com/Demo#DemoSmartTag",
        //     "Demonstration Smart Tag");

    // Specify a term and an expression to recognize.
    smartTagDemo.Terms.Add("sale");
    smartTagDemo.Expressions.Add(
        new System.Text.RegularExpressions.Regex(
        @"[I|i]ssue\s\d{5,6}"));

    // 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.Excel.Action("To be replaced");

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

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

    displayAddress.BeforeCaptionShow += new 
        Microsoft.Office.Tools.Excel.BeforeCaptionShowEventHandler(
        DisplayAddress_BeforeCaptionShow);

    displayAddress.Click += new 
        Microsoft.Office.Tools.Excel.ActionClickEventHandler(
        DisplayAddress_Click);
}

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

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

void DisplayAddress_Click(object sender, 
    Microsoft.Office.Tools.Excel.ActionEventArgs e)
{
    string smartTagAddress = e.Range.get_Address(missing,
        missing, Excel.XlReferenceStyle.xlA1, missing, missing);
    System.Windows.Forms.MessageBox.Show("The recognized text '" + e.Text +
        "' is at range " + smartTagAddress);
}