• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

excel'de bir tablodaki bir tarih için uyarı yapabilir miyiz.

  • Konbuyu başlatan Konbuyu başlatan mvarol
  • Başlangıç tarihi Başlangıç tarihi
Katılım
20 Ekim 2005
Mesajlar
56
Arkadaşlar Merhaba,

Excel'de bir tablo yapmıştım....
bazı sözleşmeler ve yanlarında bitim tarihleri var....

ben, o sözleşmedeki bitim tarihi gelince beni bir şekilde uyarmasını istiyorum....

bu mümkün mü...ama bunu excel'deki tablo üzerinde yapmak istiyorum....yoksa diğer anımsatıcı proğramları biliyorum...

yani nebileyim...o tablo üzerindeki bir tarihi tıklayıp ona bir makro yazmak gibi vs..olabilir....zamanı gelince ya da benim verdiğim bir tarihte beni uyaracak.

teşekkürler
 
Merhaba;

Aşağıdaki formül işinize yarayabilir.

=EĞER(BUGÜN()=A1;"BUGÜN YAPILACAK İŞİN VAR";"")
 
teşekkürler

Merhaba;

Aşağıdaki formül işinize yarayabilir.

=EĞER(BUGÜN()=A1;"BUGÜN YAPILACAK İŞİN VAR";"")

hocam teşekkür ederim...
ylnız bunu nereye yazmam gerekiyor...hücrenin içine yazarsam tarih gözükmez.
sayfadaki başka bir hücreye mi yazayım....
ben tarihlerin üzerine yazmak istiyorum....
çünkü bir sürü değişken tarih giriyorum tabloya...
 
Merhaba;

Çalışmanızın içeriğini bilememiyorum tabii. Size verdiğim örnekte sorgulattarımak istediğim tarihi a1 hücresine yazdım. Eğer sizinde çalışmanız böyle bişeyse tarihi herhangi bir hücreye veya sayfaya yazıp formülüde istediğiniz yere uygulayabilirsiniz.

Bu konu ile ilgili birçok alternatifler yapılabilir. Örneğin çalışma kitabı açıldığında mesaj ile uyarıda verdirilebilir. Günü gelen tarihler renklendirilebilir vs....

Esasen konu ile ilgili olarak arama motoronu kullansanız birçok örneğine ulaşabilirsiniz.
 
yanıt

A sütunundaki tarihler B sütunundaki tarihlerden küçük veya eşitse gölge rengi sarı olur.
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [a1:b500]) Is Nothing Then Exit Sub
[a1:a500].Interior.ColorIndex = 0
For sut = 1 To [a65536].End(3).Row
If Range("a" & sut) <= Range("b" & sut) And Range("a" & sut) <> "" Then
Range("a" & sut).Interior.ColorIndex = 6
End If
Next
End Sub
 
Geri
Üst