Çözüldü Tarihe gün eklemek

[k0081]

Merhaba arkadaşlar;

deger1 =10.12.2018 ( String ve Sabit )

bugun=17.12.2018 ( Date ve değişken)

deger1 tarihine 15 ekleyip, mesaj vermesini nasıl sağlarım?


yardımcı arkadaşa şimdiden teşekkür ederim.

 

[Orion1]

Merhaba arkadaşlar;

deger1 =10.12.2018 ( String ve Sabit )

bugun=17.12.2018 ( Date ve değişken)

deger1 tarihine 15 ekleyip, mesaj vermesini nasıl sağlarım?


yardımcı arkadaşa şimdiden teşekkür ederim.

Buyurun.

cdate(datevalue("10.12.2018")) + 1

 

[k0081]

Buyurun.

cdate(datevalue("10.12.2018")) + 1

hocam kod için teşekkürler, yalnız mesaj kısmı eksik kaldı.

şimdi olay şöyle;;;

deger1 stringi sabit . ama her 15 günde bir değişmektedir.

yapmak istediğim şartlı mesaj şu şekilde oluşması gerekiyor.

25.12.2018 den itibaren her gün mesaj vermesi. taki; deger1 değişene kadar...


Hocam tamamdır. soru çözülmüştür. Teşekkürler.

******************* BU KONU ÇÖZÜLMÜŞTÜR. **************************************

 

[Orion1]

B1 deki değer metin ve tarih se ve bugünden 15 gün büyükse ve eşitse b1 e 15 gün ekler.
Buyurun.

If Date - CDate(Range("B1").Value) >= 15 Then Range("B1").Text = CDate(Range("B1").Value) + 15