excel hucredeki tarih uyarısı

Her ikisi de yapılabilir. Farklı alternatifler de üretilebilir.

 Outlook takvime ekleme ile ilgili bu konuya bakabilirsiniz;   http://www.cozumpark.com/forums/post/405697.aspx

 

Uyarı vermesi için ThisWorkbook(BuCalismaKitabi) kod sayfasına şu kodları yapıştırıp A1 hucresine bir tarih girerek test edebilirsiniz. 

 

Private Sub workbook_open() 

If vba.date = range("a1").value then

Msgbox "Zamani geldi" 

End if 

End sub 

A1 hucresine yazılan tarih geldiğinde, dosyayi açtiginizda zamani geldi uyarisi alacaksınız.

Isterseniz beğendiğiniz bir müzik de caldirabiliriz, ya da cep telefonunuza mesaj olarak gönderebiliriz.

Siz nasıl olmasini isterseniz o şekilde ayarlarim, her zaman geniş düşünün büyük hayâl edin. 

 

Hoşça kalın !  

 

Not: Cepten yazdığım için yazım yanlışlari olabilir kusura bakmayın.  

teşekkür ederim yardımınızla istedigimi yaptım.

 

kodda bir kaç değşiklik yaparak istediğimi çözdüm, c sutunundaki tüm tarih aralıgını alarak istediğimi yaptım ;

Private Sub workbook_open()

Dim i As Integer

Dim j As String

Dim hucre As String

For i = 1660 To 4000 Step 1

hucre = "c" + CStr(i)

If VBA.Date = Range(hucre).Value Then

MsgBox "Zamani geldi"

End If

Next

End Sub

 

Rica ederim. 

 Kullanmadiginiz değişken tanımlamalarıni ve step 1'i silebilirsiniz. 

Ayrica cells(i, "c") ya da cells(i, 3) te yapabilirdiniz. 

 

Iyi gunler.