نجوم المشاركات

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

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

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

أخي الكريم ناصر جرب الملف التالي Sample UDF.rar

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

اهلا بك الاستاذ عبدالعزيز في منتدى الاكسس وتشرفت بالرد ضع التعبير التالي في حقل جديد باستعلام جديد Expr1: DateDiff("yyyy";[birth];Date()) وتم استخدام الدالة datediff لحساب فرق السنوات بين تاريخين حيث اصبح التاريخ الثاني هو دالة تحسب تاريخ اليوم بالتوفيق

برنامج صغير جدا لطباعة شهادات تقدير هدية للاعضاء طباعة شهادات تقدير.rar

و عليكم السلام ورحمة الله و بركاته ... تستطيع عمل حقل في الاستعلام ... فمثلا الحقل الذي تريده اسمه " aadd " تعمل حقل جديد كما يلي aadd2: iif(isnull[aadd];"لا يوجد";[aadd])

يمكن إستخدام إستعلام تحديث من أجل تغيير قيمة في جدول إعتمادا على جدول آخر. مثال: يمكن تطبيق هذا النوع من الأستعلام في جدول ترقية للأفراد العسكريين. نختار إنشاء إستعلام ثم نختار نوع الأستعلام تحديث . نختار الجدول و نختار منه اسم الحقل الذي نريد تغيير قيمته. في السطر تحديث إلى: نختار اسم الحقل الذي نريد أخذ منه القيمة الجديدة. إليكم المثال التالي يوضح ذلك. و الله هو الموفق. الترقية.rar

أخي عبد العزيز يجب عليك فتح نموذج و إضافة مربع نص غير منظم أكتب فيه الكود "DateDiff("yyyy";[Birth];Date())" لقد فعلت هذا التعديل على ملفك تفضل أخي. بلغ سلامي لأبناء بسكرة. data.rar

دقيقة واحدة اتفضل لو عجبك اضغط LIKE 147.rar

الاحدث Sales (3).rar

قبطاننا العزيز اتتركنا في جزيرة ضائعة وتبحر لوحدك ام تلقي لنا مركبا لانعرف كيفيه توجيهه؟؟ ارجو منك القاء مركباً بصيغة 2003 يمكن لبحارة الاكسس القدماء والبسطاء من قيادته تحياتي

الله يحفظك ويبارك لك الاستاذ المحترم عبد السلام أبو العوافي

اخي الكريم .. تم الاجابة علي سؤالك المشكلة في العلامة _ يعني المفروض اسم الفنكشن Kh_Mustowa يكون KhMustowa لان غير مسموح لا الحروف في الفنكشنز

ربنا يجزيك الخير .. يارب تمام للاستاذ المحترم عبد السلام والاستاذ الكبير ياسر لي رجاء تقول لي ايه كانت المشكله ؟ ليه ما إشتغلتش معايا

أخى وحبيبى فى الله ابو البراء السلام عليكم ورحمته الله وبركاته أطمع فى تعليقا لا إعجابا فإعجابنا بك ليس له حدود جزاكم الله خيرا وبارك فيكم واحسن إليكم كما تحسن للجميع

أيوه كده يا راجل زى الفل تسلم أيدك (وربنا يعنى في تحويل بقية ملف التعريفات) على فكرة المنتدى منعنى أن أنا أيديلك إعجاب طلعلى رسالة بتقول أن أنا استنفذت عدد مرات الإعجاب اليومى بعدد 10 إعجابات شفت بقا خلصت عليك رصيدي من الإعجاب أعمل أيه دلوقتى صحيح ياريت متهربش من إجابة هل يمكن عمل هذا الكود في برنامج الوورد وإذا كان ممكن أزاى أنفذه وشكرا جزيلا لك تعبتك معايا جزاكم الله خير أنت والأخ الفاضل أخوكم في الله (مش ليه بحب الاسم ده أكتر )

حساب العمر.rar إليك الحل أخي عبد العزيز لقد أضفت ذلك في مشاركة سابقة

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

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

ايه رايكم نفتح تصنيف جديد بالمنتدى ونسميه "اكسسل" مع اجمل التحايا استاذ ياسر

أعتذر إليك أخي العزيز وائل حدث لبس عندي فاعتقدت أنك تريد مسح النقطة التي في نهاية الجملة وليس وضع النقطة عموماً ملحوقة تفضل الكود التالي Sub Split_It() Dim Arr, I As Long, P As Long Application.ScreenUpdating = False With Sheet1 Arr = .Range("A1").CurrentRegion.Value For I = 1 To UBound(Arr) Sheet2.Cells(P + 1, 1).Value = Application.Trim(Split(Arr(I, 1), ":")(0)) If Right(Split(Arr(I, 1), ":")(1), 1) = "." Then Sheet2.Cells(P + 1, 2).Value = Application.Trim(Split(Arr(I, 1), ":")(1)) Else Sheet2.Cells(P + 1, 2).Value = Application.Trim(Split(Arr(I, 1), ":")(1)) & "." End If P = P + 1 Next I End With Application.ScreenUpdating = False MsgBox "Done...", 64 End Sub تقبل تحياتي Split By Delimiter YasserKhalil V3.rar

