Hatırlatma

[umutsancar]

Tabloda hatırlatılacak satırda gün, günün bulunduğu sütunda ise ay yazıyor. Günü gelenleri tekbir mesaj box'ta göstermemiz nasıl mümkün olur?

Dosyam ekte,

Yardımlarınız için şimdiden teşekkürler.

 

[Seyit Tiken]

"=BUGÜN()" arkasına "+20" gibi bir sayı ekleyerek formülü test edebilirsin. Artık kendine göre uyarlarsın. Bir sorun çıkarsa yada yapamazsan yaz. Hadi kolay gelsin...

 

[Levent Menteşoğlu]

Aşağıdaki kodu deneyin.

[vb:1:dfa6b59e89]Sub hatirlat()
ay = Month(Date)
For a = [b65536].End(xlUp).Row To 4 Step -1
If Day(Date) = Cells(a, ay + 2) Then
yaz = Cells(a, 2) & Chr(10) & yaz
End If
Next
If yaz = "" Then Exit Sub
MsgBox yaz
End Sub[/vb:1:dfa6b59e89]

 

[Seyit Tiken]

Ufak bir sorun yaşandı. Dosyayı gönderemedim. İnşaallah bu sefer olur.

 

[Seyit Tiken]

En alta sağ tarafta bulunan "CevapYaz" düğmesine basarsan dosyaya ulaşırsın.