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

ناقل

الخبراء
  • Posts

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

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

  • Days Won

    5

كل منشورات العضو ناقل

  1. اشكرك استاذي الفاضل ولن ظهرت لي هذه الرسالة .....
  2. اخي الكريم جمع ام عدد (يعني كم عدد تكرار) هناك فرق بين الجمع وعدد التكرار لانه التبس علي .... بارك الله فيك
  3. وهذه مشاركة مع استاذنا الفاضل عبداللطيف .... Copy_.accdb
  4. نعم اكتب الرسالة في الحدث .... وعند فتح النموذج تفتح الرسالة اولا ثم عند الاغلاق يفتح النموذج
  5. ضع نص الرسالة في حدث عند فتح النموذج
  6. وهذه طريقة اخرى حسب حقول الجدول المعطى رقم ونص وتاريخ ..... تفضل ناقل.rar
  7. ممكن مرفق بسيط لفهم المطلوب
  8. جرب كدة ....... DoCmd.OpenForm "Form1", , , "TDes LIKE ""*" & Nz(Me.SB_Num.Value, "0") & "*"" or " _ & "TName LIKE ""*" & Nz(Me.SB_Name.Value, "0") & "*"" or " _ & "TName LIKE ""*" & Nz(Me.SB_Name.Value, "") & "*"" and TDes LIKE ""*" & Nz(Me.SB_Num.Value, "") & "*"""
  9. هذا الموضوع يفيدك كثير ...
  10. ما في فرق ولكن هذه اوامر وتلك اوامر فقط مثل استخدام الامر عن طريق الكود أو الماكروا .... وكل الدروب تؤدي الى عكا
  11. تفضل ...... DoCmd.ApplyFilter , "[RQ_CreateDate]=#" & Format(Me.TBDate, "mm/dd/yyyy") & "#"
  12. جرب هذا .... Me.RecordSource = "SELECT TRQ.RQ_ID, TRQ.RQ_CreateDate FROM TRQ WHERE (((TRQ.RQ_CreateDate)=[forms]![Form 1]![TBDate]));"
  13. Option Compare Database Dim MyTime As Date Private Sub Form_AfterUpdate() MyTime = Now() End Sub Private Sub Form_Current() MyTime = Now() End Sub Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) MyTime = Now() End Sub Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) MyTime = Now() End Sub Private Sub Form_Open(Cancel As Integer) MyTime = Now() End Sub Private Sub Form_Timer() If MyTime = Empty Then MyTime = Now() If Now() >= DateAdd("n", 1, MyTime) Then DoCmd.Close DoCmd.OpenForm "LogIn" End If End Sub
  14. ممكن مثالك ليتم وضع الاكواد فيها ....
  15. تفضل .... Forms("Form1").Filter = "T1Date = forms![Form1]![TBDate]" Forms("Form1").FilterOn = True Me.Requery
  16. ممكن ترفق لنا هذا التقرير كعينة للعمل عليه ؟؟؟؟
  17. هههه ..... اخي الكريم امزح معك ..... كفكرة مبدأية : يمكن نقل البيانات من التقرير الى جدول ثم نعرض حقول الجدول للاختيار منها .... جرب ....
  18. يعني ما تبغاني اجاوب .... عندي حل ليس قفلتها في وجهي ... 😂 ... طيب جزاك الله خيرا
  19. يمكن تصدير التقرير ولكن لا تستطيع اختيار حقول معينة منه .... ولكن بمكن عمل نفس الفكرة من خلال الاستعلام المبني منه التقرير بنفس الفكرة الموجودة في مثالك ...
  20. غير منضم ..... اذن من اين تاتي بالبيانات .... ام المستخدم هو من يقوم بتعبئة البيانات فيها ؟؟؟؟
×
×
  • اضف...

Important Information