اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

طلب مساعدة فى كود لاظهار واخفاء اعمدة جدول


إذهب إلى أفضل إجابة Solved by سليم حاصبيا,

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

الاستاذ / سليم-حاصبيا  بخصوص اخفاء واظهار اعمدة جدول

معذرة . عندما طبقت الملف على الملف الخاص بى ويحتوى على حوالى 30 عمود يتم تنفيذ الأمر على 25 عمود ويتوقف أمر الاظهار أو الاخفاء وتبقى الأعمدة ظاهرة  

أرجو توضيح السبب فى ذلك وقد حاولت لكن لم أتمكن 

المصنف2.xlsb

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

صديقي
    انت قمت بتسمية الــــ   Labels    بجروف صغيرة  a/b/c ..... و الاكسل  يرى الفرق بين     الحرف الكبير A  والجرف الصغير a

لذا يجب عليك ان تعمل احد هذين الاجرائين
  1- تغيير اسماء   الــــ   Labels  الى الأحرف الكبيرة A/B/C......

                أو 
  2- تغيير الكود لكل Label  كما في هذا الصورة

Fathi.png

 و كود ظهور واخفاء الأعمدة كما في هذه الصورة
( علامة ? تدل على ان الاسم مؤلف من حرف واحد  مثلاً D
و علامة ??  تدل على ان الاسم مؤلف من  حرفين  مثلاً  AC )

fathi_2.png

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

    تم معالجة الأمر (مع تعديل بسيط في ظهور الــ CheckBox   يشكل يمكن قرائته بسهولة)

     مع التقليل من اهتزاز الشاشة      قدر الامكان بواسطة 2 كود جديدين    Debut   و  Fin

 

Fathi_User.xlsb

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

ربنا يبارك فى حضرتك وبصراحة أنا فى المنتدى بأستفيد أكثر من التعليم الجامعى اللى قضيت فيه سنين بفضل أساتذة المنتدى الكرام أمثال حضرتك وأكبر شكرى

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

سليم-حاصبيا

طيب كده حضرتك هاتخلينى أسأل السؤال الأكبر وهو بعيدا عن فورم الادخال وتحديد الترحيل لأعمدة محددة

هل يمكن فى الجدول محل المناقشة ترتيب الأعمدة حسب رقم يكتب أمام كل ليبول فى فورم يحدد ترتيب العمود ثم عودة الترتيب كما كان عليه بزر أخر ( مثلا العمود الخامس يكون الثالث والسادس يكون الرابع 

Fathi_User.xlsb

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

 الأستاذ الكبير -سليم-حاصبيا/         أعتذر عن تأخرى فى متابعة حضرتك بسبب ظروف عملى طوال النهار

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

ترحيل اعمدة الى أخرى بتحديد رقم العمود المرحل والمرحل إليه.xlsb

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

  • أفضل إجابة

يمكن عمل هذا لكن بيوزر ثاني غير الذي رفعته انت  (مع الغلم اني لا أجب ان أعمل على اليورز فورم)

1- لإعادة ترتيب الأعمدة اضغط الزر Reset

2- لمسح TextBoxes والــــ  Labels اضغط الزر Cancel

3-لاختيار اي ترتيب للأعمدة املأ  الـــ  TextBoxes  بما تريد ( لا تقبل الا  احرف  من   B  الى  G  )
    والــــ  Labels  تتحدّث اوتوماتيكياً عند الخروج من الـــ  TextBoxe بواسطة  Enter  او   Tab   أو  Arrow

4 - لترحيل البيانات حسب الترتيب الذي اخترته (ليس من الضروروة اختيار كل الاعمدة) اضغط الزر ترحيل
    يتم نقل فقط الأعمدة المختارة

 جرب هذا الملف (مع الدعاء لانتصار الثّورة اللّبنانيّة)

Fathi_Extra.xlsm

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

الاستاذ/-سليم-حاصبيا

أولا ارفع أكف الضراعة لله أن ينصركم فى ثورتكم ضد أعداء لبنان الحرة وأتمنى أن تعود لبنان البلد الجميل التى نقرأ عنها فى الحكايات والأشعار الجميلة وتعود كما كانت باريس العرب ويصدح فيها صوت الوروار بأنغام الرحباني مع صوت الملائكة بحنجرة فيروز .. كل الامانى بالسلام والسلامة للبنان الحبيبة ولينصركم كما نصرنا فى ثورتنا على خفافيش الظلام

وخالص شكرى على تعب حضرتك معايا مع أنى لم أقدر الظروف التى تمر بها ولكن عشم الإخوة وألف شكر مرة ثانية

 

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

اللهم انصر الثورة اللبنانية ضد أعداء وطنهم 

بعد إذن أستاذنا الفاضل سليم حاصبيا

لإثراء الموضوع

حل آخر بكود

في ورقة العمل Target

في صف رأس الجدول اختر الاسم الذي تريده من  القائمة المنسدلة ثم اضغط على زر استدعاء

Fathi_Extra.xlsm

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

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