كود اظهار شريط الحالة

[وليد زقزوق]

عندي ملف افعل بداخلة كود اخفاء واظهار شرائط الادوات ولكني احتاج الي اظهار شريط الحالة فقطفما هو الحل

[أيسم إبراهيم]

السلام عليكم

استخدم الكود التالي

Sub unhide()
    With Application
   .DisplayStatusBar = True
  End With
End Sub

[حمادة عمر]

السلام عليكم

الاخ الكريم / وليد زقزوق

 

جرب استخدام الكود التالي

عله ينفع معك باذن الله

 

Private Sub Workbook_Open()
With Application
      .DisplayStatusBar = True
End With
End Sub

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

[حمادة عمر]

السلام عليكم

الاستاذ القدير الكبير / أيسم إبراهيم

 

اقدم اعتذاري لسيادتكم حيث انني لم اري مشاركتكم

حيث كنت اعد للرد ولم اري مشاركتك الا بعد ارسال ارد

تقبل اعتذاري

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

[أيسم إبراهيم]

السلام عليكم

الاستاذ القدير الكبير / أيسم إبراهيم

 

اقدم اعتذاري لسيادتكم حيث انني لم اري مشاركتكم

حيث كنت اعد للرد ولم اري مشاركتك الا بعد ارسال ارد

تقبل اعتذاري

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

و عليكم السلام أستاذنا 

سبقتك إلى الخير هذه المرة لكنك ما شاء الله عليك و على مشاركاتك الممتازة حصلت بها الخير الكثير

جعله الله في ميزان حسناتك . آميييييييييييييين يا رب العالمين

تم تعديل فبراير 8, 2013 بواسطه أيسم إبراهيم

[حمادة عمر]

السلام عليكم

الاستاذ القدير / أيسم إبراهيم

 

نتلمس الطريق استاذنا الكبير لنسير علي خطاكم

ولكننا نقطة في بحر علمكم او اقل

زادكم الله من علمه وجعله في ميزان حسناتك يوم القيامة

 

وشهادة من استاذ مثلك لهي شرف كبير لي

ولا تغب عنا استاذنا فوجودك الدائم في هذه الصرح الكبير يسعدنا

 

من احد تلاميذك / حمادة عمر

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

[وليد زقزوق]

لم يفلح اي منهم اخواني الاعزاء

[وليد زقزوق]

هذه الاكواد لم تعمل هل من حل اخر

[حمادة عمر]

السلام عليكم

الاخ الكريم / وليد زقزوق

 

ضع الكود في حدث فتح الملف في حدث ThisWorkbook

ليعمل معك عند فتح الملف

 

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

[وليد زقزوق]

يا اخ

حمادة عمر

مش شغالة ايضا عايز حل يكون سهل وسريع التنفيذ

او علي الاقل شرح الخطوات لتنفيذ الكود