recordatorios - dejar de recibir correos de recordatorio de cumpleaños outlook

Eliminar menú contextual de impresión con clic derecho de Outlook 2007

Question

¿Hay alguna manera de que pueda eliminar el elemento Imprimir del menú contextual cuando hace clic derecho en un correo electrónico con VBA?

Siempre estoy haciendo clic derecho para responder un correo electrónico, solo para hacer clic accidentalmente en Print y hacer que Outlook lo envíe directamente a la impresora más rápido de lo que puedo detenerlo.

NB: estoy usando Outlook 2007.

Answer 1

Según el enlace que proporcionan los TcK, eso fue bastante simple. En el siguiente ejemplo, verifico el tipo de artículo para que solo afecte los correos electrónicos y no los elementos del calendario. Para ingresar el código en Outlook, escriba Alt + F11, luego expanda los Objetos de Microsoft Office Outlook en el panel Proyecto. Luego haga doble clic en ThisOutlookSession. A continuación, pega este código en la ventana de código. No me gusta revisar los subtítulos, ya que puede tener problemas con la internacionalización. Pero no vi un ActionID ni nada en el Comando. Había un FaceID pero eso es solo la identificación del ícono de la impresora.

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 es una muestra de cómo trabajar programáticamente con Outlook: Cómo: personalizar un menú contextual de artículo