ارجاع شريط ادوات ورقة اكسل

[ابو شرف]

بسم الله الرحمن الرحيم

الأخوة الأعزاء

حدثت لي مشكلة امس وهي عندما طلقت احدى الأكواد والتي لم اعرفها لاي شيء ذهب شريط الأدوات ولم يرجع وظهر لي شريط اخر يختف به ( التخطيط . بدل البيانات . الملف . تحرير . تعليمات . ........الخ

رجاء رجاء اريد ارجاع شريط الأدوات ورحم الله والديكم

شكرا لكم

اخوكم ابو شرف

[أكرم الغامدي]

أخي أبوشرف عليك وضع المعادلة المسببة للمشكلة لكي نستطيع مساعدتك أكثر.

[هادى محمد المامون سالم]

بسم الله الرحمن الرحيم

اذا كنت تستخدم اوفيس 2003

استخدم الكود التالى لحل المشكله

Sub Menu_On()
    Application.CommandBars("Worksheet Menu Bar").Enabled = True
End Sub

مرفق ملف لاخفاء و اعاده شريط القوائم

السلام عليكم

[ابو اسامة العينبوسي]

السلام عليكم

اعدتم الروح للمنتدى

[هادى محمد المامون سالم]

السلام عليكم

اعدتم الروح للمنتدى

بسم الله الرحمن الرحيم

الله يكرمك

السلام عليكم

[م موسى]

اضغط على مكان فارغ في أعلى الملف ثم كلمة تخصيص أشرطة أدوات ثم اختر الأوامر ثم اختر قوائم متضمنة

ثم قم بسحب الشيء المخفي على الشريط العلوي

[منسق]

الأخوة الكرام ... السلام عليكم ورحمة الله وبركاته

هذا الكود يخفي القوائم في أوفيس 2003 فقط

فما هو الحل مع أوفيس 2007

زلكم تحياتي ...

منسق