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

السلام عليكم ورحمة الله تعالى وبركاته اولا وقبل اى شئ لم يتم ترتيب اسماء اساتذتى الكرام الذين تم كتابة اسمائهم لسبب محدد فالترتيب لا يعنى اى شئ اطلاقا فجميعهم النجوم اللامعة بمن نقتضى منهم فى هذا الصرح نهتدى ان شاء الله كما خو الحال مع باقى الاساتذة الذين لم اكتب اسمهم فلا يعنى ذلك اى شئ كلهم فى مرتبة واحدة وكلهم معلمينا الافاضل لا غنى لنا عنهم عذا فقط مجرد مثال اسرد اليكم الشـرح سريعا لفكرتى قبل البدء قد يتفق معى من يتفق ويختلف من يختلف لذلك انتظر ارائكم ان شاء الله فيشيد بهذه الطريقه من يشيد و يعترض من يعترض فنخرج ان شاء الله بأطيب النتائج هنا ان شاء الله اتعامل مع جدول باسم tblMainData والذى يختوى على الحقول A,B,C ونموذج باسم يضم الحقول على الترتيب txtA , txtB, txtC هذا الكود حتى اهئ النموذج للتعامل مع اختصار المفاتيح من الكيبورد Private Sub Form_Load() Me.KeyPreview = True End Sub وهذا الجزء حتى اسند القيم التى احتاج لنسخها الى متغيرات وكتبته هكذا ليسهل استدعاءه وقت الحاجة Private Sub SpecialCopy() 'الاعلان عن المتغيرات Dim VarFildeA As Variant Dim VarFildeB As Variant Dim VarFildeC As Variant 'اسناد قيم مربعات النص الى المتغيرات VarFildeA = txtA VarFildeB = txtB VarFildeC = txtC DoCmd.GoToRecord , , acNewRec 'سجل جديد 'نسخ قيم المتغيرات الى مربعات النص في السجل الجديد txtA = VarFildeA txtB = VarFildeB txtC = VarFildeC 'تفريغ المتغيرات VarFildeA = Empty VarFildeB = Empty VarFildeC = Empty End Sub وهذا الجزء لاسناذ القيم من المتغيرات الى مربعات النص للسجل الجديد وكتبته هكذا ليسهل استدعاءه وقت الحاجة Private Sub DoCopy() DoCmd.RefreshRecord If DCount("[ID]", "tblMainData") = 0 Then DoCmd.RefreshRecord Exit Sub ElseIf DCount("[ID]", "tblMainData") >= 1 Then If NewRecord Then DoCmd.GoToRecord , , acLast Call SpecialCopy Else Call SpecialCopy End If End If End Sub طبعا هنا اتأكد اولا ان كان هذا السجل الاول فى الجدول ام لا قبل ان تتم عملية اسناد القيم التى اريدها واهيرا استدعاء الكود من هلال زر امر لتنفيذ عملية نسه السجل الاأهير وقت الحاجة Private Sub BtnDuplicate_Click() Call DoCopy End Sub وهذا الجزء كما يقولون عنه الـ Hot Key استدعاء الكود من خلال زر من الكيبورد عن الضغط عليه Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 117 Then ' استبدل هذا الرقم برقم المفتاح بالاعلى كما يحلو لك Call DoCopy KeyCode = 0 Exit Sub End If End Sub تنويه ببعض الحيل ان اردنا نقوم بنسخ سجل محدد ان اردنا سجل بعينه تبعا لشرط او شروط محدده حسب ما تقتضى الحاجة واخيـــرا المرفق Duplicate Last Record.mdb

السلام عليكم 🙂 انا صادفت اكثر من 3 - 4 برامج ، المبرمج قافلها ، واصحاب العمل ما عارفين شو يعملون ، بعد ان تم عمل فورمات للكمبيوتر ، والمبرمج طالب المبلغ الفلاني لإعادة تنصيب البرنامج !! فرجاء ، رجاء ، اللي يريد ان يقفل برنامجه ، رجاء ان يضع برنامج او اي كود في برنامجه الحالي ، بحيث يقدر صاحب البرنامج ان يشتغل عليه من جديد ، وفي لابتوبات مافيها إلا البارتيشن C فقط . وهنا سؤال ، هل في اتفاق بينك المبرمج وبين صاحب البرنامج ، ان البرنامج لك ، او له !! فإذا مافي ، فمعناه ان البرنامج له ، وهو حر التصرف فيه !! جعفر

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

