ThisWorkbook Özürlü Personel Hatırlatma

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

YasarPiskin

Kısa Açıklama

ThisWorkbook Özürlü Personel Hatırlatma isimli başlıkta, ilgili işlemlere dair detaylar yer almaktadır.
Excel Versiyonu
Excel 365
Excel Sürümü
64 Bit
Excel Dili
Türkçe

Ekli dosyalar

Tarihe göre sırala Oylamaya göre sırala
Belgenizin, sorunsuz çalıştığı dönemde;
A sütununda, alttan yukarı doğru ilk dolu hücrede BUGÜN'ün tarihi varmış demek ki.
Mevcut koddaki şu satırda bu tarih kontrol ediliyor, bulunamadığı için de sonraki aşamaya geçilemiyor durumda.

If Sayfa1.Range("A" & Sayfa1.Rows.Count).End(xlUp).Value <> DateValue(Now()) Then

Ayrıca bir de hatırlatma: koddaki DateValue(Now()) kısmının yerine DATE yazın.
İşleyiş değişmeyecek, A sütunundaki son dolu hücrede BUGÜN tarihi olmazsa istediğiniz gerçekleşmez.
 
Oyla 0 Olumsuz oyla
Yanlış anlamışım.

A sütunundaki değerleri fark etmemişim.
Kodda, A sütunundaki son dolu satırdaki değer BUGÜN'ün tarihine EŞİT OLMADIĞINDA kod devreye girer.

Kodun ilgili kısmını şöyle değiştirin,
sonra da A sütunundaki son dolu hücrede yer alan BUGÜN tarihini silip dosyayı kaydedip kapatın ve tekrar açın.

VBA: 
Görüntülemek için giriş yapmanız gerekmektedir.
(4 satır)
 
Oyla 0 Olumsuz oyla
Çözüm
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst