اذهب الي المحتوي
أوفيسنا

كود لإخفاء واظهار اعمدة


الردود الموصى بها

السلام عليكم

 

هذه طريقة بسيطة بالكود لإخفاء واظهار اعمدة

فصلته هنا لتعم الفائدة

 

اولا تعمل كود رئيسي مثل هذا

Sub kh_ColumnHidden(ColumnAddres As String)
    Columns("C:W").EntireColumn.Hidden = True
    Columns(ColumnAddres).EntireColumn.Hidden = False
End Sub

حيث انه يقوم باخفاء جميع اعمدة  المواد

ويظهر النطاق الخاص بالمادة المشار اليه بالمتغير ColumnAddres

 

ثم تعمل اكواد لربطها بالازرة

تعين فيها اعمدة المادة التي تريد اظهارها

مثل هذا

Sub M()
    kh_ColumnHidden "C:E"
End Sub

المرفق 2003

اظهار واخفاء اعمدة.rar

 

G.png

  • Like 3
رابط هذا التعليق
شارك

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

الاستاذ الفاضل والعالم العلامة عبد الله باقشير جزاكم الله خيرا

دائما اعمالكم لها نكهة خاصة من حيث الابداع و الاتقان وبساطة التعامل معها

كود اكثر من رائع جعله الله في ميزان حسناتكم

زادكم الله علما وشرفا واعلى مقامكم في الدارين

تقبل فائق احترامي وتقديري

  • Like 1
رابط هذا التعليق
شارك

أستاذنا الكبير علاّمة الوطن العربي / عبد الله باقشير

 

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

 

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

رابط هذا التعليق
شارك



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

 
p11.gif


واثابكم بدعائكم واعطاكم بمثله اضعاف مضاعفة
 
تقبلوا تحياتي وشكري

  • Like 1
رابط هذا التعليق
شارك


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

 
p11.gif

 


واثابكم بدعائكم واعطاكم بمثله اضعاف مضاعفة
 
تقبلوا تحياتي وشكري

رابط هذا التعليق
شارك

أخى فى الله

الأستاذ القدير / عبد الله باقشير

بارك الله فيكم

وجزاكم رب العالمين عنا خير الجزاء

وتقبلوا منى وافر الإحترام والتقدير

رابط هذا التعليق
شارك

اخينا الفاضل والحبيب ومعلمنا القدير الأستاذ // عبدالله باقشير 

دائما وابدا اعمالك فيها الجديد والمفيد باسلوب السهل اليسير

والتي تضيف الي مكتبتنا الجديد ونستمد منها الطريق للعبور الي اشياء ما كنا نعلمها

ومدخل للتطوير في مجال تطويع امكانيات الاكسيل والاستفادة منه 

وانتهز الفرصة لاتقدم لكم بالشكر والعرفان لما تعلمناه منكم .....  وصبركم علينا بدون كلل وملل

فلكم فضل علينا بعد فضل الله

ومن لا يشكر الناس لا يشكر الله 

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

تقبلوا تحياتي واحترامي وتقديري

تم تعديل بواسطه ضاحي الغريب
رابط هذا التعليق
شارك

  • 3 weeks later...

آخي الفاضل وأستاذي /عبد الله باقشير 

لقد قمت بتنفيذ الكود مع ما يتناسب مع الشيت الذي صممته واشتغل تمام وأضفت المواد التي أريدها  والحمد لله كنت محتاج هذا الكود ..بارك الله فيك وجعلك سبباً للخير دائماً 

تم تعديل بواسطه عبد الحميد شقير
رابط هذا التعليق
شارك

السلام عليكم

الاخ الفاضل... والمعلم الجليل / عبد الله باقشير

كود جميل ولا أروع.... والاستفاده منه كبيره

كما عوتنا.... مضيف كل جديد

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

رابط هذا التعليق
شارك

  • 4 weeks later...
  • 3 weeks later...

رائع هذا ما كنت ابحث عنه

رابط هذا التعليق
شارك

استاذ عبدالله

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

كود رائع جداً احتاجه في عملي اليومي مع ادارة المدرسة

لكن عندي سؤال اذا ممكن ان تجيبني عليه وهو:

بأي ماكرو جرى ارتباط الزر "رجوع"؟

حبث اني لم ار ماكرو خاص به

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information