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



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





ترحيل الراسب والناجح

السلام عليكم ورحمة الله وبركاته دمتم جميعا بكل حب وود التمس فيكم الخير بمساعدتي في ترحيل الناجح والراسب في الإختبار 1 ا ..



11-05-2018 01:01 صباحا
محمد محمد حمودة
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 11-05-2018
رقم العضوية : 6221
المشاركات : 31
الجنس : ذكر
تاريخ الميلاد : 29-1-1984
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 46
الاعجاب : 15
 offline 

السلام عليكم ورحمة الله وبركاته 
دمتم جميعا بكل حب وود
التمس فيكم الخير بمساعدتي في ترحيل الناجح والراسب في الإختبار 1 الموجود بشيت صفحة "data"    الى  شيت صفحة " اختبار1"
الناجح في جدول الناجحين
والراسب في جدول الراسبين
ولكم جزيل الشكر
 
 
 
  الملف.rar   تحميل rar مرات التحميل :(13)
الحجم :(326.357) KB







11-05-2018 01:44 صباحا
مشاهدة مشاركة منفردة [1]
ali mohamed ali
menu_open
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 507
الدولة : مصر
الجنس : ذكر
يتابعهم : 0
يتابعونه : 21
قوة السمعة : 2607
الاعجاب : 802
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
وعليكم السلام اخى محمد-أهلا وسهلا بك فى منتدانا الكريم بين اخوانك
تفضل لك ما طلبت
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
  الملف.rar   تحميل rar مرات التحميل :(9)
الحجم :(92.865) KB


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


توقيع :ali mohamed ali
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى حل أى مشكلة او أستفسار لديك مع إضافة رد بشكره
أو دعوة لمن قدم اليك المساعدة,فالجميع هنا يعمل على مساعدة
 الاخرين لوجه الله وان تحتسب له اجر عند الله


11-05-2018 07:28 صباحا
مشاهدة مشاركة منفردة [2]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 4613
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 318
قوة السمعة : 13264
الاعجاب : 4899
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
بارك الله فيك أخي الحبيب علي ومشكور على الحل الرائع بمعادلات الصفيف

المشكلة في معادلات الصفيف هي زيادة البيانات التي تؤدي إلى ثقل التعامل مع الملف ..
عموماً إثراءً للموضوع إليكم حل بالأكواد باستخدام الفلترة بأسلوب بسيط حيث يمكن عمل ذلك بشكل يدوي .. والطريقة فلترة الناجحين ثم نسخ النطاق الظاهر إلى أول خلية في ورقة النتائج في الجزء الخاص بالناجحين ، وعمل نفس الشيء مع الراسبين
وإليكم الكود
Sub Transfer_Data_Using_Filter_Method()
    Dim ws          As Worksheet
    Dim sh          As Worksheet
    Dim e           As Variant
    Dim r           As Range
    Dim lr          As Long

    Set ws = ThisWorkbook.Worksheets(2)
    Set sh = ThisWorkbook.Worksheets(3)
    lr = ws.Cells(Rows.Count, 1).End(xlUp).Row

    Application.ScreenUpdating = False
        With ws
            For Each e In Array("ناجح", "راسب")
                .AutoFilterMode = False
                .Range("A11:D11").AutoFilter Field:=4, Criteria1:=e
                If e = "ناجح" Then Set r = sh.Range("A12") Else Set r = sh.Range("J12")
                .Range("A12:D" & lr).SpecialCells(xlCellTypeVisible).Copy
                r.PasteSpecial xlPasteValues
            Next e
            .AutoFilterMode = False
        End With
    
        Application.CutCopyMode = False
    Application.ScreenUpdating = True

    MsgBox "Done...", 64
End Sub

أثارت هذه المشاركة إعجاب: ali mohamed ali، محمد محمد حمودة، محمد الدسوقى، الصقر،




11-05-2018 11:30 صباحا
مشاهدة مشاركة منفردة [3]
ali mohamed ali
menu_open
عضو محترف
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 507
الدولة : مصر
الجنس : ذكر
يتابعهم : 0
يتابعونه : 21
قوة السمعة : 2607
الاعجاب : 802
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
كود رائع كعادتك استاذ ى الحبيب ياسر جعله الله فى ميزان حسناتك

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


توقيع :ali mohamed ali
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى حل أى مشكلة او أستفسار لديك مع إضافة رد بشكره
أو دعوة لمن قدم اليك المساعدة,فالجميع هنا يعمل على مساعدة
 الاخرين لوجه الله وان تحتسب له اجر عند الله


11-05-2018 01:14 مساء
مشاهدة مشاركة منفردة [4]
محمد محمد حمودة
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 11-05-2018
رقم العضوية : 6221
المشاركات : 31
الجنس : ذكر
تاريخ الميلاد : 29-1-1984
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 46
الاعجاب : 15
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
جزاك الله خيرا استاذ علي.... على المعادلات الجميله
اكرمك الله عز وجل استاذ ياسر على الكود الرااااااااااائع

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




