أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
khaled alborene Eslam Abdullah-- لا تميز خلال هذه الفترة YasserKhalil طلب مساعدة في تعديل الكود حتى يتم البحث في كل الصفحات بالملف اكسيل اسئله واجابات


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



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





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

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



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

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

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


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








04-08-2018 07:22 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 6189
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 383
قوة السمعة : 17068
الاعجاب : 154
 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






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



 






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






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






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






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

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






04-08-2018 09:04 مساء
مشاهدة مشاركة منفردة [7]
Eslam Abdullah
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1361
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 4
يتابعهم : 3
يتابعونه : 71
قوة السمعة : 8423
الاعجاب : 10
 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






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



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

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



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






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






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



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

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



04-08-2018 09:33 مساء
مشاهدة مشاركة منفردة [12]
Eslam Abdullah
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1361
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 4
يتابعهم : 3
يتابعونه : 71
قوة السمعة : 8423
الاعجاب : 10
 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 ومشروحة بدورة افتح الباب للاستاذ ياسر
أرجوا أن أكون أوضحت الأمر






المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
تعديل كود جلب البيانات فى تاريخ معين دون تكرار مهند محسن
40 447 YasserKhalil
قائمة منسدلة بدون تكرار وبدون فراغات sami872
22 621 رمضان بكري
الطلبة الأوائل في حالة التكرار Khairi
17 192 YasserKhalil
قائمه منسدله بدون فراغات ولا تكرار زى العفريته - حسام خطاب الصقر
41 3580 starta
كيف منع قبول تكرار من قائمه منسدلة من غير التنسيق الشرطي ابوعلي الحبيب
10 191 YasserKhalil

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


 







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



الساعة الآن 05:52 صباحا

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