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



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





تكرار كل رقم 100 مره

السلام عليكم ورحمة الله وبركاته ممكن كود او معادلة مثلا رقم 1 يكرر رقم 1... 100 مئه مره تحته رقم 2 يكرر 100مئه مره وه ..



04-08-2018 06:33 مساء
محمد النيل
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 27-10-2017
رقم العضوية : 1282
المشاركات : 111
الجنس : ذكر
تاريخ الميلاد : 0-4-1978
يتابعهم : 7
يتابعونه : 4
قوة السمعة : 178
الاعجاب : 70
 offline 

السلام عليكم ورحمة الله وبركاته
ممكن كود او معادلة

مثلا رقم 1 يكرر رقم 1...  100 مئه مره
تحته رقم 2 يكرر 100مئه  مره وهكذا بقية الارقام
شكرا لكل من سعى
 


تم تحرير الموضوع بواسطة :محمد النيل
بتاريخ:05-08-2018 11:41 مساء







04-08-2018 07:22 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 4661
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 318
قوة السمعة : 13393
الاعجاب : 4956
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
وعليكم السلام أخي الكريم
جرب الكود التالي عله يفي بالغرض إن شاء الله
Sub Test()
    Dim i           As Long
    Dim m           As Long

    Application.ScreenUpdating = False
        For i = 1 To 5
            m = IIf(i = 1, 1, Cells(Rows.Count, 1).End(xlUp)(2).Row)
            Range("A" & m).Resize(100).Value = i
        Next i
    Application.ScreenUpdating = True
End Sub

أثارت هذه المشاركة إعجاب: Eslam Abdullah، محمد النيل، الصقر،




04-08-2018 07:56 مساء
مشاهدة مشاركة منفردة [2]
محمد النيل
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 27-10-2017
رقم العضوية : 1282
المشاركات : 111
الجنس : ذكر
تاريخ الميلاد : 0-4-1978
يتابعهم : 7
يتابعونه : 4
قوة السمعة : 178
الاعجاب : 70
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
احسنت استاذ YasserKhalil
الف تحية وتقدير ... ماقصرت ... وفيت وكفيت ...الصحة والسلامة يارب لشخصك المحترم



 

أثارت هذه المشاركة إعجاب: YasserKhalil، الصقر،




04-08-2018 08:14 مساء
مشاهدة مشاركة منفردة [3]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 4661
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 318
قوة السمعة : 13393
الاعجاب : 4956
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
بارك الله فيك أخي الكريم محمد والحمد لله أن تم المطلوب على خير والحمد لله الذي بنعمته تتم الصالحات

أثارت هذه المشاركة إعجاب: محمد النيل، Eslam Abdullah،




04-08-2018 08:48 مساء
مشاهدة مشاركة منفردة [4]
khaled alborene
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 16
المشاركات : 513
الجنس : ذكر
تاريخ الميلاد : 9-9-1990
الدعوات : 1
يتابعهم : 7
يتابعونه : 6
قوة السمعة : 561
الاعجاب : 220
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
استاذ ياسر ماذا تعني IIf





04-08-2018 08:49 مساء
مشاهدة مشاركة منفردة [5]
محمد النيل
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 27-10-2017
رقم العضوية : 1282
المشاركات : 111
الجنس : ذكر
تاريخ الميلاد : 0-4-1978
يتابعهم : 7
يتابعونه : 4
قوة السمعة : 178
الاعجاب : 70
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
نعم تم المطلوب 100%
81

أثارت هذه المشاركة إعجاب: Eslam Abdullah،




04-08-2018 09:02 مساء
مشاهدة مشاركة منفردة [6]
Eslam Abdullah
menu_open
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1165
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 2
يتابعهم : 3
يتابعونه : 55
قوة السمعة : 6924
الاعجاب : 1958
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
المشاركة الأصلية كتبت بواسطة: khaled alborene »
استاذ ياسر ماذا تعني IIf

الدالة IIf هيا نفسها الدالة IF بورقة العمل تتكون من 3 عوامل
العامل الاول هو الشرط والثانى هو ارجاع ناتج فى حالة تحقق الشرط والثالث هو ارجاع ناتج فى حالة عدم تحقق الشرط

أثارت هذه المشاركة إعجاب: YasserKhalil،




04-08-2018 09:04 مساء
مشاهدة مشاركة منفردة [7]
Eslam Abdullah
menu_open
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1165
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 2
يتابعهم : 3
يتابعونه : 55
قوة السمعة : 6924
الاعجاب : 1958
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
المشاركة الأصلية كتبت بواسطة: YasserKhalil »
وعليكم السلام أخي الكريم
جرب الكود التالي عله يفي بالغرض إن شاء الله
Sub Test()
    Dim i           As Long
    Dim m           As Long

    Application.ScreenUpdating = False
        For i = 1 To 5
            m = IIf(i = 1, 1, Cells(Rows.Count, 1).End(xlUp)(2).Row)
            Range("A" & m).Resize(100).Value = i
        Next i
    Application.ScreenUpdating = True
