كيف يمكننى اضافة 60 سنة الى هذا التاريخ 1/1/1980

السلام عليكم

يمكنك عمل ذلك عن طريق دالة الإضافة إلى التاريخ DateAdd كالتالي:

Dim d As Date
d = DateSerial(1980, 1, 1)
MyDate = DateAdd("yyyy", 60, d)

thank you veryyyyyyyyyyy much