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

Eng.Qassim

الخبراء
  • Posts

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

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

  • Days Won

    22

كل منشورات العضو Eng.Qassim

  1. ماهي نسخة الاوفيس لديك؟
  2. على راسي..بس الجدول كبير جدا ولا اعرف حيثياته او كيف ممكن ربط الجداول لكن سؤالي عن مخرجات التقرير مثلا ؟ تحتاج الى ورقة عرضها متر سارى مايممكنني عمله ان سمح وقتي ..لكن يفضل ان تطرح تساؤلاتك في المنتدى وعلى الرحب والسعة
  3. وعليكم السلام اخي ابو هالة سؤال بريء..انت شو جابك على هيك جدول وانت من الجزائر؟☺️ على كل حال ..يوجد نقص في قوس الغلق IIf([mon]>0 And [days]>0;("الضريبة" & "=" & [text _bb] & "-" & [tax_old] & "=" & [text _bb]-[tax_old]);0) ثانيا انت محمل الجدول اكثر من طاقته في حقل محسوب وهذا مما لايفضله المبرمج..الجدول لديك فيه مشكلة ولايقبل اضافة اي حقل (لا اعلم لماذا) اقتراحي ان تعمل استعلام للحقول المحسوبة وتضيف لها الكود اعلاه انظر للمرفق بعد عمل ضغط واصلاح له لان كان حجمه كبير جدا Database4.rar
  4. والله مايفتح عندي .. عندي اوفيس 2013 وندوز 7 -64
  5. اعتقد ان اجابة استاذ جعفر هذه Private Sub Item_LostFocus() Me.Barcodenumber.SetFocus End Sub لكن مالذي تقصده بهذه العبارة ؟
  6. بصراحة انا بفرح لما اشوف مشاركاتك استاذ محمد .. لانها تفتق الاذهان كما يقول استاذنا جعفر
  7. استاذ محمد ..هو انت عاوز تدخل بيانات من النموذج للاستعلام حتى يحسبلك الضريبة ؟!! بصراحة انا مامرت هيك معلومة معاي الذي افهمه ان الاستعلام جهة وسيطة وظيفته تصفية البيانات من الجدول وليس ادخال البيانات
  8. استخدم هذا الكود DoCmd.OpenReport "MyReport", acViewPreview, , "ID =" & "'" & Me.ID & "'", acDialog
  9. عن اذن اخي استاذ موسى ممكن تضعها في استعلام او في مربع نص داخل نموذج لكن انتبه الى الفارزة فيمكن تحتاج الى تحويلها الى فارزة منقوطة
  10. فعلا استاذ موسى ..انا فهمتها انه لو كانت سنة التعيين 2000 يعني النتيجة 2003 وبهذا تتحول -3 الى +3
  11. جزاك الله خيرا اخي العزيز @أبو عبدالله الحلوانى
  12. عذرا ..انظر للمرفق الان سيكون رصيد اول المدة في كل سجل جديد = الارصدة الداخلة +رصيد اول المدة - الارصدة الخارجة حاول ان توضح اكثر اذا لم يكن المطلوب رصيد - Copy.accdb
  13. وعليكم السلام عسى ان يكون ماتريده رصيد.accdb
  14. الان يعمل حسب الشرط الذي تختاره اوقفت التنسيقات لشيت اكسل لانها توقف البرنامج عندي ..يمكنك اعادتها T2Q - Copy.accdb
  15. الشكر لله اولا ولكم ثانيا استاذنا القدير
  16. طبعا اخي لايعمل ..قم بتغيير الجملة [Formscustomer_account_$]![Date_To] الى [Forms]![customer_account_$]![Date_To]
  17. حقل تم /لم يتم غير موجود في الفلترة ..قم بتغيير اسم الكومبو في النموذج الرئيس الى pay1 ثم اضف الكود التالي في نهاية اكواد الفلترة If Not IsNull(Me.Pay1) Then varFilter = (varFilter + " AND ") & "[pay] Like '" & Me.Pay1 & "'" End If وسيعمل عندك التصدير
  18. اليس هذ هو ناتج التصفية ؟ الكود القديم شغال معاك بالتصفية التي تريدها
  19. انا اللي بشكر حضرتك لانك جعلتني احصل على الدعاء بالتوفيق يارب
  20. اضغط shift+open
  21. وعليكم السلام اجعل التنسيق الشرطي هكذا InStr([notes2];"اعتذار") او يمكن عمل موديول يتم استدعاءه عند فتح النموذج مثلا ...لان طريقة التنسيق مطولة Public Sub colCtrlReq(frm As Form) Dim setColour As String setColour = RGB(175, 175, 175) Dim ctl As Control For Each ctl In frm If ctl.ControlType = acTextBox _ Or ctl.ControlType = acListBox Then If InStr(ctl, "اعتذار") <> 0 Then ctl.BackColor = setColour End If End If Next ctl Set ctl = Nothing End Sub ويتم استدعاءه بهذه الطريقة Call colCtrlReq(Me)
  22. يا سلام عليكم .. الله هداكم بدي اتكلم بلهجة اهلي واخوتي اهل الكويت الحيبة شجاكم ... طويلين العمر ... الله هداكم يا عمي الريال فيكم يثبت في العلم والخبرة ... الله هداكم وين الاجاويد من اهل عمان ؟ ههههه اهل البخور
  23. لم افهم عليك اخي @محمد احمد لطفى حينما تكتب 1 بالنص الاول والنص الثاني صفر فالناتج = 10 وهو يقوم بما اسميه توحيد الخلايا وليس تجميع اما اذا اردت الجمع بين الخليتين فالناتج حسب الكود Dim a, b As Single a = Me.aa.Value b = Me.bb.Value Me.ee.Value = a + b مالذي تريده بالضبط ؟
  24. البرمجة منطق رياضي صارم جدا ... لا يقبل النقص في المعلومات لو لديك جدول فيه التاريخ مع الوقت ... الاستعلام يظهر لك التاريخ مع الوقت اما اذا اردت التاريخ فقط .. فالاستعلام يخبرك بانه يجب ان تنسقني على التاريخ فقط ... وهنا نستخدم جملة Format التي نحصر فيها التاريخ فقط دون الوقت ...او الوقت دون التاريخ ...او السنة سبحان الله العالم بكل شيء
×
×
  • اضف...

Important Information