11-05-2018 01:16 مساء
مشاهدة مشاركة منفردة [5]
محمد محمد حمودة
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 11-05-2018
رقم العضوية : 6221
المشاركات : 31
الجنس : ذكر
تاريخ الميلاد : 29-1-1984
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 46
الاعجاب : 15
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
عند استخدام الكود استاذ ياسر وحفظ الملف يعطي هذه الرساله
MTY2MTg1MQ1414Untitled
هل لها حل لعدم ظهورها؟؟؟
 
 






11-05-2018 01:22 مساء
مشاهدة مشاركة منفردة [6]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 4613
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 318
قوة السمعة : 13264
الاعجاب : 4899
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
وجزيت خيراً أخي الكريم
شاهد الفيديو التالي فيه حل للرسالة التي تظهر لديك
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب

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




11-05-2018 01:43 مساء
مشاهدة مشاركة منفردة [7]
محمد محمد حمودة
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 11-05-2018
رقم العضوية : 6221
المشاركات : 31
الجنس : ذكر
تاريخ الميلاد : 29-1-1984
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 46
الاعجاب : 15
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
جزاك الله خيرا
عذرا استاذ ياسر لو اردت ترحيل الناجح والراسب في الإختبار الثاني الذي بالعمود"E" فقط
لأني سأفعل الكود على باقي الإختبارات

 





11-05-2018 02:01 مساء
مشاهدة مشاركة منفردة [8]
محمد الدسوقى
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 390
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 40
يتابعهم : 7
يتابعونه : 257
قوة السمعة : 2791
الاعجاب : 693
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
جزاكم الله خيرا أستاذنا ومعلمنا / أبو البراء على هذه اتلأكواد الرائعة التى نتعلم منها دائما ،
أدام الله عليكم العلم النافع
وجزاكم الله خيرا أستاذ / على ـ حل رائع بالمعادلات
----------------------------
الأستاذ / محمد حمودة
إذا أردت ترحيل الناجح والراسب الموجود فى الاختبار الثانى بالعمود Eكما ذكرت
عليك تغيير السطر التالى فى الكود
.Range("A11:D11").AutoFilter Field:=4, Criteria1:=e

ليكون على الصورة التالية
.Range("A11:E11").AutoFilter Field:=5, Criteria1:=e

لاحظ تم تغيير المدى المراد البحث فيه
A11:E11 وأيضا رقم عمود البحث من العمود رقم 4 إلى العمود رقم 5
---------------------

 

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




11-05-2018 02:12 مساء
مشاهدة مشاركة منفردة [9]
محمد محمد حمودة
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 11-05-2018
رقم العضوية : 6221
المشاركات : 31
الجنس : ذكر
تاريخ الميلاد : 29-1-1984
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 46
الاعجاب : 15
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
جزاك الله خيرا استاذ محمد لكن لم تضبط معي ..ممكن يكون الخلل في هذا السطر
 .Range("A12:D" & lr).SpecialCells(xlCellTypeVisible).Copy





11-05-2018 02:24 مساء
مشاهدة مشاركة منفردة [10]
محمد محمد حمودة
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 11-05-2018
رقم العضوية : 6221
المشاركات : 31
الجنس : ذكر
تاريخ الميلاد : 29-1-1984
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 46
الاعجاب : 15
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
الكود بالتعديل الل حضرتك عملته يعطي الناجحين فقط
اما الراسبين فيعطي مكانهم الناجحين الموجودين في العمود"D" في الإختبار 1





11-05-2018 03:07 مساء
مشاهدة مشاركة منفردة [11]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 4613
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 318
قوة السمعة : 13264
الاعجاب : 4899
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
ارفق الملف الذي به المشكلة للإطلاع عليه
حاول دراسة الكود قبل التعديل عليه لتفهم الأسطر الموجودة وتعرف كيف تعدل عليها
الكود بسيط وسهل أن تفهمه إن شاء الله وإن تعذر عليك فهم سطر أو جزئية أخبرنا بها

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




11-05-2018 03:23 مساء
مشاهدة مشاركة منفردة [12]
محمد محمد حمودة
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 11-05-2018
رقم العضوية : 6221
المشاركات : 31
الجنس : ذكر
تاريخ الميلاد : 29-1-1984
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 46
الاعجاب : 15
 offline 
look/images/icons/i1.gif ترحيل الراسب والناجح
جزاك الله خيرا
في الكود الثاني اريده ان يرحل الناجحين والراسبين من صفحة شيت "DATA" العمود"E" 
الى صفحة شيت "اختبار2" 
 
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
 
  الملف2.rar   تحميل rar مرات التحميل :(10)
الحجم :(475.786) KB







المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
تعديل كود ترحيل اعمدة معينة بناءا على شرط بين تاريخين أحمد يوسف
0 6 أحمد يوسف
عدم تكرار عملية الترحيل ashraf_hertlion
3 28 ashraf_hertlion
ترحيل من تكست بوكس الى ليست بوكس الى شيت معين Yasser Elaraby
9 932 محمد النيل
مطابقة بيانات أو التحقق من الترحيل nyfmpha
0 32 nyfmpha
ضبط الترحيل رمضان بكري
7 58 YasserKhalil

الكلمات الدلالية
ترحيل ، الراسب ، والناجح ،


 







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



الساعة الآن 04:46 مساء

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