Tarihe Yıl Eklemek

[osan003]

Arkadaşlar tarihe bir tam yıl eklemek için nasıl bir fonksiyon yazmamız gerekiyor zira bir günlük hata veriyor.
20/07/2005+1 yıl=20/07/2006 sonucu her zaman çıkmıyor

 

[mehmett]

Eğer yıl ekleyeceğiniz tarih A1 hücresinde ise;

=TARİH(YIL(A1)+1;AY(A1);GÜN(A1))

 

[smyc1976]

Function yilekle(EklenecekSure As Integer, ilkTarih As Date)
yilekle = DateAdd("yyyy", EklenecekSure, ilkTarih)
End Function

Birde bu kodu deneyin eklenti olarak kaydederseniz yilekle formülünü heryerde kullanabilirsiniz.
bu şekilde 29 şubat sorununu aşmış olursunuz.