End Sub

كود رائع أستاذى الحبيب ، جزاك الله كل خير 81

أثارت هذه المشاركة إعجاب: YasserKhalil،




04-08-2018 09:07 مساء
مشاهدة مشاركة منفردة [8]
محمود ابو الدهب
menu_open
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 673
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 4-7-1990
الدعوات : 56
يتابعهم : 6
يتابعونه : 140
قوة السمعة : 2382
الاعجاب : 859
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
نفس سؤالى خالد iif محتاجه توضيح واعتقد لتقصيرى في الدروس زمان كان فيه موضوع لاستاذ ياسر خليل شارحها فية واعاد استاذ اسلام نشرة ولكني لم ادرسه جيدا فنسيته ارجوا من استاذ ياسر خليل اعادة ارسال الرابط للاستفاده
 

أثارت هذه المشاركة إعجاب: Eslam Abdullah، khaled alborene،


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

تحياتى وتقدير للجميع  محمود ابوالدهب


04-08-2018 09:14 مساء
مشاهدة مشاركة منفردة [9]
khaled alborene
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 16
المشاركات : 513
الجنس : ذكر
تاريخ الميلاد : 9-9-1990
الدعوات : 1
يتابعهم : 7
يتابعونه : 6
قوة السمعة : 561
الاعجاب : 220
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
نعم كما قال الاستاذ محمود نحتااج الى مزيد من الشرح والتوضيح لدالة iif

أثارت هذه المشاركة إعجاب: Eslam Abdullah،




04-08-2018 09:17 مساء
مشاهدة مشاركة منفردة [10]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 4661
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 318
قوة السمعة : 13393
الاعجاب : 4956
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
بارك الله فيكم إخواني وجزيتم خيراً
شرحها الأخ إسلام في سطر واحد وهي شبيهة بدالة IF .. ولكنها محدودة بحدوث احتالمين فقط أما إذا كانت الاحتمالات أكثر من اثنين فلابد من استخدام IF الشرطية

أثارت هذه المشاركة إعجاب: Eslam Abdullah،




04-08-2018 09:21 مساء
مشاهدة مشاركة منفردة [11]
محمود ابو الدهب
menu_open
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 673
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 4-7-1990
الدعوات : 56
يتابعهم : 6
يتابعونه : 140
قوة السمعة : 2382
الاعجاب : 859
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
خير الكلام ما قل ودل شكرا وفهمت معلش بقه الدماغ صدى عايز سنفرة  هههههههه smile

أثارت هذه المشاركة إعجاب: Eslam Abdullah، YasserKhalil،


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

تحياتى وتقدير للجميع  محمود ابوالدهب


04-08-2018 09:33 مساء
مشاهدة مشاركة منفردة [12]
Eslam Abdullah
menu_open
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1165
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 2
يتابعهم : 3
يتابعونه : 55
قوة السمعة : 6924
الاعجاب : 1958
 offline 
look/images/icons/i1.gif تكرار كل رقم 100 مره
كما قال أستاذ ياسر هى شبيها بدالة if بورقة العمل
وأيضا يمكنك انشاء دوال IIF مركبة مثلها مثل دالة IF بورقة العمل تماما
واليكم مثال عملى للتوضيح

Sub Test()
Dim E As Variant
E = IIf(Range("A1").Value = "Eslam", 1, IIf(Range("A1").Value = "Yasser", 2, 3))
Range("B1").Value = E
End Sub

شرح الدالة وضعت شرط اذا كانت قيمة الخلية A1 تساوى Eslam عندها يكون الناتج 1 بمعنى المتغير E يساوى 1
أما لو كان الاسم فى الخلية A1 ياسر عندها يكون الناتج 2 بمعنى المتغير E يساوى 2
غير ذلك يكون الناتج 3 بمعنى المتغير E يساوى 3
ومن ثم تظهر قيمة المتغير E بالخلية B1
ملاحظة يراعى هنا أن لو كتبت الحرف Capital يجب ان يكون فى ورقة العمل Capital لتحقق الشرط
ويمكن تجنب الامر باستخدام دالة UCase أو LCase ومشروحة بدورة افتح الباب للاستاذ ياسر
أرجوا أن أكون أوضحت الأمر

أثارت هذه المشاركة إعجاب: YasserKhalil، الصقر، محمد النيل،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
عدم تكرار عملية الترحيل ashraf_hertlion
5 86 YasserKhalil
جملة التكرار Do While Loop YasserKhalil
5 322 جبري
هل يوجد طريقة لكشف التكرار في اكثر من ورقة عمل؟ mohammad excel
2 70 YasserKhalil
لائحة أسماء دون تكرار ومرتبة أبجدياً salim
7 136 أحمد يوسف
عدم تكرارالمتشابه مع الجمع العدد محمد النيل
11 144 YasserKhalil

الكلمات الدلالية
تكرار ،


 







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



الساعة الآن 09:15 صباحا

أعلن هنا
أعلن هنا
أعلن هنا