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

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

قام بنشر (معدل)

فيه كود في الملف المرفق ارجوا شرحه لي بالتفصيل الممل علماً انه من إنتاج مشرفنا الغالي ودمتم في حفظ ورعاية الله.

_______.rar

تم تعديل بواسطه زرنيط
قام بنشر (معدل)

سلمت يداك يا مشرفنـــا

For i = 3 To 8

If Cells(i, 2) = "سعودي" Then

With Sheets("دول الخليج").Columns(1).Rows(32).End(xlUp)

.Offset(1, 0) = Cells(i, 1)

لماذا تستخدم كلمة For i هل تدل على شيئ معين

وإيضا ًIf Cells(i, 2) = "سعودي" Then لان فيــه عندي الملف عدة اكوال نفس الكود هذا بس يتغير من For i إلى For n و For m

معليش اتعبتك معي __ اسال الله العلي القدير رب العرش العظيم ان يرزقك من فضله ويزيدك علماً ويحشرك مع الابرار يوم القيامـه.

تم تعديل بواسطه زرنيط
قام بنشر (معدل)

السلام عليكم

اخي العزيز

بدلا من ان يعمل الكود لكل صف

ونقول بالكود طبعا الصف الاول اعمل كذا و كذا

ثم الصف الثاني وهكذا الي نهاية الصفوف

فاننا نرمز للصف ب i و نعرف الكود علي الصفوف التي سنعمل عليها ليكررها بنفسه

لذا نقول for i = 3 to 8 او for n=3 to8 او for m= 3 to 8

و كذلك الامر بالنسبة للخليه بدلا ان اقول B3 مثلا ثم B4 و اكرر اجعل الكود

هو الذي يكرر الصف الذي اريده و الخلية التي اريده

و ايضا هناك حالات تجد فيها for i و for n في نفس الوقت ذلك لانك عندما تذكر الاولي

عندما تحتاجها لعمل شئ اخر لابد من تغيير الحرف لا الحرف تم حجزه في بداية الكود

المهم ارجو ان اكون قادر ان اوصل الفكره

عموما لو فيه اي شيئ اسال علي طول

و متحسسش نفسك انك تائه فمرة وراء مره تجد نفسك فاهم فلا تتعجل

تحياتي

تم تعديل بواسطه aah_aah2008

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

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

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

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

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

Important Information