إزالة حق انقر فوق طباعة قائمة السياق من Outlook 2007

Question

هل هناك أي طريقة أستطيع أن إزالة هذا البند الطباعة من قائمة السياق عند النقر بزر الماوس الأيمن على البريد الإلكتروني مع VBA?

أنا إلى الأبد النقر بزر الماوس الأيمن الرد على رسالة بريد إلكتروني ، إلا بطريق الخطأ انقر فوق Print و Outlook إرسالها مباشرة إلى الطابعة أسرع مما كنت يمكن أن يوقف ذلك.

ملحوظة:: أنا باستخدام Outlook 2007.

Answer 1

على أساس الارتباط TcKs تقدم ، التي كانت بسيطة جدا.في المثال أدناه لقد تحقق نوع من البند بحيث يؤثر فقط على رسائل البريد الإلكتروني وليس عناصر التقويم.إلى إدخال رمز في outlook اكتب Alt + F11 ثم قم بتوسيع Microsoft Office Outlook الكائنات في جزء المشروع.ثم انقر نقرا مزدوجا فوق ThisOutlookSession.ثم لصق هذا الكود في إطار التعليمات البرمجية.أنا لا أحب أن تحقق تعليق مثل هذا كما يمكنك تشغيل في مشاكل مع التدويل.ولكن أنا لا أرى ActionID أو أي شيء عن الأمر.كان هناك FaceID ولكن هذا هو مجرد معرف رمز الطابعة.

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

ثيرا هو عينة كيفية programaticly العمل مع Outlook:كيفية:تخصيص عنصر قائمة السياق