ابوصلاح قام بنشر أغسطس 7, 2016 مشاركة قام بنشر أغسطس 7, 2016 السلام عليكم في المرفق التالي كود اظهار واخفاء الاعمدة بحسبب الخلية a1 وهو كود للاستاذ سليم حاصبيا اريد اظهار الاسم بحسب الخلية المذكور مع اخفاء الاعمدة الاخري طبعا ان طبقت الكود لن يظهر عمود واحد والمطلوب ثلاث اعمدة اشكركم وباقي الشرح بالمرفق اخفاء واظهار بحسب عدد معين.rar رابط هذا التعليق شارك More sharing options...
الشهابي قام بنشر أغسطس 7, 2016 مشاركة قام بنشر أغسطس 7, 2016 (معدل) أخي العزيز الأستاذ / أبو صلاح الشكر موصول لأستاذنا الكبير سليم حاصبيا حفظه الله أمين جرب التعديل التالي في الكود إن شاء الله يحقق المطلوب تحياتي لكم ولأستاذنا سليم حاصبيا Sub اخفاء() Application.ScreenUpdating = False Range("c1:bd1").EntireColumn.Hidden = True My_Match = Application.Match(Range("a1"), Range("c1:bd1"), 0) + 2 Cells(3, My_Match).Resize(1, 3).EntireColumn.Hidden = False Application.ScreenUpdating = True End Sub اخفاء واظهار بحسب عدد معين.rar تم تعديل أغسطس 7, 2016 بواسطه الشهابي 1 رابط هذا التعليق شارك More sharing options...
ابوصلاح قام بنشر أغسطس 7, 2016 الكاتب مشاركة قام بنشر أغسطس 7, 2016 الاستاذ الشهابي بارك الله فيك التعديل ادي الغرض شكرا لك 1 رابط هذا التعليق شارك More sharing options...
ليلى الهلالي قام بنشر أكتوبر 17, 2016 مشاركة قام بنشر أكتوبر 17, 2016 (معدل) السلام عليكم أستاذي الفاضل الشهابي. حاولت تطبيق الكود السابق على ملفي قدر المستطاع ولكن لم أوفق في ذلك هل استميحك العذر بطلبي أن تشرح لي طريقة أو خطوات عمل الكود. فمثلاً كيف تم عمل القائمة المنسدلة برغم عدم وجود نطاق للأسماء أو بأي طريقة أعرفها عن القائمة المنسدلة؟ وكيف تم الربط بين القائمة المنسدلة والكود؟ وهل من الممكن تطبيقه على فورم بدلاً من روقة العمل نفسها؟ أعذر لي جهلي في الفيجوال بيسك. فمنكم نتعلم ونستفيد. ولكم جزيل الشكر ووفقكم الله لما يرضيه وجعل سائر عملكم في ميزان حسناتكم. تم تعديل أكتوبر 17, 2016 بواسطه morestudy رابط هذا التعليق شارك More sharing options...
ابوانس2013 قام بنشر مارس 1, 2018 مشاركة قام بنشر مارس 1, 2018 عمل رائع رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.