اعتقد باذن الله ان وجد ضالتي بمساعدة الاستاذ طارق محمود
حيث استفدت من المعادلة في استخدام الماكرو والتعديل على السطر المحدد في لصق القيم في عمود الاجازات مع الاضافة وهو ما كنت احتاجه بحيث يضيف عدد الايام مباشرة الى الرقم الموجود في الاجازة
Sub AddVacation()
Range("J4:J12").Select
Selection.Copy
Range("G4:G12").PasteSpecial Paste:=xlPasteValues, Operation:=xlAdd
Range("h4:i12").ClearContents
Range("n3").Select
End Sub
شكرا لكم
رصيد الاجازات.rar