Usuń menu kontekstowe drukowania prawym przyciskiem myszy z programu Outlook 2007

Question

Czy istnieje sposób usunięcia elementu Drukuj z menu kontekstowego po kliknięciu prawym przyciskiem myszy wiadomości e-mail z VBA?

Zawsze klikam prawym przyciskiem myszy, aby odpowiedzieć na e-mail, aby przypadkowo kliknąć Print i wysłać program Outlook bezpośrednio do drukarki szybciej niż mogę to zatrzymać.

UWAGA: używam Outlooka 2007.

Answer 1

oparciu o łącza TcKs zapewnienia, że ​​było całkiem proste . W poniższym przykładzie sprawdzam typ elementu, aby wpływał on tylko na wiadomości e-mail, a nie na elementy kalendarza. Aby wprowadzić kod w programie Outlook, wpisz Alt + F11, a następnie rozwiń obiekty Microsoft Office Outlook w okienku Project. Następnie kliknij dwukrotnie ThisOutlookSession. Następnie wklej ten kod do okna kodu. Nie lubię sprawdzać takich napisów, ponieważ możesz natrafić na problemy z internacjonalizacją. Ale nie widziałem ActionID ani nic w Command. Był FaceID, ale to tylko identyfikator ikony drukarki.

Private Sub Application_ItemContextMenuDisplay(ByVal CommandBar As Office.CommandBar, ByVal Selection As Selection) 

    Dim cmdTemp As Office.CommandBarControl 

    If Selection.Count > 0 Then 

     Select Case TypeName(Selection.Item(1)) 

     Case "MailItem" 

      For Each cmdTemp In CommandBar.Controls 

       If cmdTemp.Caption = "&Print" Then 

        cmdTemp.Delete 
        Exit For 

       End If 

      Next cmdTemp 

     Case Else 

      'Debug.Print TypeName(Selection.Item(1)) 

     End Select 

    End If 

End Sub 

Answer 2

Thera jest próbka jak programaticly pracy z programem Outlook: How to: Customize an Item Context Menu