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

السلام عليكم ورحمة الله عند البحث ( ا ) لا تظهر الكلمات التى بها إ و أ عنند البحث ي لا تظهر الكلامات التى بها ى اريد البحث يظهر جميع النتائج وجزاكم الله خيرا test80.rar

بسم الله الرحمن الرحيم عند الضغط على زرار حذف يجذف السجل و السجلات التالية وجزاكم الله خيرا test70.rar

الله ينور عليك جزاك الله خيرا

هل من مساعدة

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

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

اذا اجلت مرة On Error Resume Next واذا كنسلت مرة اخرى يكرر نفس الامر الاول أما هذا الكود فهو افضل On Error GoTo g: g: Exit Sub هل ينفع عمل رسالة التاجيل نموذج بدلا من

Up

صحيح تغيير هذا الى فورم عند الضغط على كنسل يظهر خطأ

ضع لكل سجل صورة و استخدم كومبو بوكس نموذج main0 اريده ان يعمل من form0 عندما نفتح نموذج main0 نضغط على الكمبوبوكس ضغطين سوف يظهر نموذج form0 نضغط على الاسم المراد نقله الى كمبوبوكس نموذج main0 لن تظهر صور سوف تظهر صورة واحدة فقط

عامل مشاكل مع الصور

هل يمكن عمل هذا المربع الحوارى عن طريق form أم لا

تفضل يا استاذى test50.rar

هل من مساعدة

جزاك الله خيرا لدى كود أخر فى قى الحال Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[Titles] = '" & Me![ãÑÈÚ_ÊÍÑíÑ_æÓÑÏ53] & "'" If Not rs.EOF Then Me.Bookmark = rs.Bookmark On Error GoTo HandleErr If Not IsNull([MainData.PicFile]) Then [imgPicture].Picture = [MainData.PicFile] SysCmd acSysCmdSetStatus, "Image: '" & [MainData.PicFile] & "'." Else [imgPicture].Picture = "" SysCmd acSysCmdClearStatus End If Exit Sub HandleErr: If Err = 2220 Then [imgPicture].Picture = "" SysCmd acSysCmdSetStatus, "Can't open image: '" & [MainData.PicFile] & "'" Else MsgBox Err.Description, vbExclamation End If End Sub ولا يعملان معا

كومبو بوكس نموذج main0 اريده ان يعمل من form0 عندما نفتح نموذج main0 نضغط على الكمبوبوكس ضغطين سوف يظهر نموذج form0 نضغط على الاسم المراد نقله الى كمبوبوكس نموذج main0 سوف ينقل الاسم ولكن البحث لن يجرى اريد عند نقل الاسم ان يظهر بيانات الاسم فى نموذج main0

عند الضغط على البحث ضغطتين يظهر نموذج بحث و عند الضغط على الاسم المراد البحث عنه يظهر فى النمموذج الاخر و يبحث اريد عند ادخل الاسم من النموذج البحث يعمل البحث فى البحث الاول test40.rar

بسم الله الرحمن الرحيم عند الضغط على زرار تأجيل يفتح رسالة كم يوم سيؤجل مثلا نضع 30 يأجل التاريخ فى السجل و السجلات التالية وجزاكم الله خيرا test30.rar

هذا ما اريده يا أخوانى أعتذر ان لم اقدر ان اوصل لكم ما اريده تم تغيير فى اول الكود DoCmd.GoToRecord , , acNext الى DoCmd.GoToRecord , , acNewRec تم الحل و جزاكم الله خيرا test42.rar

بسم الله الرحمن الرحيم الخلية من هى بداية تسلسل السجلات الخلية عدد هى عدد السجلات التى يجب اضافتها زرار ستارت لاضافة البيانات اول مرة زرار ستارت 2 لاضافة البيانات اكثر من مرة الخلية من عندما تساوى 1 و الخلية عدد عندما تساوى 5 بالضغط على ستارت اضاف السجلات من 1 و2و3و4و5 2بالضغط على ستارت الخلية من عندما تساوى 10 و الخلية عدد عندما تساوى 15 اضاف السجلات من 10 و11و12و13و14 كله ده تمام اريد عند الضغط ستارت 2 اكثر من مرة عندما تكون الخلية من بها رقم 1 والخلية عدد بها عدد السجلات تبدأ السجلات مرة اخرى بنفس رقم 1 فى هذا المثال بدأت مرة اخرى من 10 الى 15 اذا تم الضغط وهى بنفس القيمة يكرر من 10 الى 15 اذا لم تصل الفكرة رجاء افادتى وجزاك الله خيرا test42.rar

UP

جزاك الله خيرا تم الحل

بسم الله الرحمن الرحيم الخلية من هى بداية تسلسل السجلات الخلية عدد هى عدد السجلات التى يجب اضافتها زرار ستارت لاضافة البيانات اول مرة زرار ستارت 2 لاضافة البيانات اكثر من مرة الخلية من عندما تساوى 1 و الخلية عدد عندما تساوى 5 بالضغط على ستارت اضاف السجلات من 1 و2و3و4و5 2بالضغط على ستارت الخلية من عندما تساوى 10 و الخلية عدد عندما تساوى 5 اضاف السجلات من 10 و11و12و13و14 كله ده تمام اريد عند الضغط ستارت 2 اكثر من مرة عندما تكون الخلية من بها رقم 1 والخلية عدد بها عدد السجلات تبدأ السجلات مرة اخرى بنفس رقم 1 فى هذا المثال بدأت مرة اخرى من 10 الى 15 اريد اذا تم الضغط وهى بنفس القيمة يضيف من 10 الى 15 مرة اخرى اذا لم تصل الفكرة رجاء افادتى وجزاك الله خيرا test42.rar

عندى خلية التاريخ اريد فى الاستعلام ظهور يوم الاسبوع لهذا التاريخ يعنى مثلا 27/1/2017 يوافق يوم الجمعة test20.rar