اذهب الي المحتوي
أوفيسنا

ماجدجلال

04 عضو فضي
  • Posts

    562
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو ماجدجلال

  1. شكرا لك استاذ تامر الف شكر , لني احترت في كيفية اضافة xls للمتغير , الا اتضحت الصورة , بارك الله فيك .
  2. السلام عليكم ورحمة الله , من المعروف اخواني انة الكود ( الماكرو ) يحدث او ينطلق للعمل عند النقر علي زر او نتيجة لحدوث امر ما , فهل يمكن ان اجل الكود يعمل عندما لا تكون القيمة المدخلة ضمن شروط التحقق من صحة البيانات ؟ وللتوضيح السؤال : جعل في الملف مميز التحقق من صحة البيانات للعمود معين وبالفعل تظهر مربع رسالة التحقق من صحة البيانات . و المطلوب ان يتم تشغيل كود معين مباشرا بعد النقر علي زر الغاء الامر في نص رسالة التحقق من صحة البيانات , بمعني اخري , اذا لم تكون القيمة المدخلة صحيحة فان الكود تلقائيا يقوم بادخالها في عمود اخري ,,, ارجو ان يكون السؤال واضح وشكرا لكم ,,,
  3. السلام عليكم ورحمة الله ,,, والله انني لا اعرف كيف اشكركم , ولكن الدعاء افضل علامات الشكر و الامتنان ,,, بارك الله فيك استاذ التقني , وزادك من علمة وفضل و فرج عنك كل هموم الدنيا اللهم امين , وكذلك الاستاذ يوسف الذي كان اكثر الاخوان مساعدتا لي بارك الله فيك وزادك من علمة ورزقة .. وصدقني لو يسمح لي المنتدي كل يوم اضع لك دعاء و للاستاذ التقني , ولكن الدعاء من القلب بظهر الغيب ,,, جزاكما الله كل خير ,,,
  4. نعم استاذ تامر بارك الله فيك واسعد الله ايامك وجزاك الله كل خير ,, سؤال : اذا اسم الملف المراد فتحة متغير فكيف يتم تعديل الكود خصوصا مع وجود الصيغة xls فيكف ذلك ؟
  5. السلام عليكم ورحمة الله وبركاتة ,,, ما هو الكود الذي يقوم بنقل ( الانتقال ) التركيز الي ملف اكسيل اخر مفتوح في نفس الوقت , وللتوضيح السؤال : لنفرض انني اود نسخ ولصق بيانات من ملف الي ملف اخري وليكن اسم الملف الاول هو ( 1) واسم الملف الثاني هو (2) , من الطبيعي ان ننقر بالمواس علي ايقونة الملف الاول ثن عمل نسخ ومن ثما ننقر علي ايقونة الملف الثاني ونعمل لصق , السؤال كيف اجعل الكود ( الماكرو ) ينتقل بي الي الملف الثاني بعد ان يقوم بعمل نسخ لخلية محددة ,,, وشكرا لكم ,,,,
  6. السلام عليكم ورحمة الله ,,, اولا انا اسف في التاخير في الرد بسبب ظروف صحية , ثانيا قمت بتجربة الكود السابق للاستاذ الفاضل ( التقني ) ولعلي لم افلح في وضع الكود بالطريقة الصحيحة , فعند تجربة الكود ظهرت رسالة التنبية للخطاء وعند النقر علي الزر (dedug) تم وضع شريط اصفر حول السطر الثالث من الكود الاول وهو Set RstClone = Me.RecordsetClone حاولت التعديل ولم استطع لذا ارجو منكم المساعدة وشكرا الملف المرفق الذي بة الخطاء , _____________.zip
  7. للفائدة لقد عرفت الحل , معليش انا مازلت اتعلم ومن خلال تفعيل الخاصية شيفت يمكن الغائها , ( معرفت الدواء سبب في وصف الدواء ) ,,,, فتحت الملف المرفق , وبعد الغاء الخاصية ذهبت الي النموذج الرئيسي ومن الي بدء التشغيل ثم قمت بوضع علامات الصح في كل خانات الاختيار الموجودة في بدء التشغل , والحمد للة اغلق الملف وفتحت من جديد فظهر اطار قاعدة البيانات ,, احببت ان اعطي المعلومة ربما يستفيد منها شخص مثلي في اول سلم التعليم ,,,,
  8. السلام عليكم ,,, معليش استاذ التقني , لم ينجح معي الموضوع , ارفع اليك الملف المراد الغاء خاصية الشيفت علية وهو من هذا المنتدي الطيب , ولة للاستاذ العملاق ( ابوهادي ) حفظة الله تعالي , طبعا عند النقر علي ايقونة الملف ويفتح تظهر فقط ( النموذج الرئيسي ) . ولا تظهر بقية كائينات الاكسيس ( الجداول - الاستعلامات - النماذج - التقارير - الصفحات - وحدات الماكرو - الوحدات النمطية ) ,, وتظهر هذة في كل عملية فتح عند النقر المتاوصل علي مفتاح شيفت ,,, 1- عملت ماطلبت معي في الرد السابق , فتح خصائص النموذج ( وطبعا هو النموذج الوحيد ) وجدت الكود امر حدث ( عند التحميل ) وقمت بالغائة , ومن ثما اغلاق الاكسيس واعادة فتح نفس الملف , فلم يحصل شي سوء التاثير علي تلوين السجلات ( لان الملف مطبق علي اساس تلوين سجلات بلون وسجلات بلون اخري ) ,,, 2- ذهبت الي قائمة ( ادوات ) ومنها الي ( بدء التشغيل ) وفعلا وجدت اسم الملف ( form1 ) وحذفت , اغلاقت الاكسيس وفتح نفس الملف , وظهرت خلفية الاكسيس بدون اي شي طبعا النموذج لم يظهر لانة ملغي من خاصية ( بدء التشغيل ) , وحتي كائينات الاكسيس لم تظهر ,, 3- بحثت في وحدات الماكرو ولم اجد ماكرو ( Autoexec ) لانة لم اجد ماكرو واحد في وحدات الماكرو ,,, المطلوب هو كيفية التعديل علي الملف المرفق ليفتح في كل مرة , ويظهر كائينات قاعدة البيانات ( الجدوال الاستعلامات النماذج ,,,,,) وشكرا لكم وجزاكم الله كل خير ,,, _____________________.zip
  9. السلام عليكم ,, اذا كان لدي ملف ولا تستطيع رايت كائن قاعدة بياناتة ( الجداول - النماذج - الاستعلامات - ,,,,, الاكواد ) فانة عند الفتح للمرة الثانية لابد من الضغط المتواصل علي مفتاح ( شيفت ) للاطلاع علي هذة الكائينات , اليسيت هذة الطريقة صحيحة اما توجد طريقة افضل واسرع ارجو المساعدة ,,, السؤال : كيف او ماذا يجب ان اغير في البرنامج لتظهر هذة الكائنات مباشرا عند فتح الملف للمرة الثالية ؟ بمعني : هل استطيع الغاء خاصية الشيفت نهائيا , بحيث لا الجاء في كل مرة اريد فتح البرنامج الي الضغط المتاواصل علي المفتاح شفيت ؟ ارجو المساعدة وشكرا لكم , وكل عام وانتم بخير ,,,
  10. بعد البحث وجدت طريقة غير ان النص يكون فيها من الاسفل الي الاعلي ( علي عكس المطلوب ) ووجدت في احد المنتديات انة افضل شي هو عمل صورة وادراجها ( ونجحت معي و الحمد لله ) الطريقة الاولي هي اذهب الي خصائص المربع ومن تبويب ( غير ذلك ) تجد عمودي لا غيرة الي عمودي نعم عندها يظهر النص من الاسفل الي الاعلي ,,, احببت اعرض الحل للاخوان للفائدة , طبعا توجد طريقة ثاني , غير انها صعبة لي وهي تصميم ( كنفرس ) كما قال الاخوان غير ان المريخ اقرب لي من ان اصمم هذة الاداء ,,, شكرا لكم ,,,,
  11. السلام عليكم ورحمة الله وبركاتة ,, لدي نموذج مستمر واريد كود او اي طريقة فنية اخري استطيع من خلالها ان اجعل ارتفاع هذا النموذج مرن , بحيث يظهر علي اساس عدد السجلات الظاهرة ,,, فمثلا , اذا كان عدد السجلات ( سجلين ) يصبح قصير , واذا كان عدد السجلات مثلا ( ستة ) يصبح اطول ,, يعني في كل عملية فتح للنموذج يتغير ارتفاعة بحسب عدد السجلات المعروضة فية ,,, والف شكرا لكم ,,,
  12. السلام عليكم ورحمة الله وبركاتة ,, هل من الممكن ان ارسم مربع تسمية بشكل يظهر فية النص بشكل عمودي ؟ فمن الطبيعي ظهور التسمية بالشكل الافقي ولكن اريدة ان يظهر بالشكل العمودي فكيف ذلك ؟ وشكرا لكم ,,,
  13. نعم اخي الغالي يوسف هذا هو المطلوب بارك الله فيك ورضي عنك ,,,
  14. السلام عليكم ورحمة الله وبركاتة قبل ان اطرح هذا السؤال بحثت عنة لعل احد سبقني الية ولكن دون جدوي ,,,, السؤال : لدي كود واريد ربط هذا الكود باكثر من زر , فكيف ذلك ؟ حتي لا تتكرر الاكواد وكلها تقوم بنفس الامر ... وشكرا لكم ...
  15. بارك الله فيك استاذ التقني وجزاك الله كل خير
  16. شكرا لك استاذ ابوهادي وبارك الله فيك واحسن دعاء في هذا الشهر الفضيل هو اسئل الله تعالي لك ان يحرم عليك النار وان يدخلك الجنة وان يتقبل منك الدعاء و الصيام والقيام , اللهم امين , وايضا للاخ yousf جزاك الله كل خير و ان يحرم عليك النار وان يدخلك الجنة وان يتقبل منك الدعاء و الصيام والقيام , اللهم امين , وبارك الله فيكم جميعا
  17. السلام عليكم ورحمة الله وبركاتة ,, منذ امس وانا ابحث في المنتدي عن الصيغة الكاملة للدالة inputbox من حيث المدخلات فقد تكون قيمة خالية ( " ") وقد تكون ( 0 ) او يمكن الغاء العملية عند النقر علي الزر cancel .... الكود التالي المطلوب منة مرعاة هذة المدخلات بحيث يكون لكل قيمة رسالة خاصة بة , وفي اربع احتمالات ,,, لكن للاسف الصيغ لم تنجح معي ارجو منكم المساعدة الاحتمالات الاربعة هي : الاحتمال الاول : ان يقوم المستخدم بالنقر علي الزر ok دون ان يدخل قيمة . اي ان قيمة المدخلة هي فراغ ( " " ) . فهنا يجب ان تكون msgbox هي ( يجب عليك ان تضع قيمة حقيقية ) الاحتمال الثاني : ان يقوم المستخدم بوضع 0 اي ان القيمة هي ( صفر ) هنا يجب ات يكون الرد ( ادخل قيمة اكبر من صفر ) . الاحتمال الثالث : ان يقوم المستخدم بالنقر علي الزر cancel . فيجب ان يكون الرد ( لقد تم الغاء العملية بطلب منك ). الاحتمال الرابع : هو ان يقوم المستخدم بادخال قيمة اكبر من صفر . فيتم تنفيذ المطلوب من الكود القيام بة . واليك الكود الذي تعبني و لم ينجح معي في كل هذة الحالات ارجو التعديل علية و المساعدة ,, Private Sub امر1_Click() Dim m As String m = InputBox("ادخل الرقم المطلوب ") If m = 0 Then MsgBox ("يجب عليك ادخال رقم اكبر من صفر") If m = "" Then MsgBox ("يجب عليك ادخال قيمة حقيقية ") If m = Cancel Then MsgBox ("لقد تم الغاء العملية بطلب منك ") If m > 0 Then MsgBox ("مبروك تمت العملية بنجاح ") End Sub وجزاكم الله كل خير
  18. شكرا لك اخي الكريم يوسف وشكرا للاخ Zahof وشكرا لكل الخوان هنا جميعا ,, جزاكم الله عنا كل خير ولكم منا الدعاء في ظهر الغيب
  19. السلام عليكم يا اخوان كل الامور تمت بنجاح , عدا امر واحد فقط وهو تغير لون شريط النموذج من اللون الازرق الي اي لون اخر مناسب للون النموذج . ارجو المساعدة فية لانة اخر شي ان شاء الله تعالي , ولتوضيح السؤال هناك صور في الملف المرفق ,, كل الشكر والدعاء للاخوان هنا في المنتدي فجزاهم الله عنا كل خير في هذا الشهر الكريم المبارك ,, ___________________2_.rar
  20. جزاك الله كل خير اخي , وشكرا علي هذة المعلومات , سوف اجرب وان شاء الله تنجح .
  21. شكرا لك اخي الغالي جزاك الله كل خير ,
×
×
  • اضف...

Important Information