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

محمد احمد لطفى

الخبراء
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    1939

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

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

  • Days Won

    2

 نوع المحتوي 

كل منشورات العضو محمد احمد لطفى

  1. محمد احمد لطفى
    السلام عليكم ورحمة الله و بركاته أعمل على عرض صور الموظفين يوجد فى الاستعلام مكان الصور جاهز ودائما امتداد jpg لكى تعمل الصورة فأنا أريد اضافة اكثر من امتداد حتى يعمل البرنامج مثلا jpg أو jpeg أو يقرأ البرنامج الامتداد تلقاء نفسه و أعتقد أنه سيقوم بتقل للبرنامج أرجو عمل ما يفيد وجزاكم الله خيراً Photo.rar
  2. محمد احمد لطفى
    مدى رقم كبير لن يستطيع برنامجي تجاوزه idx دائما بها ارقام و ممكن تطبيقها على Namex وليس idx هذا ما توصلت اليه فى النهاية حسب تفكيرى
  3. محمد احمد لطفى
    شكرأ أستاذى @AlwaZeeR Dim i As Integer DoCmd.GoToRecord , , acFirst For i = 1 To 1000 If Not IsNull(idx) Then Me.idx = DateAdd("d", i, 1) - 1 DoCmd.GoToRecord , , acNext End If Next DoCmd.Requery توصلت الى حل بدون عمل مربع نص
  4. محمد احمد لطفى
    أساتذتى الكرام لا اريد الكود أن يكون له علاقة مع جدول و استعلام لقد وجدت حل باستخدام هذا الكود Dim i As Integer DoCmd.GoToRecord , , acFirst For i = 1 To 8 Me.idx = DateAdd("d", i, 1) - 1 DoCmd.GoToRecord , , acNext Next DoCmd.Requery و لكن أريده ان يتوقف بانتهاء السجلات بالنموذج و ليس عند تحديده For i = 1 To 8 وجزاكم الله خيراً test550055vv5522.rar
  5. محمد احمد لطفى
    بعتذر منك استاذى انا مش عاوز الموضوع ليه علاقة بالترتيب او ترتيب تلقائى فى نموذجى اعطى ارقام 1 و 2 و 3 و 4 و احتاج الى تبديل الارقام ثم ارتب حسب الاسم او رقم خاص ثم اعمل اعادة ترتيب ويكون الترتيب كما يوجد فى النموذج الخليه الاولى 1 الخلية الثانيى 2 يعنى الترتيب يكون بالاسبقية فى النموذج لا يكون مرتبط بشىء أخر
  6. محمد احمد لطفى
    أستاذى @AlwaZeeR ممكن بعد اذنك الترتيب ميكونش ليه علاقة بخلية NAmex التأثير على Id فقط يعنى اول خلية 1 و الثانة 2 و هكذا
  7. محمد احمد لطفى
    السلام عليكم ورحمة الله و بركاته مطلوب عند الضغط على الزارا (هنا) يبدأ البرنامج بتغير الارقام (اعادة ترقيم) بداية من 1 , 2 , 3 , 4 , 5 و هكذا وجزاكم الله خيرا test550055.mdb
  8. محمد احمد لطفى
    هنا
  9. محمد احمد لطفى
    ممكن اضافة صورة من انظر الى اسمك بالاعلى و اضغط عليه وتوجه الى الملف الشخصى
  10. محمد احمد لطفى
    أستاذى @عبد اللطيف سلوم أرجو تصليح الخطأ وجزاك الله خيراً اوفسنا تلقائي (1).rar
  11. محمد احمد لطفى
    تم عمل جدول به خانة اختيار وجعلها مصدر بيانات فى النموذج و ممكن استاذى ابا جودى يكون له فكرة افضل والله اعلم
  12. محمد احمد لطفى
    بعد اذن أستاذ ابا جودى اذا كنت تريد فتح النموذج مرة واحدة فقط استخدم حذف امر.accdb
  13. محمد احمد لطفى
    تفضل حذف امر.accdb
  14. محمد احمد لطفى
    الف مبروك استاذ @kaser906
  15. محمد احمد لطفى
    يأستاذ @مسفر لم يأتى فى دماغى شيىء عند وضع السؤال الا اغلاق مساعد اكسس و ما يشابهه ولم أدرك انها بهذه البساطة
  16. محمد احمد لطفى
    جزاك الله خيرا أستاذى @ابا جودى If KeyCode = vbKeyF1 Then استخدم اسم المفتاح و أشكر استاذى @kanory و أستاذى @مسفر
  17. محمد احمد لطفى
    أستاذى @kanory مثلا معاينة الطباعة ( ولكن ليس عن طريق المكرو ) عن طريق الكود فى المكرو أريد حذف الرسالة التى تأتى بعد الضغط على الثلاث زراير F1 F7 F12
  18. محمد احمد لطفى
    أستاذ @مسفر أنا مش عاوز أققفل F1 لأن فى أمر هينفذه أنا عاوز ققفل مساعد اكسيس و انا عارف الكود ده طريقة أستاذ @kanory الاخيرة شغالة كويس بالمكرو بس المطلوب حذف الرسائل لانى عند حذفها عندى زرار و احد بس الى بيشتغل
  19. محمد احمد لطفى
    للرفع
  20. محمد احمد لطفى
    أستاذى @kanory لا شيىء يدعو للزعل أنتم أساتذتى و منكم أتعلم و تعلمت الكثير مازال هناك شيىء عند حذف الرسالة الخاصة بكل زرار يعمل أخر زرار فقط ( لا اريد الرسالة التى تظهر ) لم اتعامل مع المكرو من قبل سوف أقوم بتشغيل المكرو عن طريق الكود لأن عند التحميل يوجد اكواد بالفعل جزاكم الله خيرا
  21. محمد احمد لطفى
    يعنى مثلا أنا ضفت f12 و f7 ولا يعمل الا زرار واحد فقط
  22. محمد احمد لطفى
    جزاك الله خيرا أستاذى واذا كان هناك كود افضل
  23. محمد احمد لطفى
    أستاذى @kanory هل يمكن عملها بكود وليس ماكرو
  24. محمد احمد لطفى
    جرب لعل و عسى If CurrentProject.AllForms("YourFormName").IsLoaded = True Then do something Else: do something else End If
  25. محمد احمد لطفى
    مثلا عند الضغط على F7 تأتى شاشة تدقيق املائى F12 تأتى شاشة حفظ باسم أستاذ @مسفر أنا مش عاوز اعطله عاوز اعطل مسعد اكسس و F7 تأتى شاشة تدقيق املائى F12 تأتى شاشة حفظ باسم
×
×
  • اضف...

Important Information

  I accept