Soru Tarihe Göre 1 Ay Atlatma

Katılım
24 Temmuz 2019
Mesajlar
181
Excel Vers. ve Dili
2010 ve 2016 Türkçe
Altın Üyelik Bitiş Tarihi
19-10-2023
Merhaba arkadaşlar.

Belirli günlerde mail göndermesi için bir hatırlatıcı programı hazırlamaktayım. Son adımda takıldım.

İstediğim şey;

A1 hücresine girilen tarih her zaman 1 ay atlatsın. Ama a1 hücresindeki gün 31 çekiyorsa, bir sonraki ay 31 çekmiyorsa, bir sonraki ayın son gününe atlatsın.
Örneğin

A1 hücresine girilen tarih 28.02.2021 olsun. Şubat ayının son günü yani.
1-A1 hücresindeki tarih bir ay atlatsın ve B1 de 28.03.2021 yazacak.
Yada
2-A1 hücresindeki tarihi 31.10.2021 yapalım. Bir ay atlatacak ama Kasım ayı 31 çekmediği için otomatik 30.10.2021 değerini versin B1 hücresinde.
Yada
3-A1 hücresindeki tarihi 15.10.2021 yapalım. Bir ay atlatacak ve B1 hücresinde 15.11.2021 yazacak.

Yukarıdaki örnekteki koşula sahip bir formüle ihtiyacım var. Umarım anlatabilmişimdir.
 
Son düzenleme:

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,662
Excel Vers. ve Dili
Microsoft 365 Tr-64
Range("B1")=DateAdd("m",1,Range("A1"))

Formülle
=TARİH(YIL(A1);AY(A1)+1;GÜN(A1))
 
Katılım
24 Temmuz 2019
Mesajlar
181
Excel Vers. ve Dili
2010 ve 2016 Türkçe
Altın Üyelik Bitiş Tarihi
19-10-2023
Range("B1")=DateAdd("m",1,Range("A1"))

Formülle
=TARİH(YIL(A1);AY(A1)+1;GÜN(A1))
Desteğiniz için teşekkür ederim. Ama yukarıdaki formülde örnekte bahsettiğim 2 ve 3. koşulu sağlamıyor.
A1 hücresine 31.01.2021 değerini girdiğimde 03.03.2021 değerini vermekte. Ama 28.02.2021 değerini vermesi lazımdı.
Eğer A1 hücresine 28.02.2021 girseydim, B1 hücresinde 28.03.2021 değerini vermeliydi.
 

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,662
Excel Vers. ve Dili
Microsoft 365 Tr-64
Haklısınız, dikkat etmemişim
=EĞER(SERİAY(A1;0)=A1;SERİAY(A1;1);TARİH(YIL(A1);AY(A1)+1;GÜN(A1)))
 
Katılım
24 Temmuz 2019
Mesajlar
181
Excel Vers. ve Dili
2010 ve 2016 Türkçe
Altın Üyelik Bitiş Tarihi
19-10-2023
Haklısınız, dikkat etmemişim
=EĞER(SERİAY(A1;0)=A1;SERİAY(A1;1);TARİH(YIL(A1);AY(A1)+1;GÜN(A1)))
Çok teşekkür ederim emeğiniz için. Ama 30.01.2021 değerini girince A1 e 02.03.2021 değerini vermekte. 28.02.2021 değerini vermesi lazımdı. Bunun dışında bir problem göremedim.
 

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,662
Excel Vers. ve Dili
Microsoft 365 Tr-64
Bunu denermisin. Ben test ettim ama gözden kaçırmış olmayayım.
=MİN(SERİAY(A1;0)+GÜN(A1);SERİAY(A1;1))
 
Katılım
24 Temmuz 2019
Mesajlar
181
Excel Vers. ve Dili
2010 ve 2016 Türkçe
Altın Üyelik Bitiş Tarihi
19-10-2023
Bunu denermisin. Ben test ettim ama gözden kaçırmış olmayayım.
=MİN(SERİAY(A1;0)+GÜN(A1);SERİAY(A1;1))
Bu formülde bir sorun gözükmüyor. Her gün için kontrol yaptım topluca. Emeğinize sağlık hocam.
 
Katılım
9 Ocak 2011
Mesajlar
354
Excel Vers. ve Dili
2007 Türkçe
Altın Üyelik Bitiş Tarihi
01-07-2023
Buda benim kullandığım Alternatif olsun Ayın hep son gününü verir.
Kod:
=TARİH(YIL(A1);2+AY(A1);0)
 

ÖmerFaruk

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2017
Mesajlar
4,662
Excel Vers. ve Dili
Microsoft 365 Tr-64
Sadece son gün istenmiyor sayın @1mak1mak

"3-A1 hücresindeki tarihi 15.10.2021 yapalım. Bir ay atlatacak ve B1 hücresinde 15.11.2021 yazacak."
 
Üst