[ تمت الإجابة ]أضافة شهر على تاريخ اليوم

بارك الله فيك

حل سريع وجميل

معذرة اخي قمت بالتعديل البسيط وهو اظهار التاريخ فقط وليس التاريخ والوقت

Dim Var1 As Date

Dim Var2 As Date

Var1 = date

Var2 = DateAdd("M", 1, Var1)

MsgBox Var2

والشكر لك

تسلم ايديك يا اخى الكريم

yms12

تعديل صائب واضافة جميلة

وشكرا لك وسلمت يداك