خذ راحتك .. اسأل كما يحلو لك ..
في الموضوع السابق رأيت انه تجاوز 3 صفحات .. لذا احببت البدء بموضوع وعنوان جديد .. فالعناوين الجديدة المختلفة مسألة ايجابية
بالنسبة لطلبك هذا فالامر اسهل مما تتصور ولست بحاجة الى انشاء حقول واكواد بمتغيرات وانما هو سطر واحد بسيط :
Private Sub C7_AfterUpdate()
C8 = DateAdd("d", 30, C7)
End Sub
الرقم 30 هو عدد الايام (القيمة) التي ترغب باضافتها
يمكنك وضع هذه القيمة في حقل في احد الجداول الموجودة ذات السجل الوحيد ويتم جلبها ( على اعتبار انها قد تتغير هذه المدة (القيمة) )
Database25.rar