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

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

قام بنشر

عملت اخفاء للاعمدة من k الى اخر ورقة العمل وكذلك للصفوف من 25 للاخر ازاى اظهرهم تانى

كمان ممكن اعمل برنامج عن طريق الدوال الموجودة بالكسل من غير ما استخدم ماكرو لانى معرفش فيجوال بيسك اساسا

طيب ايه المعادلة اللى ممكن تعبر عن التالى

لو a1 أو b1 فيهم بيان (مش فاضيين يعنى)

d1=a1 و e1=b1

المهم كلمة أو دى معناه اية فى الدالة : ولا ؛

قام بنشر

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

اخى الكريم

قف فى الخليه B1 و اكتب الكود التالى

=IF(A1<>"";1;100)

هذا الكود معناه

اذا كانت الخليه A1 بها بيانات ( مش فاضيه ) ضع فى الخليه B1 رقم 1

و اذا كانت الخليه A1 ليس بها بيانات ضع فى الخليه B1 رقم 100

مع العلم ان

<> معناها لا تساوى

"" معناه خاليه

السلام عليكم

قام بنشر

الكود التالي يعمل على إظهار جميع الأعمدة والصفوف المخفية:

Sub UnhideRowsAndColumns()
ActiveSheet.Columns.Hidden = False
ActiveSheet.Rows.Hidden = False
End Sub
والصيغة التالية تعمل كما طلبت .. ويتم وضعها في الخلية D1:
=IF(OR(NOT(A1=""),NOT(B1="")),A1,"")

UnhideRowsAndColumns.rar

قام بنشر

استاذتى الاعزاء

مشكورين كتير على الرد والشرح

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

لكن !!!!!

الكود ده اكتبة فين بالتحديد سواء كان معادلة ا و فيجوال بيسك

والاصدار اللى عندى اوفيس 2000 هل يمكن كتابة الكود السابق فيه ؟؟؟

وجزاكم الله خير على المساعدة

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

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

Important Information