وعليكم السلام طالما انك لم تقم برفع ملف وشرح المطلوب بكل دقة فكان عليك استخدام خاصية البحث في المنتدى تفضل هذه الروابط قد تفيدك https://www.officena.net/ib/topic/54033-برنامج-الشيكات-مع-التقارير-الاصدار-الثاني-ضاحي-الغريب/?tab=comments#comment-340520 https://www.officena.net/ib/topic/45958-كيفيه-طباعة-الشيك-من-ذلك-النموذج/?tab=comments#comment-272771 وهذا نموذج أيضا بسيط وهذا أيضا برنامج جاهز لإدارة الشيكات bank_cheque_software.xls cheques_management_برنامج_ادارة_الشيكات.rar

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

أحسنت بارك الله فيك استاذ محمد

اخى الكريم بالنسبة لموضوع التاريخ وتثبيته ,هذا كان طلبك من البداية ان يكون التاريخ واليوم مثبتات ولا يتغيران مهما حدث اى تغيير تفضل جدول سير قضايا.xlsm

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

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

أحسنت أستاذ خلف كود ممتاز جعله الله في ميزان حسناتك وكل عام وانتم بخير

وعليكم السلام تفضل Book2.xlsx

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

اكتب هذا الكود فى فورم الدخول عند الفتح Sheets(1).select رقم ال1 تعنى ترتيب الصفحة رقم كام غيره براحتك

تفضل هذه هي النتيجة db1_1.rar

لا يتوقف البرنامج عن العمل في حال تغيير المسار . ويمكن بعد إضافة مسار النسخة وإقفال الزر وذلك بعدم التمكين

شرح وافي ومتميز جزاك الله خيرا استاذ محمد

وانا كذلك 🙂 مع اني ما احتجت الى استرجاع بيانات هذا في اي من برامجي ، ولكن طُلب مني التعديل على برنامج يقوم بحذف بيانات من جدول ويلحقه الى جدول آخر ، الى هنا والسالفه سهلة ، الطلب كان ، انهم محتاجين يقارنون البيانات المحذوفة ، ببيانات من جدول آخر ، بشرط عدم وجودها في الجدول الاصل. وشروط الجدول الآخر هي 1 و 2 و 3 . واتضح ان حقول جدول المحذوفات قد تم تغيير بعض حقولها ووووو ، ولولا جلوس المستخدم المحترف بجنبي وتوجيهي ، لكان حل الموضوع !! جعفر

اخي العزيزي أبا جودي لا دخل بكل ما تفضلت بعمل المجموعات ملف المجموعة يهم فقط المبرمج ولا علاقة للمستخدم به اطلاقا ولا علاقة للاصدار

نعم صحيح

طيب تمام لو انه قام بانشاءه لابد من وضعه فى مسار محدد ويتم استدعاءه من خلال الدهول الى محرر الاكودا فى الجزء Immediate ووضع الكود DoCmd.RunCommand acCmdWorkgroupAdministrator ليقوم بعمل استعراض الملفات للذهاب اليه للارتباط بالقاعدة والا لن تفتح القاعدة اصلا ----------------------- ومؤخرا فى عملى اصبحت استخدم الربط هذا من خلال الشوركت حتى لا اضطر الى الدخول لمحرر الاكواد بعمل شورت كت للقاعدة ووضع هذا السطر فى الــ Target "C:\Program Files (x86)\Microsoft Office\root\Office16\MSACCESS.EXE" "D:\xxx\zz.mdb" /WRKGRP "C:\Secur\Secured.mdw" ولكن هنا لابد من معرفة اصدار نواة كل من الويندوز و الاوفيس ومكان االاوفيس على الجهاز بعد اعداده "C:\Program Files (x86)\Microsoft Office\root\Office16\MSACCESS.EXE" "C:\Program Files\Microsoft Office\Office14\MSACCESS.EXE" ---- الجزء الثانى مكان قاعدة البيانات واسمها D:\xxx\zz.mdb الجزء الثالث مسار ملف السيكيورتى جروب "C:\Secur\Secured.mdw" لو اختلف اى معامل من الثلاث لن تفتح القاعدة اصلا عند العميل تحت امرك جارى عمل مثال حالا من اجل عينيك يا استاذى الكريم و اخى الحبيب تدلل بس بالاول ليعمل عندك كم نواة الوندوز والاوفيس لديك 64 او 32 كل على حده وما هو اصدار الاوفيس ؟؟ انا مثلا عندى لا يعنينى اصدار الويندوز فقط نواته اما الاوفيس لابد لى من معرفة اصدار الاوقيس ونواة الاوفيس انا مثلا ويندوز 64 بيت و اوفيس 2019 نواة 32 بيت اعطنى تلك البيانات استاذ عبد @عبد اللطيف سلوم

