Hamdi Edlbi-khalf

ربما المشكلة فقط بعدم تمكين الماكرو من قبل الآخرين ... و في بعض الأحيان يكون الكود مصمماً على جهاز الأوفيس 32 بت بينما يتم التشغيل على جهاز 64 بت عندها أضف عبارة PtrSafe على الكود في سطر إعلان الحدث و استبعد هذا و أرجح الأول .

السلام عليكم بعد إذن الأخوة هنا طلبك ... إن شاء الله تعطيل كنترول.xlsm تعطيل معظم الاختصارات.xlsm

السلام عليكم .. في المرفقات ملفي إكسل يتضمنان أمري فيجوال بيزك لتعطيل الاختصارات و تفعليها . مصدر الأوامر موقعStack overflow ملاحظة يجب حفظ ملف الإكسل بعد وضع الكود فيه بامتداد Macro-Enabled Worksheet (.xlsm) رجائي ممن يستفيد من هذه الملفات دعوة صالحة و أمنية طيبة بالغيب ... شكراً لكم و لكم الفضل في ذلك . تعطيل كنترول.xlsm تعطيل معظم الاختصارات.xlsm

أعتقد أنك ترغب بتعطيل الاختصارات التي تستخدم Ctrl و حتى لو عطلت هذا المفتاح فإن الاختصار سيعمل ، عليك - في سبيل ذلك- عمل ماكرو لتعطيل الاختصار واحداً واحداً . مثال : "" , "Application.onkey "^s * لا أستطيع لصق الكود بالصورة المناسبة لأن الخيار الخاص بذلك لا يظهر حيث أستخدم الجوال .

شكراً جزيلاً و بارك الله بك

أعتذر مجدداً أستاذ @Shivan Rekany يبدو أنني لم أتمكن من إيضاح سؤالي. لقد طبقت الكود الذي قدمته حضرتك ، كما في السؤال : و ذلك لتحديد طول النص الذي يجب أن أتقيد به و لكنه لم يعمل . كيف استطيع دمج الدالة Len() مع الخاصية Validationrule لتحديد طول النص الذي أرغب بإدخاله لقد جربت الكود الذي قدمته حضرتك و لكنه يعمل على تحديد النص بذاته لا طول النص أعتذر مجدداً لعدم إيضاحي

جزاك الله كل خير .. و لكن كيف أستطيع تطبيق ذلك إذا كانت قاعدة التحقق هي لتحديد طول النص لقد استخدمت الدالة في سبيل ذلك () Len فيما يماثل الكود الذي تكرمت به ، و لكن لم يعط الأمر النتيجة المطلوبة بينما لو استخدمت رقماً فإنه ينجح . كيف يمكن تطبيق الأمر لينجح بتحديد طول النص الذي يجب أن أدخله؟ شكراً لك أستاذي .

السلام عليكم كيف يمكن التحكم بخاصية Validationrule لمربع نص ؟ لدي نموذج لإدخال أرقام هواتف و هي على نوعين : تحويلات داخلية و أرقام خارجية عند اختيار تحويلات يجب أن يكون عدد الأرقام في حقل الرقم ٤ بينما يجب أن يكون في حالة الرقم الخارجي ٤أو ٧ أو ٨ حاولت استخدام المعادلة iif في قاعدة التحقق و لكنها لم تنجح . ففكرت باستخدام VBA و لكن لم أتمكن من عمل المطلوب و الكود الذي استخدمته : If me.combo.value = "تحويلة" then Me.field.validationrule =" Len ([field])=4" Elseif me.combo.value = "رقم" then Me.field.validationrule=" Len ([field])=4 or len([field]) = 7" End if . شكراً لكم و بارك الله بكم . * لم أتمكن من لصق الكود بالطريقة المناسبة لأن الأيقونة الخاصة به لم تظهر لي .

مرحباً أخي العزيز لقد حاولت تجريب شتى الاحتمالات الممكنة و وجدت لدي وحدة نمطية تخفي النموذج دون أن يكون مشروطاً أما في خال استخدام الوحدات النمطية الموجودة في السؤال فيجب أن يكون النموذج مشروطاً و ذلك قد لا يلاؤم بعض التطبيقات . طالما أنه عمل لديك فقد لبى طلبك و الحمد لله .

