رقم الصادر والوارد

[alirah20]

هل يوجد طريقه لعمل دالة تظهر لي رقم الصار عند ادخال معاملة معينه حيث ان رقم الصادر مكون من السنه الحالية مقسوما على عدد تسلسليز

مرفق طيه مثال على ذلك

2006/1

2006/2

2006/3

.

.

.

.

[علي السحيب]

الكود التالي يلبي ما طلبته،

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Row > 1 Then
Cells(Target.Row, 2) = Target.Row - 1 & "/" & Year(Date)
End If
End Sub

شاهد المرفق،

______________________________________.rar