الست تقصد يا استاذى الملف ذات الامتداد mdw الذى يحدد صلاحيات دخول المستخدمين من خلال معالج اوفيس ليحدد من يستطيع الفتح فى وضع التصميم ومن له حق القراءة والتهديل او القراءة فقط او الحذف او التعديل على كل كائنات القاعدة باسمها اما جداول او استعلامات او نماذج Microsoft Access Workgroup Information File اعتمادات تسجيل الدخول التي تمكن المستخدمين من الوصول إلى قاعدة بيانات محددة تابعة لـ Access وفق صلاحيات محدده لكل مجموعة مستخدمين

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

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

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

لتعلم طريقة كسر الحماية لطفا شاهد هذا الفيديو وطبق

ما الفائدة من الرقم 1000 وماذا سيحدث لو تم الكتابة في Namex وتركت idx فارغا؟ هل سيقوم بالترقيم؟؟

في انتظارك اخي الفاضل عبد اللطيف

فهم السؤال ثلثي الاجازة اعمل مربع نص وسميه مثلا ALLRec ضع فيه =Count(*) واجعل نهاية For هذا الحقل For i = 1 To AllRec لا تنس عمل إخفاء للمربع المذكور 🙂

السلام عليكم ورخمة الله وبركاته شكرا لردكم الكريم قمت بادخال اسماء ودرجات للطلبة عليك اخي الفاضل مراجعة الصفحات من 1 الى4 ومدى صحتها في حالة وجود اخطاء نامل منك تغيير لون الخلية الى احمر مثلا وكتابة الرقم الصحيح فيها تم تنسيق الملفات لتتعامل مع اي عدد من الطلبة بمعنى اصبحت كل مادة ورقة واحدة فقط ويتم التبديل بين المستويات عن طريق الخانة J4 تم الضغظ على زر استدعاء ومن تم يمكنك الطباعة بواسطة الزر طباعة وهكذا الى كل صفحة وقد تم العمل على الاول اعدادي فقط لم افهم ما المقصود منها اكتب القيمة الصحيحة وساقوم بكتابة معادلتها من المهم جدا لدقة الاحصائية كتابة جنس الطالب (النوع) اكتب 1 اذا كان ذكرا واكتب 2 اذا كانت انثى اما اذا كان طلاب المدرسة نوع واحد فيمكن الاستغناء عن ذلك كذلك من المهم جدا كتابة ح او غ في خانة الحضور لما علاقة بالصفحات الاربع الاولي تحياتي تحليل نتيجة الفصل الدراسى الأول 2019.xls

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

تفضل Private Sub id_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyF6 Then SendKeys "^'", True End If End Sub db2.mdb

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

تفضل الملف بعد التعديل هوية 2020.xlsm

اخى الكريم الملف بالفعل به كل ما تطلب جدول بيانات بلا عنوان1.xlsm

بعد اذن الأستاذ وجيه تفضل جدول بيانات بلا عنوان.xlsm

بارك الله فيك استاذ أحمد وجزاك الله كل خير

وضح من فضلك على الملف او عليك برفع صورة لما يحدث معك فالملف يعمل لدى بكل بساطة

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

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

