ListObject.BeforeRightClick-Ereignis (2007 System)

Aktualisiert: Juli 2008

Tritt auf, wenn mit der rechten Maustaste auf das ListObject-Steuerelement geklickt wird, bevor die Standardklickaktion mit der rechten Maustaste ausgeführt wird.

Namespace:  Microsoft.Office.Tools.Excel
Assembly:  Microsoft.Office.Tools.Excel.v9.0 (in Microsoft.Office.Tools.Excel.v9.0.dll)

Syntax

Public Event BeforeRightClick As DocEvents_BeforeRightClickEventHandler

Dim instance As ListObject
Dim handler As DocEvents_BeforeRightClickEventHandler

AddHandler instance.BeforeRightClick, handler

public event DocEvents_BeforeRightClickEventHandler BeforeRightClick

Beispiele

Im folgenden Codebeispiel werden ein ListObject und ein BeforeRightClick-Ereignishandler erstellt. Beim Klicken mit der rechten Maustaste auf das Listenobjekt wird eine Meldung angezeigt, die angibt, ob das Listenobjekt an Daten gebunden ist.

Diese Version bezieht sich auf eine Anpassung auf Dokumentebene.

WithEvents List3 As Microsoft.Office.Tools.Excel.ListObject

Private Sub ListObject_BeforeRightClick()
    List3 = Me.Controls.AddListObject( _
        Me.Range("A1", "C4"), "List3")
End Sub


Sub List3_BeforeRightClick(ByVal Target As _
    Microsoft.Office.Interop.Excel.Range, _
    ByRef Cancel As Boolean) Handles List3.BeforeRightClick
    MessageBox.Show("Data binding is " & List3.IsBinding)
    Cancel = True
End Sub

Microsoft.Office.Tools.Excel.ListObject list3;
private void ListObject_BeforeRightClick()
{
    list3 = this.Controls.AddListObject(
        this.Range["A1", "C4"], "list3");
    list3.BeforeRightClick += new 
        Microsoft.Office.Interop.Excel.
        DocEvents_BeforeRightClickEventHandler(
        list3_BeforeRightClick);
}

void list3_BeforeRightClick(Microsoft.Office.Interop.Excel.Range 
    Target, ref bool Cancel)
{
    MessageBox.Show("Data binding is " + list3.IsBinding);
    Cancel = true;
}

Diese Version bezieht sich auf ein Add-In auf Anwendungsebene.

WithEvents List3 As ListObject

Private Sub ListObject_BeforeRightClick()
    Dim vstoWorksheet As Worksheet = CType( _
        Me.Application.ActiveWorkbook.Worksheets(1),  _
        Excel.Worksheet).GetVstoObject()
    List3 = vstoWorksheet.Controls.AddListObject( _
        vstoWorksheet.Range("A1", "C4"), "List3")
End Sub


Sub List3_BeforeRightClick(ByVal Target As  _
    Microsoft.Office.Interop.Excel.Range, _
    ByRef Cancel As Boolean) Handles List3.BeforeRightClick
    System.Windows.Forms.MessageBox.Show("Data binding is " & List3.IsBinding)
    Cancel = True
End Sub

ListObject list3;
private void ListObject_BeforeRightClick()
{
    Worksheet vstoWorksheet = ((Excel.Worksheet)
        this.Application.ActiveWorkbook.Worksheets[1]).GetVstoObject();
    list3 = vstoWorksheet.Controls.AddListObject(
        vstoWorksheet.Range["A1", "C4"], "list3");
    list3.BeforeRightClick += new
        Excel.DocEvents_BeforeRightClickEventHandler(
        list3_BeforeRightClick);
}

void list3_BeforeRightClick(Microsoft.Office.Interop.Excel.Range
    Target, ref bool Cancel)
{
    System.Windows.Forms.MessageBox.Show("Data binding is " + list3.IsBinding);
    Cancel = true;
}

Berechtigungen

• Volle Vertrauenswürdigkeit für den unmittelbaren Aufrufer. Dieser Member kann von nur teilweise vertrauenswürdigem Code nicht verwendet werden. Weitere Informationen finden Sie unter Verwenden von Bibliotheken aus teilweise vertrauenswürdigem Code.

Siehe auch

Referenz

ListObject-Klasse

ListObject-Member

Microsoft.Office.Tools.Excel-Namespace

Änderungsprotokoll