كود اخفاء زر اوفس وقوائم الاكسل العلوية

[ابومريم]

السلام عليكم

ايها المشرفون والاعضاء الكرام.

هل يوجد كود اخفاء زر اوفس وقوائم الاكسل العلوية

ويضع عند حدث الفتح للمصنف ( لكن لااعرف كيف اصل لحدث فتح المصنف)

وكود اظهارة يكون على زر امر

وياريت التوضيح بالصور

اوفديو مصور

وجزاكم الله خير

[جمال عبد السميع]

ده كود علي قدي لعلة يكون المطلوب وهو أ ، ب برمجة لأننا لسة بنتعلم من هذا المنتدي الرائع

الكود.rar

[عبدالله المجرب]

بإمكانك استخدام هذه الاكواد (2007) في حدث ThisWorkbook لاخفائها عند الفتح واعادتها عند الاعلاق

Private Sub Workbook_Open()

ActiveWindow.DisplayHeadings = False

Application.DisplayFormulaBar = False

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",FALSE)"

End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)

ActiveWindow.DisplayHeadings = True

Application.DisplayFormulaBar = True

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"

End Sub

[ابومريم]

السلام عليكم

جزاكم الله خير

الاخ محمد لي

والاخ ابو احمد

وفي ميزان حسناتكم مشكورين

وتم المطلوب

وفقكم الله الى مايحبه ويرضاه

تحياتي وسلامي

[إبراهيم محمد]

كود رائع للاستاذ عبد الله المجرب وفقك الله ودائما المزيد من العلم والعطاء باذن الله