راجع من فضلك هذا الروابط https://www.officena.net/ib/topic/90218-حل-مشكله-run-time-error-1004/ https://www.officena.net/ib/topic/68596-مشكلة-فى-كود-الترحيل-خطأ-run-time-error-1004/ وأيضا هذه روابط اخرى خارجىة للإصلاح https://www.compuchenna.co.uk/runtime-error-1004/ https://appuals.com/run-time-error-1004-in-excel/ http://www.repairmsexcel.com/blog/how-to-fix-runtime-error-1004

بارك الله فيك استاذنا الكبير ابراهيم وجزاك الله خير الثواب

بارك الله فيك استاذنا الكريم ابراهيم وزادك الله من فضله

شكرا لك اخي الفاضل وجزاك الله خير لاكن عندي ملحوظه جملة sql الموجود في الاستعلام تختلف عن الكود الذي ادرجته تماما

طريقة عمل شاشة ( فورم ) ادخال وترحيل واستعلام وتعديل !! خطوة خطوة السلام عليكم اساتذة المنتدي وخبراؤه الكبار الاخوة الافاضل بالطبع هناك اكواد كثيرة لعمل شاشة الادخال وكذلك الاستعلام ولكني قصدت اختيار اسهل هذه الاكواد لعمل ذلك لتكون اسهل في توصيل المعلومة وكذلك اسهل عند التطبيق وارجو من الله ان اكون قد وفقت في عمل ذلك (((( الدرس الرابع )))) شاشة ( فورم ) لادخال بيانات والقيام بتسجيل وترحيل هذه البيانات الي صفحة الاكسيل و الاستعلام من خلالها عن طريق نفس الفورم والتعديل ايضا في البيانات في حالة ما اردنا التعديل في بيان قد سبق ادخاله وطبعاً والاكيد كله من علمكم اساتذتي الكرام الاجلاء في هذا الدرس سنتعرف علي طريقة عمل زر للتعديل بعد عمل استعلام عن الاسم او الرقم المطلوب وذلك في نفس الفورم الذي قمنا بتصميمه وذلك للبيانات السابق تسجيلها في صفحة البيانات وذلك عن طريق استخدام زر للتعديل ... مع وضع اكواده ... وشرح الكود سطر سطر كما تعودنا واي استفسار .... في الخدمة دائما ... واي شئ غير واضح في الشرح علي استعداد تام لشرحه مرة اخري ومرات اخري و القادم ليس درسا ولكن ساقوم بارفاق بعض الملفات التي توضح شرح بسيط لاستخدام الخلايا في الاكواد وهو جزء بسيط جدا ( ان شاء الله ) واليكم ايضا في المرفقات : 1- ملف اكسيل به الاكواد والشرح هذه المرة داخل الكود ( تم شرح الكود سطر سطر بطريقة وافية وبسيطة جدا داخل الكود نفسه ) 2- عدد ( 2 ) ملف فيديو يشرح طريقة التصميم واضافة الاكواد وكذلك مشاهدة النتيجة واضافة بسيطة لكفاءة عمل الشاشة بدون اخطاء جزاكم الله خيرا اساتذتنا اكسيل ..طريقة عمل شاشة ادخال واستعلام وتعديل 4.rar شرح طريقة عمل زر تعديل.rar تم ارفاق المرفق الثالث بالمشاركة التالية والخاص بمشاهدة النتيجة واضافة بسيطة لكفاءة عمل الشاشة بدون اخطاء .... لعدم امكانية رفعه في هذه المشاركة