السلام عليكم أخي @Barna كم نموذجاً لديك في قاعدة البيانات ؟ لدى التجربة تبين أن الكود الذي أستعمله و هو مماثل لطريقة الأستاذ @محمد ابوعبد الله يخفي كامل القاعدة عند وجود أكثر من نموذج فيها

موضوع هام كنت أبحث عنه ، و في مشاركات أخرى للأعضاء الكرام كان السبب في البطء وجود أحداث في الحالي .

و أنا آسف كثيراً لأنك لم تطل الشرح النافع و الماتع ... و إن كان الموضوع محاسبياً إلا أنه على صلة كبيرة بمجال البرمجة و الاستفاضة محمودة و مطلوبة شكراً لك .

السلام عليكم لإضافة التوثيق و المراجع تتبع الخطوات في الرابط التالي : https://support.office.com/ar-sa/article/ادراج-الحواشي-السفليه-و-التعليقات-الختاميه-61f3fb1a-4717-414c-9a8f-015a5f3ff4cb

السلام عليكم أضف للصورة Hyperlink من تبويبplace in this Document ثم Screen tip اكتب النص الذي ترغب به في TEXT

السلام عليكم من تبويب Create Query Wizard Simple Query Wiazed بعد أن ينتهي بناء الاستعلام أنشئ حقلاً محسوباً ضع فيه المعادلة التي ترغب بها . و لكي تنشئ حقلاً محسوباً في الاستعلام بعد أن ينتهي المعالج من عمل الاستعلام سيظهر بصورة جدول في الشريط السفلي ستجد عدة إيقونات إحداها على شكل مثلث اضغط عليها و في أحد الأعمدة الفارعة اكتب معادلتك ثم اجعل الاستعلام مصدر النموذج و مصدر الحقل المحسوب في النموذج هو الحقل المحسوب الجديد في الاستعلام

السلام عليكم أعتذر عن التأخر حتى تمكنت من استخدام حاسب متصل بالإنترنت . هذا المرفق دون أية إضافات و قد عرفت سبب عدم ثبات المؤشر في الكود السابق الكود سليم يعمل بصورة صحيحة و لكن يجب أن تكون جميع السجلات المرتبطة معروضة في النموذج أما بحالة نموذج استرجاع البيانات فبعضها سيبقى خفياً و خلال البحث كان أحد الاقتراحات أن استخدم Recordsetclone و Bookmark إلا أنها لم تعمل أيضاً SearchInSubandMain3.accdb

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

السلام عليكم استاذ @jjafferr شكراً لك و بارك الله بك ،كنت أحسب أنه من الممكن بطريقة ما جعل مربع اكسس الافتراضي الخاص بالبحث يقوم بالمطلوب و قد تبين أن الأمر غير ممكن.. تماماً هو طلبي . و لكن هل يمكن أن يكون التركيز بعد عملية البحث على أي حقل في النموذج الفرعي أو الرئيسي ؟ و خاصة أن الكود الذي وجدته يشير إلى حقل من السجل في النموذج الفرعي فقط مع مشكلة انتقال التركيز إلى سجل آخر .

لقد وجدت أن Ctr + F تبحث على أساس الجداول مما يمنع بحثها في جدولين معاً فلو كان المؤشر على حقل ضمن النموذج الرئيسي فلم يبحث عن التتائح ضمن النموذج الفرعي و لوكان ضمن النموذج الفرعي فسيبحث فيه فقط و ضمن السجل الحالي من النموذج الرئيسي .

السلام عليكم عليك بإزالة الحقل المحسوب فالحقل المحسوب أحد الميزات الخاصة بـ ٢٠١٠ و ما بعد التي ستمنع القاعدة من أن تفتح بإصدارات سابقة أو تحول إلى تلك الإصدارات . قم بعمل استعلام و اجعله مصدر البيانات و أنشئ فيه حقلاً محسوباً مماثلاً لما هو في الجدول .

شكراً أستاذ @فارس بني هلال ليس هذا طلبي ، مع أنه نموذج بحث أنيق و جيد . عذبتك معي ، بارك الله بك و جزاك كل خير .

