اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

يمكن استخدام الطريقة التالية

في حقل جديد

MySum: [اسم الحقل الأول]+[اسم الحقل الثاني]+[اسم الحقل الثالث]+[اسم الحقل الرابع]

 

حيث mySum دا عنوان الحقل الجديد الذي تريده للجمع

قام بنشر
1 دقيقه مضت, علي المصري said:

يمكن استخدام الطريقة التالية

في حقل جديد


MySum: [اسم الحقل الأول]+[اسم الحقل الثاني]+[اسم الحقل الثالث]+[اسم الحقل الرابع]

 

حيث mySum دا عنوان الحقل الجديد الذي تريده للجمع

 

قام بنشر

اخي علي واذا كان عدد الحقول المراد جمعها كبير جدا هل يوجد كود او داله تجمع بين اول حقل واخر حقل ويجمع كل هذه الحقول خالص تحياتي

قام بنشر

الاخ علي هذا الملف يحوي حقول للرواتب لاشهر سنة 2015 وسنة 2014 لموظفين ومنهم لديه راتب ومنهم تم الحجب عنه لعدة اسباب الذي احتاجه هو مجموع الرواتب لكل قيد من اول حقل لاخر حقل ويتم وضعه في حقل جديد ... خالص الشكر والتقدير

salary2015+2014.rar

قام بنشر

الاخ العزيز علي اشكرك على تجاوبك وتواصلك معي واتمنى من اعضاء المنتدى ان يطرحوا فكرة لحل الاستفسار ... تحياتي لك

قام بنشر

وعليكم السلام :rol:

 

هناك طريقة افضل لحفظ سجلاتك في الجدول ، فطريقتك مأخوذة من الاكسل مثلا ، وليست صحيحة لقواعد البيانات :blink:

262.Clipboard01.jpg.70f1f84920f171851043

.

عملت لك جدول جديد ، وجلبت لك البيانات اليه:

262.Clipboard02.jpg.b1846a84bcc6f1cec441

.

والبيانات:

262.Clipboard03.jpg.faca6469c7e9c3923393

.

وعليه ، عملت عدد 2 استعلام جدولي ، واحد شامل لكل السنوات:

262.Clipboard05.jpg.5401d1af77db8f64a876

.

ونتائجه:

262.Clipboard06.jpg.b8f0aebef0caccfc097c

.

واستعلام سنوي (يعني استخدم خاصية التصفية) ، لكل سنة على حدة:

262.Clipboard08.jpg.38f58714c34cb28c7d68

.

والنتيجة:

262.Clipboard09.jpg.4486df9fb5b0f2416a6e

.

 

جعفر

 

 

262.salary2015+2014.accdb.zip

  • Like 3
قام بنشر (معدل)

السبب الذي قلت ان جدولك ليس صحيحا لقاعدة البيانات ، هو انك يجب ان تضيف حقل جديد كل شهر ،

فالطريقة الصحيحة لعمل الجداول هو اضافة سجلات وليس اضافة حقول :blink:

 

وهناك مثل مشهور في قواعد البيانات يقول : الحقول غالية والسجلات رخيصة :rol:

 

اما اذا تريد تمشي حالك الان بالجدول الموجود ، ومجرد تريد ان تجمع قيم جميع الحقول ،

اعمل استعلام فيه جميع الاسماء ، وننادي منه الدالة Add_Salaries والتي عملناها في الوحدة النمطية ، ونرسل معها اسم الشخص:

262.Clipboard010.jpg.fe9ede9d4c0168bd820

.

وهذا كود الدالة Add_Salaries:


Function Add_Salaries(F As String) As Double

    'F = Full Name
    
    Dim rst As DAO.Recordset
    Dim fld As Field
    
    'get this Name Record from the table
    Set rst = CurrentDb.OpenRecordset("Select * From [salary2015+2014] Where Full_Name='" & F & "'")
    
    T = 0   'initial Total
    
    'loop through the fields
    For Each fld In rst.Fields
    
        'Debug.Print fld.Name & vbTab & fld.Value
        
        'skip the Full_Name field name
        If fld.Name <> "Full_Name" Then
            'add the field values
            T = T + fld.Value
        End If
        
    Next fld
    
    'now send this Total to the query
    Add_Salaries = T
    
End Function

.

حيث اننا في الدالة نطلب سجل الشخص من الجدول salary2015+2014 ،

ثم نقول بقراءة الحقول وجمعها ،

زنرسل النتيجة الى الاستعلام ، فتصبح نتيجة الاستعلام:

262.Clipboard11.jpg.b21642f93f34655be8e2

.

 

جعفر

 

262.salary2015+2014.accdb.zip

تم تعديل بواسطه jjafferr
  • Like 3
قام بنشر (معدل)

الاخ العزيز جعفر اشكرك على اجابتك الرائعة ومجهودك الكبير في تقديم الحل وهو ماكنت احتاجه فعلا .... سلمت يداك وبارك الله فيك وبجميع الاعضاء في المنتدى ... تحياتي لك

تم تعديل بواسطه mohammed_hq
  • 4 years later...
قام بنشر

وعليكم السلام اخي ابراهيم 🙂

 

اهلا وسهلا بك في المنتدى 🙂

رجاء عدم الرد في المواضيع القديمة ، فقد لا تحصل على رد ، وانما اعمل موضوع جديد لسؤالك ، وارفق رابط الموضوع لطرح طلبك 🙂

 

ردا على سؤالك ، تفضل هذا الرابط :

 

 

 

جعفر

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information