أبو عبد الملك السوفي قام بنشر يونيو 6, 2015 قام بنشر يونيو 6, 2015 (معدل) السلامن عليكم هاته هي النقطة ما قبل الاخيرة في هاته الصفحة اللنقطة ما قبل الاخيرة وهي المنهج في العمود U وتكون بالاعتماد على العمودين L وM و الجدول منA الىD في صفحة المنهج حيث يكتب في عمود المنهج السطر 10 من بداية الحفظ مثلا طالب بدأ من المجادلة 1 واذا رجعنا الى صفحة المنهج نجد رقمها في الجدول 221 فاذا حسبنا 10 اسطر انطلاقا من السطر 221 فسنقف في السطر رقم 230 اي الحديد3 (اي ان الطالب كان يفترض به ان يحفظ من المجادلة 1 الى الحديد 3 ). مثلا طالب بدأ من المرسلات5 واذا رجعنا الى صفحة المنهج نجد رقمها في الجدول 111فاذا حسبنا 10 اسطر انطلاقا من السطر 111فسنقف في السطر رقم 120اي الانسان28(اي ان الطالب كان يفترض به ان يحفظ من المرسلات5 الى الانسان28) .مثلا طالب بدأ من الواقعة16 واذا رجعنا الى صفحة المنهج نجد رقمها في الجدول 246فاذا حسبنا 10 اسطر انطلاقا من السطر 246فسنقف في السطر رقم 255 اي الرحمن16(اي ان الطالب كان يفترض به ان يحفظ من الواقعة16الى الرحمن16) وهكذا Quran School V7.rar تم تعديل يونيو 6, 2015 بواسطه أبو عبد الملك السوفي
ياسر خليل أبو البراء قام بنشر يونيو 8, 2015 قام بنشر يونيو 8, 2015 أخي الكريم أبو عبد الملك عذراً للتأخر بالنسبة للمثال الأول : مثلا طالب بدأ من المجادلة 1 واذا رجعنا الى صفحة المنهج نجد رقمها في الجدول 221 فاذا حسبنا 10 اسطر انطلاقا من السطر 221 فسنقف في السطر رقم 230 اي الحديد3 (اي ان الطالب كان يفترض به ان يحفظ من المجادلة 1 الى الحديد 3 ). لما راجعت المثال الثاني والثالث وجدت اختلاف إذاً المثال الأول غير دقيق في وصه حيث يجب ان تكون السورة هي المجادلة 22 في الصف رقم 230 يرجى التأكيد على ما فهمته
ياسر خليل أبو البراء قام بنشر يونيو 8, 2015 قام بنشر يونيو 8, 2015 راجع المدخلات في العمود L و M المجادلة 1 المرسلات 5 الناس 2 الحديد 20 الإخلاص 1 النبأ 1 الحشر 14 المجادلة 1 المجادلة 1 الحشر 14 هل هذه هي النتائج المتوقعة أم لا؟ المجادلة 22 الانسان 28 الكوثر 3 الواقعة 48 الفيل 3 النبأ 40 المجادلة 11 المجادلة 22 المجادلة 22 المجادلة 11 أرجو التأكد قبل العمل
أبو عبد الملك السوفي قام بنشر يونيو 8, 2015 الكاتب قام بنشر يونيو 8, 2015 السلام عليكم آسف استاذ ياسر عن الازعاج ارجوا ان تتحملي واجرك على الله بالفعل المثال اللاول في خطا والصحيح كما وصفت النتائج المتوقعة كما وصفت استاذ ياسر
ياسر خليل أبو البراء قام بنشر يونيو 8, 2015 قام بنشر يونيو 8, 2015 أخي أبو عبد الملك تعرف أن التوضيح هااااام جداً حتى لا يطول الكلام وتطول المحاولات ويضيع الوقت إليك الملف المرفق ورجاءً الدقة في التوضيح ..لأن كل كلمة تكتبها أقرأها أكثر من مرة للتأكيد قبل العمل حجم الملف 107 كيلو بايت Quran School V7.rar
أبو عبد الملك السوفي قام بنشر يونيو 8, 2015 الكاتب قام بنشر يونيو 8, 2015 (معدل) السلام عليكم بورك فيك استاذ ياسر تمام مائة بالمائة بالفعل ابا البراء المعطيات الصحيحة تساوي نتائج صحيحة استاذنك في الانتقال للمرحلة الاخيرة في هاته الصفحة الا وهي الترحيل اريد كود مستقثل يرحل كل البيانات من صفحة التقرير الشهري الى صفحة مجمع النتائج الشهرية وقبل الترحيل يخيرك هل تريد الترحيل فعلا نعم او لا وبعد الترحيل يمسح كل البيانات في صفحة التقرير الشهري و عندما اقوم بعملية ترحيل اخرى من صفحة التقرير الشهري الى صفحة مجمع النتائج الشهرية البيانات الجديدة المرحلة تكون تحت القديمة مباشرة وهكذا وشيئ آخر استاذ ياسر اذا كانت هناك معطيات ناقصة في صفحة التقرير الشهري الكود يخبرك ان المعطيات ناقصة ويجب اكمالها قبل مواصلة عملية الترحيل Quran School V7.rar تم تعديل يونيو 8, 2015 بواسطه أبو عبد الملك السوفي
ياسر خليل أبو البراء قام بنشر يونيو 8, 2015 قام بنشر يونيو 8, 2015 ما هي المعطيات الناقصة في ورقة العمل "التقرير الشهري" ..؟ لأن هناك بعض الأعمدة لم يتم العمل عليها بعد ..حدد المعطيات بكل دقة واعذرني لأنني يبدو أنني لن أكمل معك حيث أنني سأسافر لبضعة أسابيع إن شاء الله أحد الاخوة يكمل معك المشوار .. الحمد لله وصلنا لمرحلة لا بأس بها .. أعتقد تعدت نسبة الـ 50% تقبل تحياتي
أبو عبد الملك السوفي قام بنشر يونيو 8, 2015 الكاتب قام بنشر يونيو 8, 2015 السلام عليكم الحمد لله تم الانتهاء من كل العمليات الخاصة بالصفحة والاعمدة الباقية يتم الادخال فيها يدويا اي انه لا يجب ان تكون هناك اي خانة فارغة مثلا السطر 3 كل المعلومات مكتوبة الا اختبار الحفظ او المخالفات او الاشتراك غير مكتوبة فلا يتم الترحيل الا بعد استكمال البيانات اقصد انه لا يتم ترحيل اي بيانات الا بعد استكمال كل البيانات نسال الله ان تذهب وتعود لنا سالما غانما في اقرب وقت ان شاء الله نعم مشينا مشوارا لا باس به لكن مازالت هناك صفحات اخرى مهمة اسف ان كنت اثقلت عليك استاذ ياسر 1
ياسر خليل أبو البراء قام بنشر يونيو 8, 2015 قام بنشر يونيو 8, 2015 أخي الكريم أبو عبد الملك يكفي لهذا الموضوع هذه المشاركة الأخيرة إليك الملف التالي عله يفي بالغرض Sub TransferData() Dim WS As Worksheet, SH As Worksheet Dim LR_WS As Long, LR_SH As Long Dim Answer As Long, X As Long Set WS = Sheets("التقرير الشهري"): Set SH = Sheets("مجمع النتائج الشهرية") LR_WS = WS.Cells(Rows.Count, 1).End(3).Row LR_SH = SH.Cells(Rows.Count, 1).End(3).Row + 1 X = LR_WS - 1 Application.ScreenUpdating = False Answer = MsgBox("هل أنت متأكد من ترحيل البيانات من ورقة التقرير الشهري إلى ورقة مجمع النتائج الشهرية؟", vbInformation + vbMsgBoxRight + vbYesNo) If Answer = vbYes Then If Application.WorksheetFunction.CountA(WS.Range("A2:V" & LR_WS)) < (22 * X) Then MsgBox "المعطيات ناقصة ويجب إكمالها قبل مواصلة عملية الترحيل", vbInformation + vbMsgBoxRight: Exit Sub WS.Range("A2:W" & LR_WS).Copy SH.Range("A" & LR_SH) With SH.Range("A2:A" & SH.Cells(Rows.Count, 1).End(3).Row) .Formula = "=ROW()-1": .Value = .Value End With Else MsgBox "لقد تم إلغاء عملية الترحيل", vbInformation + vbMsgBoxRight End If Application.CutCopyMode = False Application.ScreenUpdating = True End Sub قم بتجربة الكود أكثر من مرة .. وقم بمسح ولو خلية واحدة في ورقة العمل المسماة "التقرير الشهري" وشاهد النتائج بنفسك .. لابد من أن تكون كل الخلايا لحد العمود V بها بيانات وإلا لن ينفذ كود الترحيل .. أتركك مع الملف للتجربة Quran School V8.rar
أبو عبد الملك السوفي قام بنشر يونيو 8, 2015 الكاتب قام بنشر يونيو 8, 2015 (معدل) السلام عليكم عذرا استاذ ياسر هناك بعض النقائص في الكود اولا الكود لا بد ان يمسح البيانات من صفحة التقرير الشهري بعد تاكيد الترحيل ثانيا يجب ان يرحل الرقم (العمودA)من صفحة التقرير الشهري كما هو الى صفحة مجمع النتائج الشهرية لاني قمت بترحيلين فرايت الكود يجعل الرقم في صفحة مجمع النتائج الشهرية ترتيب تلقائي مثلا اذا رحلت الطالب رقم 1 يبقى رقمه 1 اذا ادخلت بيانات اخرى ورحلت نفس الطالب يبقى رقمه 1 وليس يتغير الى 2 تم تعديل يونيو 8, 2015 بواسطه أبو عبد الملك السوفي
محمد حسن المحمد قام بنشر يونيو 9, 2015 قام بنشر يونيو 9, 2015 السلام عليكم أخي وحبيبي في الله أبو البراء: إن ما كان يشغلك يستحق الجهد والعناء وقد أجدت بحول الله وقوته بإنجاز قسط كبير من هذا العمل الذي نرجو الله تعالى أن يجعله بميزان حسناتكم أنتم والقائمين على هذه المدرسة الكريمة .كما أرجو أن تلفت انتباه السادة المطورين الكرام إلى بحثي الأستاذ الكريم أحمد الرشيدي الذي نفد صبره - كما رأيت قبلاً - ثم إنني أدعو لك الله تعالى أن يزودك البر والتقوى وأن يرجعك من سفرك هذا سالماً غانماً و ها أنذا أزودك بخير كلام قيل في السفر :- ((اللهُ أكْبَرُ، اللهُ أكْبَرُ، اللهُ أكْبَرُ، سُبْحَانَ الَّذِي سَخَّرَ لَنَا هَذَا وَمَا كُنَّا لَهُ مُقْرِنِينَ * وَإِنَّا إِلَى رَبِّنَا لَـمُنْقَلِبُونَ. اللَّهُمَّ إنَّا نَسْأَلُكَ فِي سَفَرِنَا هَذَا البِرَّ والتَّقْوى، ومِنَ العَمَلِ مَا تَرْضَى، اللَّهُمَّ هَوِّنْ عَلَيْنَا سَفَرَنَا هَذَا وَاطْوِ عَنَّا بُعْدَهُ، اللَّهُمَّ أنْتَ الصَّاحِبُ فِي السَّفَرِ، والخَلِيفَةُ فِي الأهْلِ، اللَّهُمَّ إنِّي أعُوذُ بِكَ مِنْ وَعْثَاءِ السَّفَرِ، وَكآبَةِ الـمَنْظَرِ، وسُوءِ الـمُنْقَلَبِ فِي الـمَالِ والأهْلِ))، وإذَا رَجَعَ قَالَهُنَّ وزَادَ فِيهِنَّ: ((آيبُونَ، تَائِبُونَ، عَابِدُونَ، لِرَبِّنَا حَامِدُونَ))([1]). والسلام عليكم ورحمة الله وبركاته.. المحب لكم أبو يوسف. 2
تمت الإجابة ياسر خليل أبو البراء قام بنشر يونيو 9, 2015 تمت الإجابة قام بنشر يونيو 9, 2015 أخي الحبيب وأبي الروحي أبو يوسف بارك الله فيك وجزاك الله خير الجزاء على كلماتك المسطرة من ذهب ، لديك قدرة عجيبة على صياغة الألفاظ ، أرى في كلامك فصاحة وطلاقة وبلاغة منقطعة النظير .. بارك الله فيك أخي الفاضل أبو عبد الملك اعتقدت أن العمود الأول هو أرقام مسلسلة فقمت بإضافة هذا الجزء لأن الرقم هنا يفترض أن يكون أرقام مسلسلة (عموماً قمت بحذف هذا الجزء) وتمت إضافة رسالة لتأكيد الحذف من عدمه .. كما تمت إضافة جزئية هامة وهي لو أنه لا توجد بيانات لا تتم عملية الترحيل .. يرجى تحديد أفضل إجابة وإخبارنا بنسبة الإنجاز الذي تم للآن .. واطرح موضوع جديد بطلباتك الجديدة وإن شاء الله تجد المساعدة من الأخوة الكرام تقبلوا تحياتي Quran School V8.rar 2
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.