تکرار شماه ردیف بصورت اتوماتیک و با همان شماره وارد شده اول

[rashidianc]

با سلام خدمت اساتید محترم
ممنون میشم راهنمایی بکنید .

جدولی دارم شامل سه فیلد :

شماره (که بصورت دستی وارد میشه )
تاریخ
نام کالا

میخام بدون استفاده از فرم وساب فرم هر گاه در فرم ورودی شماره ای بصورت دستی وارد کردم در ردیفهای زیرین هم همان شماره بیاید و در عین حال بشه دستی هم تغییرش داد .
فایل نمونه را گذاشتم که بصورت دستی خودم شماره ها را ادامه دادم .

با تشکر فراوان

[Abbas Amiri]

با سلام خدمت اساتید محترم
ممنون میشم راهنمایی بکنید .

جدولی دارم شامل سه فیلد :

شماره (که بصورت دستی وارد میشه )
تاریخ
نام کالا

میخام بدون استفاده از فرم وساب فرم هر گاه در فرم ورودی شماره ای بصورت دستی وارد کردم در ردیفهای زیرین هم همان شماره بیاید و در عین حال بشه دستی هم تغییرش داد .
فایل نمونه را گذاشتم که بصورت دستی خودم شماره ها را ادامه دادم .

با تشکر فراوان

در رویداد Current فرم کدهای زیر را وارد کنید:


Private Sub Form_Current()
If Me.NewRecord Then
Me.iddasty = Nz(DLast("iddasty", Me.RecordSource), 1)
End If
End Sub

[rashidianc]

خیلی ممنون از لطفتون حل شد . :تشویق: