أبو عبد النور

السلام عليكم، - تم اضافة تلوين الاوراق المضافة - مسح ورقة "الكشف الرئيسي" - مسح ورقة "تقرير مفصل" - كود طباعة جدول الكشف المختار جرب المرفق. 2012_4.3.rar

اعمل على بعض التعديلات الاخيرة ان شاء الله.

جيد شيء مفرح. أدعو لي الله ان يفرج همي. بالتوفيق.

آسف على التأخير، فليس لدي وقت والانترنت عندي تكاد تكون معدومة (ليست ADSL) جرب المرفق. جمع _الرواتب(3).rar

اقصد بياناتك الجديدة، لماذا لم تعمل مع المعطيات الموجودة في ورقة "تقرير مفصل'" في الملف المرفق في الاجابة رقم 45 ؟ لابد انها مختلفة لان البيانات السابقة كانت تعمل بصور جيدة. وهل تريد تفريغ جدول ورقتي "الكشف الرئيسي" و "تقرير مفصل" في كل مرة او بعد مدة محددة ؟ اتقصد انه يتم اضافة رقم للكشف بدون جدول باللون الاصفر او كيف ؟ تم لا تتم الطباعة لاني ام اضف الكود المعني بالطباعة.

هل يمكنك إرفاق الملف الذي تعمل عليه ؟

انا ابحث لك عن الموضوع

مثل سابقتها Dim i as Long تظهر هذه الرسائل عندما لا يتم تعريف احد المتغيرات المستعملة في البرنامج. وما يفرض تعريف المتفيرات هو السطر : Option Explicit في اول كل صفحة اكواد. اذا اردت ان تجرب البرنامج بصورة اسرع ضع شرطة امام السطر هكذا : 'Option Explicit

السلام عليكم، جرب المرفق. جمع _الرواتب(2).rar

ولكن على اي اساس يتم الجمع بين 1، 3، 80 و 200 ؟ وليس غيرها ؟ او ما هو الرابط بين هاته السطور ؟ يجب ان يكون اهناك توضيح للامر

يعني انت تريد ان تجمع ما بين السطر 2 الى حيث تتوقف (10 مثلا) ثم تجمع من 11 الى حيث تتوقف (17 مثلا) وهكذا ... هل هذا ما تعنيه ؟

السلام عليكم، اضف السطر التالي في اول الدالة KH_A Dim R As Long هكذا : Private Sub KH_A() Dim RR As Integer, Endrow As Integer Dim R As Long ComboBox1.Clear With Sheets("ÇáßÔÝ ÇáÑÆíÓí") Endrow = .Range("E" & .Rows.Count).End(xlUp).Row For RR = 2 To Endrow ComboBox1.AddItem .Cells(RR, 1).Value Next RR End With For R = 0 To 10 Me.Controls(myCon(R)) = "" Next ComboBox1.Value = "" CommandButton1.Enabled = True CommandButton3.Enabled = False TextBox1.Value = Endrow TextBox2.SetFocus End Sub

السلام عليكم، جرب المرفق (الكود ليس من عندي) جمع_رواتب.rar

السلام عليكم، - تم اضافة انشاء ورقة جديدة (حسب الجنسية) في حالة عدم وجودها - اضافة ترتيب الاوراق حسب الترتيب الابجدي بعد كل ادخال جديد - اضافة زر استخراج البيانات الناقصة في ورقة "لم يكتمل" - اضافة زر الحصول على "تقرير مفصل" جرب ورد لنا خبر 2012_3.rar

السلام عليكم، عذرا على التاخير وذلك لضيق الوقت لدي. على كل حال، ورقة "التقرير المفصل" جاهرة بنسبة كبيرة ولا ينقصها الا يعض التعديلات.

السلام عليكم، هل المجموع يتم عن طريق كل مجموعة اسماء معينة ؟ ولو فيه مثال بسيط لتصل يكون احسن.

السلام عليكم، هل ممكن ان يكون الادخال عن طريق القيمة وفي العمود الثاني رقم الاستمارة الموجودة فيها هذه القيمة ؟ ليتم الجمع في الاخير عن طريق رقم الاستمارة فقط ؟

أهلا أخي العام الجديد2012 سوف احاول ارفاق مثال لذلك قريبا ان شاء الله.

السلام عليكم، 1 - هل يتم يتم ترحيل لبيانات الناقصة المدخلة عن طريق الفورم في اوراق الجنسية ؟ 2 - في جدول تقرير الكشف هل تريد حساب عدد البيانات غير المكتملة بالنسبة مثلا للاسم على حدى وبالنسبة لرقم القيد على حدى او تريد مجموع البيانات الناقصة بالنسبة لكل الحقول مجتمعة ؟ مثلا : عدد البيانات الناقصة بالنسبة للاسم هو 3 عدد البيانات الناقصة بالنسبة لرقم القيد هو 2 فمجموع البيانات غير المكتملة هو 5 3 - كيف يتم نقل البيانات الى ورقة التقرير المفصل ؟ اظن من الاحسن اضافة حقل جديد يتم فيه تدوين تاريخ الادخال ليتم نقل البيانات حسب التاريخ يكون احسن.

السلام عليكم، مرفق ملف مع شرح بسيط للفكرة العامة حول كيفية اشتغال ما تطلبه. هذا ما فهمته من تقديمك. فان كانت هناك تصحيحات فلتتفضل بها. وان شاء الله بالتعاون مع الاخوة سوف نحقق هذه الفكرة ان اعجبتك. :) far(v2).rar

السلام عليكم، عفوا كنت اقصد الدالة اRIGHT وليس LEFT لان االدوال عندي في لاكسل بالفرنسية وليس الانجليزية. الدالة RIGHT تقوم باستخراج الرقم من المادة باعتيارك تسمي المواد وتسند لها رقما في الاخر حسب الفصل. (عربي2 تعطيك 2) bkri_(v2).rar

السلام عليكم، الاخ ابو نصار قام بمعالجة الادخال بواسطة فورم. ويتم الترحيل حسب الجنسية الى الورقة المناسبة. هل يتم ادخال الكشوفات الرئيسية تحت بعض ثم بواسطة زر اصدار الكشف يتم آليا وضع جدول ملخص الكشف تحت الكشف الرئيسي المناسب مباشرة ؟ ثم لم اقهم جيدا كيف يتم االتصدير حسب المدة ؟ يا ليتك تقوم بارفاق مثال آخر اكثر توضيحا ويضم آخر محاولة للأخ ابو نصار لكي تتضح : - كيفية الاضافة الى الجدول الرئيسي ؟ - الترحيل الآلي يكون لاي صفحة بالضبط (حسب علمي يكون الى صفحة الجنسية) ؟ - الكشف الملخص (بالاصفر) هل هو موجود اصلا او يتم استحداثه بواسطة زر تصدير الكشف ؟

أهلا بكما اخوي احمد وبكري الدالة تضعها اخي في الخانة E7 و E8

هل الجدوليين ثابيتين ام قابلين للزيادة في المعلومات ؟

وعليكم السلام ورحمة الله جرب LEFT(C7) واسحب الى الاسفل