teyadih
Gold Üye
- Katılım
- 13 Ağu 2021
- Mesajlar
- 653
- Çözümler
- 3
- Aldığı beğeni
- 135
- Excel V
- Office 2016 EN
- Gold Bitiş
- 8 Mayıs 2026
Konu Sahibi
Merhaba arkadaşlar. Ekli dosyada detaylı olarak açıkladığım üzere Mesai takibi için kullanmış olduğum makrolarda güncellemeye ihtiyacım var.
1-Açıklama sayfasındaki Temizle ve Bilgileri Aktar düğmesine tıkladığımızda uyarıda Evet seçili olarak gelmekte olup, sehven enter yaparak silinmemesi için
Hayır seçili olarak gelecek şekilde düzeltilmesi
2-L ve W sütunları arasındaki aylara son yapılacak giriş ile W satırındaki toplam A4 satırındaki toplamı geçiyorsa giriş yapılmasına izin vermeyip KİŞİYE AİT MESAİ SAATİNİ GEÇEMEZ!!! diye Uyarı veren
If (Cells(satir, "X").Value > Range("A4").Value) And durum <> "Alamaz" Then
Application.EnableEvents = False
Target.Value = ""
Application.EnableEvents = True
MsgBox ("KİŞİYE AİT MESAİ SAATİNİ GEÇEMEZ!!!") makrosunu A4 satırındaki toplamı geçtiğinde değil de kişiye ait AA satırındaki rakamı geçtiğinde KİŞİYE AİT MESAİ SAATİNİ GEÇEMEZ!!! diye Uyarı verecek şekilde düzeltilmesi
3-Hangi sayfada kapanırsa kapansın açıldığında Açıklama sayfasının gelmesi
1-Açıklama sayfasındaki Temizle ve Bilgileri Aktar düğmesine tıkladığımızda uyarıda Evet seçili olarak gelmekte olup, sehven enter yaparak silinmemesi için
Hayır seçili olarak gelecek şekilde düzeltilmesi
2-L ve W sütunları arasındaki aylara son yapılacak giriş ile W satırındaki toplam A4 satırındaki toplamı geçiyorsa giriş yapılmasına izin vermeyip KİŞİYE AİT MESAİ SAATİNİ GEÇEMEZ!!! diye Uyarı veren
If (Cells(satir, "X").Value > Range("A4").Value) And durum <> "Alamaz" Then
Application.EnableEvents = False
Target.Value = ""
Application.EnableEvents = True
MsgBox ("KİŞİYE AİT MESAİ SAATİNİ GEÇEMEZ!!!") makrosunu A4 satırındaki toplamı geçtiğinde değil de kişiye ait AA satırındaki rakamı geçtiğinde KİŞİYE AİT MESAİ SAATİNİ GEÇEMEZ!!! diye Uyarı verecek şekilde düzeltilmesi
3-Hangi sayfada kapanırsa kapansın açıldığında Açıklama sayfasının gelmesi
Ekli dosyalar
Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.