Hamdi Edlbi-khalf

السلام عليكم دعائكم هو أغلى بكثير مما يمكن أن يقدمه أي إنسان، بارك الله بكم ولكم مثل ما دعوتم وأكثر إن شاء الله تعالى ملاحظة حاول ألا تستخدم الحقول المحسوبة في الجداول. بالتوفيق أخي الغالي ‏‏‏‏احصاء 2010 -E3.accdb

السلام عليكم في المرفق التعديلات المطلوبة حسب ما انتهت إليه معرفتنا ولما وصلنا من رؤيتكم عن المعالجة، ولكن يرجى الانتباه إلى أن التعديل حسب طلبكم شمل حقل الذكور في المستجد والقرار دون لحظ الإناث. لم نجد رابطاً بين التوزيع الديني للطلاب مع المجموع. لم أقم بتكرار الأكواد للحقول. جعلت الجدول يحفظ آخر تعديل فقط. أرجو لكم التوفيق ‏‏احصاء 2010 -E2.accdb

أنت إنسان رفيع متواضع، وهذا الخلق خلق عظيم بارك الله بك، ليتك تعلم كم استفدت من إجاباتك لما كتب هذا الكلام، فعلاً 2016 ويفوقه 2013 بالثغرات حتى الآن تبين لي اثنتان ولا أدري ما يمكن أن أجده في المستقبل ^0^

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

السلام عليكم المشكلة لا علاقة لها بكودك بل بملفات الأوفيس - لعلك تستخدم أوفيس 2016 فهي ثغرة من ثغراته الكثيرة- هناك طريقة لمعالجة المشكلة سأوافيك بها بعد التأكد من نجاعتها.

السلام عليكم هاتان طريقتان لإظهار التغيرات في عدد المقاعد، بانتظار أن تعلمنا بمدى توافقهما مع حاجتك أو تصورك للمعالجة المناسبة. غير قيمة الحقل B1 (حقل الذكور ) لتشاهد النتيجة ويمكن تطبيقها على الحقول التي ترغب بالتنبيه عند تغيرها. معدل- احصاء 2010.accdb

السلام عليكم ليس في متناولي حاسب متصل بالإنترنت.

أتمنى لكم التوفيق أخي العزيز. وأعتذر لعدم تمكني من مساعدتكم.

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

بارك الله بجهودكم

السلام عليكم أضفت حقلاً للاستعلام ليظهر انطباق النتيجة على المطلوب، يمكن حذفه دون تغيير في النتيجة. أرجو أن يكون هذا ما تحتاج. temp kam2EDIT.accdb

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

السلام عليكم يمكن إخفاء الأعمدة وإظهارها بأكواد VBA، ولكن مع تعطيل الماكرو من مركز التوثيق في إكسل سيكون من السهل إظهار هذه الأعمدة. ويمكن منع المستخدم من التعديل على الملف من خلال حماية ورقة، ولكن كسر الحماية أمر هيّنٌ وبلا برامج حتى. هذا إن كنت نبحث عن طريقة لحماية الورقة من العابثين.

السلام عليكم لقد قمت ببعض التغييرات فألغيت ارتباط النموذج Sub form Safety Valve وغيرت اسم حقل Certificate No إلى CertificateNo وقمت بحفظ الماكرو خاصتك بصورة منفصلة غير مضمنة. أرجو أن يكون هذا ما تبحث عنه. MOPCO_be2.rar

السلام عليكم

السلام عليكم كما تفضل أستاذ @أحمد الفلاحجى كي يكتمل السؤال فلابد من مثال، كون سؤالك عن حالة خاصة. ولكن بما يتعلق بجزءمن سؤالك، فدالة إكسل sumif/ sumifs لها في أكسس دالة مكافئة هي Dsum، تستطيع من خلالها تحقيق نفس النتيجة، يمكن أن تبحث بجوجل عنها. بقي أن تضع مثالك إن احتجت المساعدة بتطبيق هذه الدالة.

لم أجد أي متغير مكرر.

جزاكم الله كل خير

السلام عليكم متابعة لموضوع الأستاذ @احمد الفلاحجي أضع بين أيديكم هذه الوحدة النمطية لترقيم النموذج في حقل غير منضم، وتعتمد الدالة AbsolutePosition 'Aspen201173@yahoo.com ' نقلاً عن الأستاذ أزهر 2013 Public Function RowNum(frm As Form) As Variant On Error GoTo Err_RowNum With frm.RecordsetClone .Bookmark = frm.Bookmark RowNum = .AbsolutePosition + 1 End With Exit_RowNum: Exit Function Err_RowNum: If Err.Number <> 3021& Then Debug.Print "RowNum() error " & Err.Number & " - " & Err.Description End If RowNum = Null Resume Exit_RowNum End Function ويتم استدعاء الدالة بجعل مصدر الحقل الغير منضم =RowNum([Form]) الشكر للأستاذ الغائب AZHAR الذي نقلت عنه هذا الكود AUTONUM.accdb

السلام عليكم لقد بدلت الأحداث فجعلت البحث عن التكرار في بعد التحديث، بينما أبقيت على أمر نقل الصورة في حدث قبل التحديث. Photog_2.rar

السلام عليكم ضع اسم الحقل بين قوسين منكسرين []

بالتوفيق أخي العزيز.

السلام عليكم أسهل طريقة لعمل ترقيم تلقائي يبقى مستمراً مع حذف السجل هو باستخدام Dcount في حقل محسوب في استعلام أو باستعلام تحديث مدمج بالأحداث في النموذج. > [Dcount("*";"Table";"[ID "&[ID])+1 أعتذر لعدم ترتيب الكود، عندما أتمكن -إن شاء الله-من استخدام الحاسب سأضع مثلاً للطريقتين بالاستعلام و بأوامر VBA

السلام عليكم لقد قمت بالتعديل على مرفق الأستاذ @Barna جزاه الله كل خير. أرجو أن يكون هذا ما تبحث عنه. ListBox Test.accdb

السلام عليكم لعل المشكلة بالأقواس جرب OldImage = Nz(Me.imgWorker.OldValue, FileName(id, (Worker))) PhotoF-2.rar