• 0
Ashrouf

popup menu

سؤال

السلام عليكم

ممكن اعرف كيفية انشاء popup menu على التقارير بحيث عند الضغط الى الزر الايمن للماوس يتم فتح قائمة يكون بها اوامر مثل: طباعة التقرير او تصدير الى الاكسل

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

6 إجابة على هذا السؤال .

  • 0

أنشئ مويول جديد والصق به هذا الكود:

Sub CreateSimpleShortcutMenu()

On Error Resume Next

   Dim MenuName As String

Dim CB As CommandBar

Dim CBB As CommandBarButton

MenuName = "CustomMenu"

Set CB = Application.CommandBars.Add(MenuName, msoBarPopup, False, False)

Set CBB = CB.Controls.Add(msoControlButton, 2521, , , True)

CBB.Caption = "طياعة"

Set CBB = CB.Controls.Add(msoControlButton, 247, , , True)

CBB.Caption = "إعداد الصفحة"

Set CBB = CB.Controls.Add(msoControlButton, 11723, , , True)

CBB.BeginGroup = True

CBB.Caption = "تصدير الى إكسيل"

Set CBB = CB.Controls.Add(msoControlButton, 12499, , , True)

CBB.Caption = “حفظ ك (PDF)

Set CBB = CB.Controls.Add(msoControlButton, 923, , , True)

CBB.BeginGroup = True

CBB.Caption = "إغلاق"

Set CB = Nothing

Set CBB = Nothing

End Sub

فى خصائص التقرير (property Sheet) وفى خانة (Shortcu Menu Bar) إختر (CustomMenu)

فى انتظار التجربه والافادة 

 

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بارك الله فيك يا استاذ عصام ولكن عند الضغط الزرالايمن من الماوس يظهرمربع صغير ولا يوجد به اى اوامر

فبرجاء الافادة وشكر جزيلا على المساعده

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

ا/أشرف برجاء إرفاق مثال للعمل عليه ... وشكرا

تم تعديل بواسطه essam rabea
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخى الكريم إعذرنى فى التأخير .. مرفق المثال بعد التعديل على الموديول فقط وارجو ان يفى بالغرض وسأرفق لك رابط عن القوائم المختصر زبادة فى الفائدة.

https://msdn.microsoft.com/en-us/vba/access-vba/articles/create-a-shortcut-menu-for-a-form-form-control-or-report

TEST2.accdb

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخى العزيز

شكرا جزيلا على المساعدة وجزاك الله كل خير

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .