اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

ابو ياسين المشولي

الخبراء
  • Posts

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

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

  • Days Won

    24

كل منشورات العضو ابو ياسين المشولي

  1. جميل جدا اخي Elsayed Bn Gemy ولكن لدي ملاحظه هلا بالامكان تعديل الكود حيث نعهله ياخذ من المجلد ماهو صور فقط اي بصيغه جميع الصور فقط وليس جميع محتويات المجلد وكذلك هل ممكن هل توجد طريقه لنقل الى مجلد اخر مع الترقيم حسب ترقيم الصور
  2. جرب هذا في حدث قبل التحديث If Me.txt1 < 0 Then MsgBox "عفوا غير مسموح بالسالب" Undo Exit Sub End If اسم الحقل هو Me.txt1
  3. اظن انك لم تحمل الملف او انك لم تفكر انك تطلع عليه تم اضافة جدول باسم يوزر وياخذ كلمه السر منه اللي هي 12345 وتغيرها بالجدول ممكن تعمل له حقل باي نموذج كما تحب
  4. اخي العزيز هذا قسم الاكسس اعرض موضوعك في قسم الاكسل
  5. اخي حسين العربى الكود واضح TB هو اسم الجدول ونوع الفاتورة هو الحقل اللي فيه كلمه شراء
  6. الكود شغال ميه في الميه المشلكه من عندك تاكد من المسميات
  7. راجع مصدر بينات حقول التقرير شوف الصورة
  8. للاسف ما استخدم الماكرو كثير
  9. انسخ الكود كما هو مع تغير المسميات كما هي عندك
  10. DoCmd.Requery يعني تحديث ركوري مثل الرفرش
  11. بعد اذن اخي عبد اللطيف جرب هذا شوف المرفق 11حسابات الصندوق.accdb
  12. اتفضل هذا طلبك استعلام_جدولي-الاعمدة_صفوف.accdb
  13. ان شاء الله يكون المطلوب استعلام_جدولي-الاعمدة_صفوف.accdb
  14. بالتوفيق اخي وبارك الله فيك
  15. نفترض الرقم طلع في تكست2 عند ضغط تثبيت يصير الرقم ثابت في تكست1 Prog125.rar
  16. اخي حربي العنزي جرب انت عمل حقل غير منظم وبعدها اعمل هذا الكود ان شاء الله يفي بالغرض Me.مكان الرقم.SetFocus DoCmd.RunCommand acCmdCopy Me.مكان التثبيت.SetFocus DoCmd.RunCommand acCmdPaste
  17. اتفضل Dim aboyaseen As String Dim varFilter As Variant varFilter = Null If Not IsNull(Me.stname) Then aboyaseen = (varFilter) & "[stname]= [Forms]![انذار طالب]![stname] " DoCmd.OpenReport "كشف", acPreview, , aboyaseen End If مخالفات الطلاب.rar
  18. هل الرقم المفترض لا يزيد عن 4 ارقام اذا كان كذلك فالامر سهل
  19. هل هذا ماتقصده مخالفات الطلاب.rar
×
×
  • اضف...

Important Information