JavaScript is not enabled!...Please enable javascript in your browser

جافا سكريبت غير ممكن! ... الرجاء تفعيل الجافا سكريبت في متصفحك.

-->
الصفحة الرئيسية

مكتبة الاوفيس | اهم 100 كود فى الاكسل Excel VBA اخفاء جميع اوراق العمل فى ملف الاكسل ماعدا الشيت النشط

 

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

اهلا بكم متابعى موقع عالم الاوفيس

مازلنا مستمرين فى شرح اهم 100 كود من اكواد الاكسل VBA

الكود الثالث | اخفاء جميع اوراق العمل فى ملف الاكسل ماعدا الشيت النشط



اخفاء أوراق العمل في ملف Excel له أهمية عدة، وإليك بعض الأسباب التي تبرز هذه الأهمية:

 

1. حماية البيانات: بإخفاء أوراق العمل ذات البيانات الحساسة، يمكنك حماية هذه البيانات من الوصول غير المصرح به. يعني ذلك أنه إذا كان لديك معلومات حساسة أو سرية في ورقة عمل معينة، فيمكنك إخفاءها لمنع أي شخص غير مخول من رؤيتها أو التعديل عليها.

 

2. الترتيب والتنظيم: عندما يكون لديك ملف Excel يحتوي على العديد من أوراق العمل، يمكن أن يكون من الصعب العثور على الورقة المطلوبة بسرعة. بإخفاء بعض الأوراق غير الضرورية، يمكنك تبسيط العرض وتحسين التنظيم، مما يجعل من السهل العثور على الأوراق التي تحتاج إليها.

 

3. تبسيط الاجتماعات والعروض التقديمية: قد تحتاج إلى استخدام ملف Excel في إعداد عروض تقديمية أو في اجتماعات. بإخفاء الأوراق غير الضرورية، يمكنك تبسيط عرض الشاشة وتقليل التشويش على المشاهدين. يعني ذلك أنه يمكنك التركيز على الأوراق المهمة والبيانات الرئيسية دون أن يتشتت انتباه الجمهور.

 

4. تحسين الأداء: عندما تكون هناك العديد من أوراق العمل والبيانات في ملف Excel، قد يؤثر ذلك على أداء البرنامج. بإخفاء الأوراق غير المستخدمة، يمكنك تحسين سرعة استجابة البرنامج وتقليل استهلاك الذاكرة والموارد.

 

5. الحفاظ على السرية: في بعض الحالات، قد تحتاج إلى مشاركة ملف Excel مع الآخرين ولكن ترغب في إبقاء بعض الأوراق العمل سرية. بإخفاء هذه الأوراق، يمكنك التحكم في البيانات التي يمكن رؤيتها والتعديل عليها من قبل المستخدمين الآخرين.

 

باختصار، إخفاء أوراق العمل في ملف Excel يساعد في حماية البيانات، ترتيب وتنظيم الملف، تبسيط الاجتماعات والعروض التقديمية، تحسين أداء البرنامج، والحفاظ على السرية للبيانات الحساسة.

Sub cod3_3()

 Dim ws As Worksheet

  For Each ws In ThisWorkbook.Worksheets

    If ws.Name <> ThisWorkbook.ActiveSheet.Name Then

     ws.Visible = xlSheetHidden

    End If

 Next ws

 

End Sub

 

 

قد يعجبك ايضا

  1.  تحميل برنامج حركة الخزينة مجانا
  2. اسطوانة التعريفات الشاملة DriverPack Solution بدون نت
  3.  شيت بجميع اكواد الخدمة في فورى Fawry اكواد فوري
  4. برنامج مجانى لمتابعة حركة الخزينة Excel
  5. تحميل برنامج مخازن مجانى 100 % كامل ومفتوح المصدر | Store Management System
  6.  برنامج متابعة الشيكات (شيكات دفع / شيكات قبض ) Cheques Management + نسخة تجريبية
  7.   تحميل برنامج الكاشير2020 المجانى لادارة حسابات المحلات التجارية Cashier
  8.  تحميل برنامج مجانى حضور وانصراف الموظفين بالبصمة( دوام الموظفين المجانى)
  9.  تحميل برنامج مخازن مجانى 100%
  10. -برنامج المنجز 2024
  11. تحميل برنامج محاسبى كامل كفعل مدى الحياة

 


الاسمبريد إلكترونيرسالة