kann es sein das das Kontext Menü (rechte Maustaste)
auch ein Commandbar ist?
Ich mache folgende Aktion wenn ich ein bestimmtes Workbook
activiere:
Private Sub Workbook_Activate()
Dim CB As CommandBar
For Each CB In Application.CommandBars
CB.Enabled = (CB.Name = "Probecard Design Tool Rev_2" Or CB.Name = "Worksheet Menu Bar")
Next CB
On Error Resume Next
Application.CommandBars("Probecard Design Tool Rev_2").Visible = True
End Sub
Und es funtzt dann auch das Kontext Menü nicht mehr!
Gruß
Swen