elzaem_yousif قام بنشر سبتمبر 10, 2006 قام بنشر سبتمبر 10, 2006 عملت اخفاء للاعمدة من k الى اخر ورقة العمل وكذلك للصفوف من 25 للاخر ازاى اظهرهم تانى كمان ممكن اعمل برنامج عن طريق الدوال الموجودة بالكسل من غير ما استخدم ماكرو لانى معرفش فيجوال بيسك اساسا طيب ايه المعادلة اللى ممكن تعبر عن التالى لو a1 أو b1 فيهم بيان (مش فاضيين يعنى) d1=a1 و e1=b1 المهم كلمة أو دى معناه اية فى الدالة : ولا ؛
هادى محمد المامون سالم قام بنشر سبتمبر 10, 2006 قام بنشر سبتمبر 10, 2006 بسم الله الرحمن الرحيم اخى الكريم قف فى الخليه B1 و اكتب الكود التالى =IF(A1<>"";1;100) هذا الكود معناه اذا كانت الخليه A1 بها بيانات ( مش فاضيه ) ضع فى الخليه B1 رقم 1 و اذا كانت الخليه A1 ليس بها بيانات ضع فى الخليه B1 رقم 100 مع العلم ان <> معناها لا تساوى "" معناه خاليه السلام عليكم
علي السحيب قام بنشر سبتمبر 11, 2006 قام بنشر سبتمبر 11, 2006 الكود التالي يعمل على إظهار جميع الأعمدة والصفوف المخفية: Sub UnhideRowsAndColumns() ActiveSheet.Columns.Hidden = False ActiveSheet.Rows.Hidden = False End Sub والصيغة التالية تعمل كما طلبت .. ويتم وضعها في الخلية D1: =IF(OR(NOT(A1=""),NOT(B1="")),A1,"") UnhideRowsAndColumns.rar
elzaem_yousif قام بنشر سبتمبر 11, 2006 الكاتب قام بنشر سبتمبر 11, 2006 استاذتى الاعزاء مشكورين كتير على الرد والشرح وجزاكم الله خيرا لكن !!!!! الكود ده اكتبة فين بالتحديد سواء كان معادلة ا و فيجوال بيسك والاصدار اللى عندى اوفيس 2000 هل يمكن كتابة الكود السابق فيه ؟؟؟ وجزاكم الله خير على المساعدة
علي السحيب قام بنشر سبتمبر 12, 2006 قام بنشر سبتمبر 12, 2006 راجع الرابط التالي والخاص بكيفية نقل الكود من ملف إلى آخر: http://www.officena.net/ib/index.php?showtopic=3069
الردود الموصى بها