ahmed_rashed قام بنشر أغسطس 30, 2018 مشاركة قام بنشر أغسطس 30, 2018 If Me.Option1.OptionValue = 1 Then DoCmd.OpenReport "Print Form buy", acViewPreview Else Me.Option2.OptionValue = 2 DoCmd.OpenReport "Print Form RF", acViewPreview Else Me.Option3.OptionValue = 3 DoCmd.OpenReport "Print Form PRO", acViewPreview End If End If End If اريد تعديل هذا الكود انه في حالة اختيار الاوبشن الاول يطبع بيع والاوبشن التاني مرتجع وهكذا رابط هذا التعليق شارك More sharing options...
AlwaZeeR قام بنشر أغسطس 30, 2018 مشاركة قام بنشر أغسطس 30, 2018 Dim RepName As String '=================== اسم مجموعة الخيار Select Case OptionName Case 1 RepName = "Print Form buy" Case 2 RepName = "Print Form Rf" Case 3 RepName = "Print Form Pro" End Select DoCmd.OpenReport RepName, acViewPreview رابط هذا التعليق شارك More sharing options...
ahmed_rashed قام بنشر أغسطس 30, 2018 الكاتب مشاركة قام بنشر أغسطس 30, 2018 (معدل) ممكن تشرح الكود لانة لم يعمل معي تم تعديل أغسطس 30, 2018 بواسطه ahmed_rashed رابط هذا التعليق شارك More sharing options...
AlwaZeeR قام بنشر أغسطس 30, 2018 مشاركة قام بنشر أغسطس 30, 2018 تفضل عزيزي Test.rar 1 رابط هذا التعليق شارك More sharing options...
ahmed_rashed قام بنشر أغسطس 30, 2018 الكاتب مشاركة قام بنشر أغسطس 30, 2018 هو الكود في المثال شغال لكن لما انسخة للقاعدة مش بيشتغل تاني شئ انا عايزة يعتمد كمان ع التكست الموجود الخاص برقم الفاتورة رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر أغسطس 30, 2018 مشاركة قام بنشر أغسطس 30, 2018 استاذنا الوزير قام بالعمل المطلوب لكن لكي تعرف استخدام دالة If قمت بتعديل كودك السابق If Me.Option1.OptionValue = 1 Then DoCmd.OpenReport "Print Form buy", acViewPreview ElseIf Me.Option2.OptionValue = 2 then DoCmd.OpenReport "Print Form RF", acViewPreview ElseIf Me.Option3.OptionValue = 3 then DoCmd.OpenReport "Print Form PRO", acViewPreview End If 1 رابط هذا التعليق شارك More sharing options...
ahmed_rashed قام بنشر أغسطس 31, 2018 الكاتب مشاركة قام بنشر أغسطس 31, 2018 شكرا لك يا غالي تم استيرااد نموذج الاخ AlwaZeeR وتم عمل التعديلات والان يعمل شكرا لك رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان