excel'de ileri bi tarihte hatırlatma/alarm verdirme

[klejua]

teşekkür ederim

 

[REAXION1]

Bu dosyayı nasıl indirebiliriz?

 

[mekist]

Bu kodları birkaç yıl önce yine bu sitemizden temin etmiştim. Aradığınız böyle bir şeymi?
Private Sub Workbook_Open()
On Error Resume Next
bulunan = ""
bul = Range("B1:B100").Find(Date).Row
If bul > 0 Then
With Range("B1:B100")
Set c = .Find(Date)
If Not c Is Nothing Then
firstAddress = c.Address
Do
bulunan = bulunan & Cells(c.Row, 1) & " --> " & c.Text & Chr(13)
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
MsgBox bulunan, vbInformation, "Hatırlanması Gerekenler"
End If
End Sub
Yukarıdaki kodu Thisworkbook kısmına kayıt edilerek,
Dosyamızı Dosya>Farklı Kaydet menüsüne tıklayarak C:\Program Files\Microsoft Office\OFFICE11\XLSTART klasörüne
Hatırlatma.xls ismiyle kaydedelim.
A stununa yapılacak işler, B stununa ise yapılacak olan tarihi yazılım
Şimdi Microsoft Excel’i kapatalım ve herhangi bir excel dosyamızı açalım.
Sizin dosyanızdan önce Hatırlatma.xls dosyasının açıldığını ve günü gelen hatırlatmaları
mesaj olarak verdiğini göreceksiniz.

Merhaba,
Hatırlatmayı tüm çalışma kitabındaki veriler için yapmıyor, Sadece hangi sayfada kayıt edildi ise orada yapıyor, Tüm Kitapta arama yapıp hatırlatma yapabilir mi?

 

[Korhan Ayhan]

Aşağıdaki kodu deneyiniz.

Private Sub Workbook_Open()
    On Error Resume Next
    For Each Sayfa In ThisWorkbook.Worksheets
        bulunan = ""
        bul = Sayfa.Range("B1:B100").Find(Date).Row
        If bul > 0 Then
            With Sayfa.Range("B1:B100")
                Set c = .Find(Date)
                If Not c Is Nothing Then
                    firstAddress = c.Address
                    Do
                        bulunan = bulunan & Cells(c.Row, 1) & " --> " & c.Text & Chr(13)
                        Set c = .FindNext(c)
                    Loop While Not c Is Nothing And c.Address <> firstAddress
                End If
            End With
        End If
    Next
    If bulunan <> "" Then
        MsgBox bulunan, vbInformation, "Hatırlanması Gerekenler"
    End If
End Sub

 

[francecua]

Merhaba,

Elimde bir excel takip tablosu var.

Konu şu:

Tablo içerisinde belirtilen tarihlere gelmeden (1-2 gün önce) ve tarihler geçince bana sesli veya e-mail ile uyarı vermesini istiyorum. Bunun için nasıl ilerlemem gerekir? Yardımlarınızı bekliyorum :frown:

 

[bekirus]

Merhaba,

Elimde bir excel takip tablosu var.

Konu şu:

Tablo içerisinde belirtilen tarihlere gelmeden (1-2 gün önce) ve tarihler geçince bana sesli veya e-mail ile uyarı vermesini istiyorum. Bunun için nasıl ilerlemem gerekir? Yardımlarınızı bekliyorum :frown:

Merhaba bende böyle bir takip tablosu yapmak istiyorum yardımlarınızı bekliyorum

 

[şehiriçi]

merhaba ;
Korhan bey 24 no lu mesajdaki kodu uyguladım ,yalnız bu kodu yazdığımız hatırlatma dosyası , her hangi bir kitap açıldığında hemen geliyor.
ben istiyorum ki sadece hatırlatmasını istediğimiz tarih geldiğinde dosya hatırlatsın ...

 

[xxxfly]

excelde ileri bir tarihte hatırlatma

merhaba,

Excell de ödeme tarihi yaklaşan ve kaçan ödemeleri takip etmem için nasıl bir yol izlemeliyim. yardımcı olursanız sevinirim. Tşk.

 

