السلام عليكم ورحمة الله وبركاته
اسعد الله اوقاتكم
ارجو المساعد في كود زيادة التاريخ بالخلايا بزيادة عدد اشهر وبحسب التاريخ سواء هجري او ميلاي
وقد بدات المحاولة بالهجري ولكن لم افلح
Sub chngedate()
Dim i As Integer
Sheets("test").Select
For i = 4 To 200
If Cells(i, 16).Value = 1 And Cells(i, 15).Value Like "الهجري" And Cells(i, 9).Value Like "نصف سنوي" Then Cells(i, 10).Value = Cells(i, 10).Value + 177
Next i
End Sub
مرفق الملف ، وجزاكم الله خيرا
تغيير تواريخ هجري او ميلادي.xlsm