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

كيف تشغيل زرار من زرار أخر فى نفس النموذج مثلا button1 and button2 كيف اشغل button2 من button1 test300.rar

جزاك الله خيرا حاليا كيف اشغل زرار من زرار أخر فى نفس النموذج مثلا button1 and button2 كيف اشغل button2 من button1 test300.rar

نفس المشكلة ولكن عند عمل زرار به الكود الثانى فقط يعمل من اول مرة هل هناك كود يفصل بين الامرين

اسف مش هاعرف ارفق الملف لانه كبير بس تقريبا لازم افصل الاكواد عن بعضها Private Sub ÃãÑ24_Click() On Error GoTo g: If MsgBox(" åá ÇäÊ ãÊÃßÏ ¿", _ vbCritical + vbYesNo, _ "ÊäÈíå") = vbNo Then Exit Sub Else Dim i As Integer Dim x As Date DoCmd.GoToRecord , , acNewRec x = Forms![DataMasterForm]![test1]![Date_M] For i = 0 To Forms![DataMasterForm]![test1]![no] - 1 Me.date1 = Forms![DataMasterForm]![test1]![Date_M] Me.serial = Forms![DataMasterForm]![test1]![serial] Me.date1 = x Me.no = DateAdd("d", i, Forms![DataMasterForm]![test1]![no1]) DoCmd.GoToRecord , , acNext x = DateAdd("d", Forms![DataMasterForm]![test1]![no2], x) Next DoCmd.Requery End If DoCmd.GoToRecord , , acLast Forms![DataMasterForm]![ends1] = Me.date1 g: Exit Sub End Sub اخر سطرين عاوز افصلهم عن الى فوق DoCmd.GoToRecord , , acLast Forms![DataMasterForm]![ends1] = Me.date1

عدى زرار نقل بيان من النموذج الفرعى الى نموذج رئيس و لكن عند الضغط اول مرة لا ينفذ عند الضغط مرة ثانية يتم التنفيذ هل من حل DoCmd.GoToRecord , , acLast Forms![DataMasterForm]![ends1] = Me.date1 حيث Me.date1 تكون خليه فى النموذج الفرعى

شكرا ياشباب عمل معى هكذا If Forms![main]!![Kind] = "man" then Forms![main]!![work] = "مصر " Then end if end if

السلام عليكم ورحمى الله وبركاته هل هناك خطأ فى هذا الكود لا يعمل If Forms![main]![sub]![Kind] = "man" then if Forms![main]![sub]![work] = "مصر " Then End If End If هذا يعمل تمام ولكن عند اضافة النصف الاخر لا يعمل If Forms![main]!![Kind] = "man"

جزاك الله خيراً و لكن معظم النتائج أتت بالسالب لقد وجدت مثالا للأستاذة زهرة عمل جيداً za-db1.rar

اعتذر لحضرتك كيف يمكن اذا كان السجل الاول 500 و السجل الثانى 1000 أن يكزن النتيجة تظهر بالسالب -500 و ليس بالموجب وجزاك الله خيرا

لا أجدها بتاتا

هل من مساعدة

جزاك الله خيراً

هل من مساعدة

فى هذا المثال المرفق ايجاد الفرق بين مبلغين اسفل بعضهما و لكن اريد ايضا معرفة عدد الايام test135.rar

هل من مساعدة

السلام عليكم ورحمة الله وبركاته لقد أخفيت نوافذ اكسيس و لكن اريد ظهور ايقونة له فى شريط الادوات tollbars جزاكم الله خيرا test200.rar

جزاك الله خيرا هل يمكن استحدام دالة datediff لا ايجاد فرق الايام بين التاريخين

المشكلة تحدث مع كل النماذج

5000-6000=-1000 فى السجل الرابع خانة النتيحة

لا أنه جهاز واحد

البرنامج شغال كويس بس المشكلة بتحصل لما اشغل شاشتين و البرنامج شغال يعنى شغال على شاشة واحده اشغل التانية و الاولى شغالة تحصل المشكلة

جزاك الله خيرا و لكن كانت مشكلتى اننى اريد ارقام كثيرة حتى لا احتاج الى زياداتها بعد ذلك ولقد ساعدتى بها استاذنل ابا حودى

جزاك الله كل خير

السلام عليكم ورحمة الله و بركاته عندما اقوم بتشغيل الشاشة الثانية و نموذج أكسيس مفتوح تحدث مشكلة و تاتى هذه الرسالة ألا يوجد لها حل

السلام عليكم ورحمة الله وبركاته اريد ايجاد فرق المبلغ بين شهرين ( سجلين اسفل بعضهما) فى خلية النتيجة test130.rar