[xxxfly]

excelde ileri bir tarihte hatırlatma

Korhan Bey Merhaba,

Excell de ödeme tarihi yaklaşan ve kaçan ödemeleri takip etmem için nasıl bir yol izlemeliyim. yardımcı olursanız sevinirim. Tşk.

 

[xxxfly]

Excell Tarih Hatırlatma

Merhaba bende böyle bir takip tablosu yapmak istiyorum yardımlarınızı bekliyorum

 

[Korhan Ayhan]

Merhaba Değerli Arkadaşlar,

Excelin kapalı durumdayken belli bir tarih geldiğinde otomatik anımsatma özelliği maalesef yoktur.

Bu durum için uygulanan çözümler;

1- Dosya açılışına yazılacak bir makro ile dosya içindeki tek bir sayfadan ya da istenen sayfalardan veriler kontrol edilerek istenen koşula göre raporlama-anımsatma yapılabilir. Bu dosyayı "Windows Zamanlanmış Görevler" ile ilişkilendirip belirli zaman aralıklarında dosyanın açılması sağlanır. Dosya açıldığı zaman makro kodu devreye girer ve ilgili rapor-anımsatma oluşur.

Bunun dışında excelin dinamik şekilde anımsatma yapabilmesi için dosyanın sürekli olarak açık olması gerekir.

Eğer istenen dinamik olarak anımsatma ise OUTLOOK kullanılabilir. Ya da 3. parti yazılımlara yönelebilirsiniz.

2- Bunun dışında koşullu biçimlendirme kullanılabilir. İlgili koşula uyan tarihlere ait satırlar ya da hücreler dilenen bir renge boyanarak dosyayı kullanan kişi uyarılabilir. Bununla ilgili olarak forumda oldukça fazla çözüm üretildi. Arama yapılarak ulaşılabilir.

 

[mlt444]

Teşekkürler

 

[ahmetcan_34]

Benim de çok işime yarayacak. Teşekkürler.

 

[kelto3]

güzel çalışma teşekürler.

 

[AZİZEM]

selam

kimlik tarih dolmadan 6 ay önce bana haber versin yada hücre renklensin

İYİ GÜNLER BU PROGRAMI KOPYALAMAK İSTİYORUM AMA Bİ TÜRLÜ ALTIN ÜYE OLAMADIM NASIL YAPABİLİRİM

 

[mrkaan]

Aşağıdaki kodu deneyiniz.

Private Sub Workbook_Open()
    On Error Resume Next
    For Each Sayfa In ThisWorkbook.Worksheets
        bulunan = ""
        bul = Sayfa.Range("B1:B100").Find(Date).Row
        If bul > 0 Then
            With Sayfa.Range("B1:B100")
                Set c = .Find(Date)
                If Not c Is Nothing Then
                    firstAddress = c.Address
                    Do
                        bulunan = bulunan & Cells(c.Row, 1) & " --> " & c.Text & Chr(13)
                        Set c = .FindNext(c)
                    Loop While Not c Is Nothing And c.Address <> firstAddress
                End If
            End With
        End If
    Next
    If bulunan <> "" Then
        MsgBox bulunan, vbInformation, "Hatırlanması Gerekenler"
    End If
End Sub

merhaba korhan bey ben b yazan yerleri d yaptım ancak
Dosyamızı Dosya>Farklı Kaydet menüsüne tıklayarak C:\Program Files\Microsoft Office\OFFICE11\XLSTART klasörüne
bu uzantı benım excelde yok çalıştıramadım bu yüzden yardımcı olurmusunuz.

 

[mrkaan]

merhaba korhan bey beNİM Sütunlar şöyle benim excele entegre etmek istiyorum

a b c d e f sütunu var

tarih yazan yer d sütunu
c sütununda formül kullandıgım kalan ödeme günü yazıyor

hatırlatıcı mesaj c sütunundaki veriler yapabilirmiyiz. mesajı düzenleyemedim buraya tekrar yazdım