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
'Declaration
Public Event BeforeRightClick As DocEvents_BeforeRightClickEventHandler
'Usage
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
Microsoft.Office.Tools.Excel-Namespace
Änderungsprotokoll
Date |
Versionsgeschichte |
Grund |
---|---|---|
Juli 2008 |
Version des Codebeispiels für ein Add-In auf Anwendungsebene hinzugefügt. |
SP1-Featureänderung. |