مشكلة إختفاء التاب في الإكسيل 

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

سال احد الأخوة في الفيس بوك عن مشكلة تواجهه و هي إختفاء و ظهور الـ Sheet Tabs

و للأسف أن أحد أسباب هذه المشكلة هو قيام بعض الأخوة بإخفاء هذه التاب عندما تعمل برامجهم, و لا يقومون بإعادتها كما كانت عند إلاق برامجهم, فالأصل في أي عمل برمجي أن تعيد جميع الإعدادات كما كانت قبل التعديل عليها.

و لكي تكون الصورة أوضح لما أعنيه, في هذه الصورة الوضع الطبيعي في الإكسيل أن تظهر أسماء الصفحات بجاانب بعضها البعض .

فا أسماء الصفحات ظاهره , و لكن المشكلة التي نتحدث عنها هي أن هذه التابات تختفي 

فيصبح الشكل كالتالي : 

فالصورتين أعلاه لنفس الملف 

فإذا واجهتنا هذه المشكلة يوجد أكثر من طريقة للحل 

الطريقة الأولى : أن تقوم بإعادة تفعيل الأمر لاخاص بعرض التابات يدوياً بإتباع الخطوات التالية  : 

من File 

نختار 

Options

ثم من شاشة الخيارت التي ستظهر لنا نختار Advanced 

ثم من ضمن المجموعة 

Display Options for this workbook 

نضع علامة صح على الخيار 

Show Sheets Tab

و بذلك ستظهر التابات مجددا 

الطريقة الثانية : أن تستخدم الكود البرمجي التالي ( و يا حبذا لو ان الأخوة المبرمجين أن يقوموا بوضعه في حدث BeforeClose  ) حتى نضمن أن تعود الإعدادات كما كانت.

و هذا هو الكود 

ActiveWindow.DisplayWorkbookTabs = True

و هنا يتم وضع الكود في حالة الخروج من البرنامج 

أتمنى أن تكون الفكرة واضحة 

دمتم في حفظ الله 

يحيى حسين 

Excel MVP