Action Arabirim

Makale
10/29/2012

Visual Studio Office geliştirme araçlarını kullanarak özelleştirilmiş bir Excel çalışma kitabına akıllı etiket eylemi temsil eder.

Ad alanı: Microsoft.Office.Tools.Excel
Derleme: Microsoft.Office.Tools.Excel (Microsoft.Office.Tools.Excel.dll içinde)

Sözdizimi

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

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

Action türü aşağıdaki üyeleri ortaya koyar.

Özellikler

	Ad	Açıklama
	Caption	Alır veya akıllı etiket menüsünde görüntülenen eylemin adı ayarlar. Bu tür veya üyenin yalnızca 2007 Microsoft Office sistemi projelerinde kullanılması amaçlanmaktadır. Akıllı etiketler Office 2010'da kullanılmamaktadır. . (ActionBase kaynağından devralındı.)

Üst

Olaylar

	Ad	Açıklama
	BeforeCaptionShow	Kullanıcı akıllı etiket simgesini tıklattıktan sonra önce Akıllı etiket menüsünde görüntülenen oluşur. Bu tür veya üyenin yalnızca 2007 Microsoft Office sistemi projelerinde kullanılması amaçlanmaktadır. Akıllı etiketler Office 2010'da kullanılmamaktadır. .
	Click	Akıllı etiket menüsünde eylem tıklatıldığında gerçekleşir. Bu tür veya üyenin yalnızca 2007 Microsoft Office sistemi projelerinde kullanılması amaçlanmaktadır. Akıllı etiketler Office 2010'da kullanılmamaktadır. .

Üst

Notlar

Belirli bir türdeki akıllı etiket tanındığında akıllı etiket kısayol menüsünde kullanılabilir seçenekleri eylemlerdir.Eylem oluşturmak için Globals.Factory.CreateAction yöntemi oluşturmak için bir Action nesne...

[!NOT]

Bu arabirim Office için Visual Studio Araçları çalışma zamanı tarafından uygulanır. Kodunuzda gerçekleştirilmesi amaçlanmamıştır. Daha fazla bilgi için bkz. Office için Visual Studio Araçları Çalışma Zamanına Genel Bakış.

Kullanım

Bu tür projelerin yalnızca Excel 2007 için kullanılmak üzere hazırlanmıştır.Akıllı etiketler Excel 2010 kaldırılmıştır...

Bu belgelerde, .NET Framework 4'ü hedefleyen projelerde kullanılan bu türün sürümü açıklanır. .NET Framework 3.5'i hedefleyen projelerde, bu türün üyeleri farklı olabilir ve bu tür için sağlanan kod örnekleri çalışmayabilir. .NET Framework 3.5'i hedefleyen projelerde bu tür hakkındaki belgeler için Visual Studio 2008 belgelerinde aşağıdaki başvuru bölümüne bakın: https://go.microsoft.com/fwlink/?LinkId=160658.

Örnekler

Aşağıdaki kod örneği oluşturur bir SmartTag ile bir Action , "[I|i] ssue\s\d {5,6}" terimi "Satış" ve normal ifade tanır.Eylem eylem çalışma zamanında menü başlığını değiştirir ve tanınan metin adresini görüntüler.Örneği test etmek için bir hücreye "Satış" sözcüğünü yazın ve dize "12345 başka bir hücrede vermek" ve akıllı etiket eylem deneyin.

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

Private Sub AddSmartTag()

    Dim smartTagDemo As Microsoft.Office.Tools.Excel.SmartTag = _
        Globals.Factory.CreateSmartTag(
        "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}"))

    displayAddress = Globals.Factory.CreateAction("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()
{
    Microsoft.Office.Tools.Excel.SmartTag smartTagDemo =
        Globals.Factory.CreateSmartTag(
            "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}"));

    displayAddress = Globals.Factory.CreateAction("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(Excel.XlReferenceStyle.xlA1);
    System.Windows.Forms.MessageBox.Show("The recognized text '" + e.Text +
        "' is at range " + smartTagAddress);
}

Ayrıca bkz.

Başvuru

Microsoft.Office.Tools.Excel Ad Alanı

SmartTag

Aracılığıyla paylaş