طريقة عمل شاشة ( فورم ) ادخال وترحيل واستعلام وتعديل !! خطوة خطوة السلام عليكم اساتذة المنتدي وخبراؤه الكبار الاخوة الافاضل (((( الدرس الثاني )))) شاشة ( فورم ) لادخال بيانات والقيام بتسجيل وترحيل هذه البيانات الي صفحة الاكسيل و الاستعلام من خلالها عن طريق نفس الفورم والتعديل ايضا في البيانات في حالة ما اردنا التعديل في بيان قد سبق ادخاله وطبعاً والاكيد كله من علمكم اساتذتي الكرام الاجلاء وهنا في هذ الدرس سنقوم بالقيام بعمل بعض الاضافات علي شاشة الترحيل ليكون عملها ادق واسهل وذلك بعمل ( ترقيم تلقائي او تسلسل لتكست بوكس المسلسل ليتم ترحيلها بالتسلسل التلقائي --- وايضا تنسيق تكست تاريخ الالتحاق لنجعله يظهر بصيغة التاريخ التي نريدها ان تظهر امامانا وبعض الاضافات الاخري للمساعدة في عمل الفورم والشرح موجود بالفيديو يحدد طريقة عمل ذلك والشرح موجود بالاكواد نفسها وتم الشرح سطر سطر بنفس الطريقة السابقة ولكن لم اقم بشرح الجزء الخاص بتنسيق التاريخ في الفورم حيث سأرفق لكم ملف من ملفات سلسلة القدير الرائع الغائب الحاضر / عماد الحسامي في شرح جميع تنسيقات التكست بوكس من قيم وتواريخ وتنسيق .... الخ من الاكيد انه سيفيدكم كثيرا فهو اكثر من راائع واردت ان ارفقه لكم للاستزادة فهو راائع وفي الدرس القادم سنتعرف علي جعل هذه الشاشة ( الفورم ) تستخدم ايضا للاستعلام عن طريق استخدام كومبوبكس مع شرح كامل للاكواد المستخدمة في ذلك ... واي استفسار .... في الخدمة دائما ... واي شئ غير واضح في الشرح علي استعداد تام لشرحه مرة اخري ومرات اخري واليكم ايضا في المرفقات ملف اكسيل به الاكواد والشرح هذه المرة داخل الكود ( تم شرح الكود سطر سطر بطريقة وافية وبسيطة جدا داخل الكود نفسه ) عدد ( 4 ) ملف فيديو يشرح طريقة التصميم واضافة الاكواد وكذلك مشاهدة النتيجة جزاكم الله خيرا اساتذتنا 1- اكسيل ..طريقة عمل شاشة ادخال 2.rar 2- فيديو1 .. طريقة عمل شاشة ادخال 3-1.rar 3- فيديو3 .. طريقة عمل شاشة ادخال 3-3.rar 4- ملف الفيديو الرابع وملف الاستاذ / الحسامي .... في المشاركة التالية نظرا لكبر حجم المرفقات

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

السلام عليكم ورحمة الله وبركاته الاخوة بوفيصل و ابو العقاب الملف باستخدام المعادلات وليس بالاكواد , والمعادلة موجودة في الاسماء المعرفة باسم للطباعة. المعادلة بصورة عامة بسيطة, حيث استخدم فيها الدالة OFFSET وهي الدالة الاساسية في تحديد النطاق المتغير, وسوف اوضح هنا المعادلات التي استخدمت مع الدالة OFFSET لتحديد بداية ونهاية الصفوف والاعمدة للخلايا المعباة في النطاق $B$10:$G$30 =MIN(IF(($B$10:$G$30<>"");ROW($B$10:$G$30))) المعادلة اعلاه ترجع رقم اول صف به بيانات , أي تبحث المعادلة عن الخلايا غير الفارغة ثم ترجع اصغر رقم صف لهذه الخلايا غير الفارغة. =MAX(IF(($B$10:$G$30<>"");ROW($B$10:$G$30))) المعادلة اعلاه ترجع رقم اخر صف به بيانات =MIN(IF(($B$10:$G$30<>"");COLUMN($B$10:$G$30))) المعادلة اعلاه ترجع رقم اول عمود به بيانات =MAX(IF(($B$10:$G$30<>"");COLUMN($B$10:$G$30))) المعادلة اعلاه ترجع رقم اخر عمود به بيانات ============== المعادلات اعلاه هي المستخدمة في الدالة OFFSET – مثلا- عندما نريد تحديد عدد صفوف النطاق المتغير يكون = معادلة رقم اخر صف – معادلة رقم اول صف + 1 المعادلات اعلاه عند ادخالها في اسم معرف تضاف اليها اسم الورقة تلقائيا المعادلات اعلاه يمكن كتابتها في الورقة كمعادلات صفيف. تحياتي

أختنا أم بندر ظللت منتظر لشكل التقرير المطلوب ولكن لا حس ولا خبر لذا تفضلي البرنامج بعد إضافة عنوان المدرسة وإضافة الشعبة تحياتي,,, برنامج العلامات المدرسية.rar

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