Workbook.SheetBeforeRightClick-Ereignis (2007 System)

Aktualisiert: November 2007

Tritt vor der Standardaktion für Klicken mit der rechten Maustaste ein, wenn mit der rechten Maustaste auf ein Arbeitsblatt geklickt wird.

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

Syntax

Public Event SheetBeforeRightClick As WorkbookEvents_SheetBeforeRightClickEventHandler

Dim instance As Workbook
Dim handler As WorkbookEvents_SheetBeforeRightClickEventHandler

AddHandler instance.SheetBeforeRightClick, handler
public event WorkbookEvents_SheetBeforeRightClickEventHandler SheetBeforeRightClick

Hinweise

Dieses Ereignis tritt bei Diagrammblättern nicht ein.

Beispiele

Im folgenden Codebeispiel wird ein Handler für das SheetBeforeRightClick-Ereignis veranschaulicht. Der Ereignishandler informiert den Benutzer, dass es nicht zulässig ist, mit der rechten Maustaste auf das Arbeitsblatt zu klicken, und legt den Cancel-Parameter des WorkbookEvents_SheetBeforeRightClickEventHandler-Ereignishandlers auf true fest, sodass Microsoft Office Excel die Aktion für das Klicken mit der rechten Maustaste abbricht.

Dieses Beispiel bezieht sich auf eine Anpassung auf Dokumentebene.

Sub ThisWorkbook_SheetBeforeRightClick(ByVal Sh As Object, _
    ByVal Target As Excel.Range, ByRef Cancel As Boolean) _
    Handles Me.SheetBeforeRightClick

    MsgBox("Right-clicking in " & CType(Sh, Excel.Worksheet).Name & _
        " is not allowed.")
    Cancel = True
End Sub
private void WorkbookSheetBeforeRightClick()
{
    this.SheetBeforeRightClick +=
        new Excel.WorkbookEvents_SheetBeforeRightClickEventHandler(
        ThisWorkbook_SheetBeforeRightClick);
}

void ThisWorkbook_SheetBeforeRightClick(object Sh,
    Excel.Range Target, ref bool Cancel)
{
    MessageBox.Show("Right-clicking in " + ((Excel.Worksheet)Sh).Name +
        " is not allowed.");
    Cancel = true;
}

Berechtigungen

Siehe auch

Referenz

Workbook-Klasse

Workbook-Member

Microsoft.Office.Tools.Excel-Namespace