احذف (_) من اسم الفنكشن .. اسم الفنكشن يجب ان يكون احرف فقط

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

Sub AAAAAAAAA() Application.ScreenUpdating = False For x = 1 To Range("B" & .Rows.Count).End(xlUp).Row For i = 1 To Len(Cells(x, 2)) If Mid(Cells(x, 2), i, 1) = ":" Then Cells(x, 1) = Mid(Cells(x, 2), 1, i - 1) & " :" Cells(x, 2) = Mid(Cells(x, 2), i + 1, Len(Cells(x, 2)) - 1) & "." GoTo 1 End If Next i 1 Next x Application.ScreenUpdating = True End Sub السلام عليكم اضافة لما ادلى به اخي سليم و اخي ياسر اعتقد ان هذا الكود ايضا يفي بالغرض

أخي الكريم وائل بناءً على الملف المرفق من قبل أخونا سليم من قبل ..تعاملت مع خلية واحدة فقط وهي الخلية A1 وتم فصل كل جملة ، وفصل كلمة التعريف بكود واحد بسيط جداً ويؤدي الغرض إن شاء الله ولكن انتبه من الأفضل إرفاق ملف معبر عن المطلوب .. سأرفق لك الملف الذي قمت بإعداده وأخبرني إذا كنت تريد التعديل عليه أم لا .. لو كانت البيانات عدة صفوف فلما لا ترفق ملف معبر بعض الشيء عن الملف الأصلي كأن ترفق 5 صفوف مثلاً ..ليتم العمل على هذا الأساس هذا هو الكود المستخدم (لتنفيذ الكود Alt+ F8 واختر الإجراء المسمى SplitIt) Sub SplitIt() Dim Arr, I As Long, P As Long Arr = Split(Range("A1").Value, """") For I = 0 To UBound(Arr) Step 2 P = P + 1 Cells(P + 1, 1).Value = Application.Trim(Split(Arr(I), ":")(0)) Cells(P + 1, 2).Value = Application.Trim(Split(Arr(I), ":")(1)) Next I End Sub وها هو الملف المرفق أيضاً Split By Delimiter YasserKhalil.rar وها هو ملف مرفق آخر حيث التعامل مع أكثر من خلية واحدة .. ضع البيانات في العمود الأول ثم نفذ الأمر وإليك الكود المستخدم Sub SplitIt() Dim Arr, I As Long, P As Long, T As Long, LR As Long LR = Range("A1").CurrentRegion.Rows.Count P = LR + 2 For T = 1 To LR Arr = Split(Cells(T, 1).Value, """") For I = 0 To UBound(Arr) Step 2 Cells(P + 1, 1).Value = Application.Trim(Split(Arr(I), ":")(0)) Cells(P + 1, 2).Value = Application.Trim(Split(Arr(I), ":")(1)) P = P + 1 Next I Next T End Sub أرجو أن يفي بالغرض إن شاء الله تقبل تحياتي Split By Delimiter In Multiple Cells YasserKhalil.rar

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

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

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

بالنسبة لفنح البرنامج خفف امان الماكرو ومرفق ملف وورد لذلك تخفيف امان الماكرو.rar

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

New Microsoft Excel Worksheet1.rar

أخي الكريم أهلاً بك في المنتدى ، يرجى تغيير اسم الظهور للغة العربية إليك الرابط التالي فيه تفصيل وشرح لأسطر الكود لكيفية فصل الناجحين والراسبين الرابط من هنا

السّلام عليكم و رحمة الله و بركاته بعد إذن أخي الفاضل " عبد السّلام أبو العوافي " هذا ملف به قاعدة بيانات مع جلب الصّور .. يمكن لك أخي الكريم أن تقوم بتكييفه و اقتباس معادلاته حسب إحتياجاتك و ذلك بتغيير ما يجب تغييره فائق إحتراماتي البطاقات المدرسية.rar

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

بالغاء الشفت.. اظن انك لست مبتدأ

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

يمكن استخدام خاصية ScrollBar للمزيد قم بالإطلاع على الرابط التالي الرابط من هنا

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

السلام عليكم ورحمة الله وبركاته الاستاذ الفاضل // العنكوش 1 ) جزاك الله خيرا أخي الحبيب على ذوقكم العالي وردكم الجميل وكلامكم الطيب جعل الله لسانكم قائدا لكم في كل خير واوصلكم به لرفقة النبي _ صلى الله عليه سلم_ 2 ) بالنسبة لكلمة "البرنامج سلاح ذو حدين" صدقت أخي لا تقلق فانا اعمل في نفس المجال وهذا ما اعلمه بل ما اعيه جيدا بل ما اقوله دوما ان الخطا الصغير في هذه البرامج معناه نجاح الراسب أو رسووب الناجح وهذا ما لا يقبله شرع ولا عقل ولا اي أحد ولا يطيقه اولياء الامور 3 ) بالفعل أخي لم افهم فكرة درجات القرار وتوزيعها جيدا ولكن فهمتها بعد اطلاعي على الملف المرفق الاخير لكم ويدل الملف على أن القرار له شرطان الاول : عدد مواد الرسوب لا يزيد عن مادتين الثاني : ان مجموع درجات الرسوب لا يزيد عن درجة القرار وليكن 5 درجات وهذه النقطة لم افهمها جيدا فيما مضى حيث توقعت ان درجة القرار للمادة الواحدة بمعنى ان الطالب لو حصل على 45 في احد المواد ومادة اخرى 45 ينفذ عليه القرار والسبب ان الطالب راسب في مادتين كما ان المادتين لا يزيد الدرجات التى يحتاجها الطالب عن 5 درجات لكل مادة ولكن الحمد لله فهمت مرادك.. ان كنت مخطئ في هذا الكلام صوبني صوبك الله لكل خير 4 ) بالفعل تم التنفيذ على شرط كلمة قرار الموجودة في الملف لكن بعتذر انني نفذت على ملف two _end السابق والسبب ؟! ان الملف الذي ارسلته كان يحتاج الى فك التحقق من الصحة 5 ) للعلم ورقة after قمت بوضع معادلة تعمل على تبديل كلمة " قرار" في عمود ag الى كلمة "تم تنفيذ القرار" 6 ) اضفت شرط الا يزيد عن مادتين في عمود ag 7 ) تفضل أخي الحبيب هذا الملف ولو فيه اي مشكلة انا في خدمتك وفي انتظار جديدك.. two_end_2.rar

يبدو انني لم اتاكد من رفع المرفقات وذلك لغبطتي بالردود التي تقدمها اخي اذ انها واضحة ومتميزة وتدلل مدى اهتمامك بالموضوع لا بل وسعيك لانجازة بتميز وان دل ذلك على شئ انما يدل على حرصكم وتفانيكم من اجل نشر العلم والمعرفة دون حصرها بارك الله بكم اخي واعطاكم سؤلكم قبل ان تطلبون انه سميع مجيب الدعاء لربما تقول ان تاكيدي على الشرطين فاق حده ولكني اعتقد وكما تعرف ان مثل هذه البرامج سلاح ذو حدين ان لم تتقن في صنعها فان اخطائها تكون فادحة وان تركت تتفاقم لتصعب تحديد الاخطاء فيما بعد على اي حال يمكنك بالضغط على تطبيق القرار ان القرار يطبق على الطالب A2 والذي لديه ثلاث دروس وهذا خطا او يمكنك من ورقة بيفور ان تغير درجات اي طالب مثلا بعد التراجع عن القرار ووضع درجات مثلا 49 49 49 في ثلاث دروس واضغط تطبيق قرار تلاحظ يطبق عليه.وهكذا لاربع او 5 او او ....من الدروس اقتراحي الاعتماد على المعادلة في العمود AC التي عدلتها بشرطين لكي يضع امام الطالب كلمة قرار بالاخضر فان كان مقابل الطالب قرار اذن نحول جميع الدرجات في ذلك الصف الى 50 والتي تعود لذلك الطالب تحياتي لك وشكرا جزيلا لاهتمامكم ملاحظة تم تعديل معادلة (يحتاج الى قرار )في العمود AC في هذا المرفق يرجى اعتمادها بديلا عن المعادلة التي في الملف الذي عندكم TWO END لانني ادخلت الشرطين لكي يضع كلمة قرار امام الطالب conditions.rar

1 ) اين المرفق أخي الحبيب 2 ) للعلم انا اعلم ما تقصد جيدا وهو ان الطالب شرط ان ينفذعليه القرار شرطين الاول هو ان يكون عدد مواد التى يحتاج فيها القرار اثنان فقط الثاني ان يكون مجموع المادتين يقبل درجات القرار وما عدا ذلك يترك درجاته كما هي 3 ) واما المشكلة التي ظهرت معك لعل سببها انني لم اضع اخر مادتين المكتوب على راس العمود (عبور ) ضمن المواد..

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

السلام عليكم ورحمة الله وبركاته الاخ الفاضل // العنكوش 1 ) جزاك الله خيرا على ذوقك في ردودك 2 ) هما شرطان بالفعل ولكن كان قصدي اقل من 3 مواد فقط ولا يساوي ال 3 3 ) في انتظار طلبات اخرى...

وعليكم السلام ورحمة الله وبركاته جزاك الله عنا اخي وحبيبي محمد الف الف خير وشكرا لابدائك المساعدة وطبعا عمل متقن رغم ما تراه انت فانا اراه رائع بما توصلنا اليه الى الان ولكن كان شرطي درسين او اقل وليس ثلاثة ( ويمتد مدى الخلايا ليشمل O204 اي الدرسين الاخيرين اخي ) فيكون المدى D5:O204 )

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