السلام عليكم أولاً أعتذر لتأخري عن الرد و لكن تأخرت حتى أتيح لي استخدام الحاسوب . لقد قمت بعمل هذا الاستعلام في بداية تصميمي للبرنامج ، و لكن حاولت إيجاد طريقة تمكنني من البحث بمثل طريقة مربع البحث الافتراضي في برنامج أكسس حيث استطيع البحث بكافة حقول النموذج الفرعي و الرئيسي و كأنهما حقول في نموذج واحد ، كون البحث في النموذج الفرعي يقتصر في نتائجه على السجلات المرتبطة بالسجل الحالي في النموذج الرئيسي و لا ينتقل عير السجلات في النموذج الرئيسي .( أخشى ألا أكون و اضحاً في هذه النقطة ) أي عند استخدام المفتاح Ctr+ F و اختيار البحث في الحقل الحالي و تاشير حقل في النموذج الفرعي فإنه سيبحث فقط بالسجلات الظاهرة في السجل الرئيسي فقط و لن ينتقل عبر السجلات في النموذج الرئيسي . أما عن عبارة النموذج الرئيسي والفرعي في نفس الوقت! فقد صادفتني أثناء البحث عبر جوجل Search in Mainform and subform و كان الموضوع مماثلاً لما أبحث عنه إلا أن الحل لم يرقني . و الآن أضع بين يديك الكريميتين نموذجاً لما قمت به كبديل عما كنت أصبو إليه و هو من حيث المبدأ ما كنت به بدأت و هو مماثل لاقتراحكم باستخدام استعلام . و لكن واجهتني فيه مشكلة و هي عند الانتقال إلى السجل المطلوب بالنموذج الفرعي بعد البحث فإن المؤشر لا يلبث و أن ينتقل بعد أن يرتكز على السجل الصحيح في النموذج الفرعي إلى آخر . بالتفصيل : نموذج البحث Form1 فيه نموذج فرعي SubTableSearch بنموذج البحث الفرعي زر GO TO عند الضغظ عليه ينتقل إلى السجل في النموذج الرئيسي الذي أبخث ضمنه MainTable و يؤشر على السجل في النموذج الفرعي SubTable الذي له رقم ID مماثل لما في نموذج البحث الفرعي SubTableSearch إلا أنه من المفترض أن يستمر بحالة SetFocus و لكنه ينتقل إلى السجل الأعلى في النموذج الفرعي . الكود الخاص بالانتقال هو : DoCmd.OpenForm "MainTable", acNormal, , "[Employer] = '" & Forms![form1]![SubTableSearch].Form("[Employer]") & "'", acFormEdit 'الكود من الأستاذ ALWAZEER 'يسمح بفتح النموذج على السجل المطلوب [Forms]![MainTable]![DateEmploying] = [Forms]![form1]![SubTableSearch]![DateEmploying] 'الغرض من هذه الأمر استدعاء البيانات المناسبة عبر التاريخ أي البيانات القديمة المخزنة إذا كان هدف البحث ضمنها [Forms]![MainTable]![Txt01] = [Forms]![form1]![SubTableSearch]![ID] 'نسخ قيمة معرف النموذج الفرعي الخاص بالبحث إلى حقل غير منضم لجأت إلى ذلك كوني غير واثق من إمكانية تطبيق الكود التالي 'بالنسخ مباشرة من نموذج البحث الفرعي [Forms]![MainTable]!SubTable.Form.Recordset.FindFirst "id =" & [Forms]![MainTable]![Txt01] 'يؤشر على السجل المطلوب [Forms]![MainTable]!SubTable.Form.ID.SetFocus تعديل : لقد أستبدلت السطر الآخير من الكود بهذا و أصبح يقوم بالتأشير على الحقل المطلوب و لكنه لا زال لا يستقر على السجل [Forms]![MainTable]!SubTable.SetFocus [Forms]![MainTable]!SubTable.Form.ID.SetFocus و لك جزيل الشكر SearchInSubandMain2.accdb

النتيجة: لا يمكن البحث بما يشبه ctr +f في النموذجين الفرعي و الرئيسي . و لكن يمكن ذلك بما يماثل البحث عن الكل في الإكسل و عند النقر على النتيجة ننتقل إلى السجل الرئيسي المطلوب

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

كل ما توصلت إليه حتى الآن يحتاج إلى نموذج بحث مساعد