Soru MESAİ TAKİP PROGRAMI MAKRO GÜNCELLEME

[teyadih]

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

 

[EmrExcel16]

Merhaba , deneyiniz..

 

[teyadih]

Teşekkür ederim kontrol edip dönüş yapacağım

 

[teyadih]

Formül tamam EmrExcel16 teşekkür ederim elinize sağlık.
Gönderdiğiniz dosyaya açıklama sayfasının açılış sayfası olması için makroyu da ekledim.
Bildiğiniz üzere mevcut haliyle Açıklama sayfasındaki Temizle ve Bilgileri Aktar düğmesiyle Liste sayfasındaki bilgileri temizliyoruz.
Söz konusu makroya ek olarak mümkünse aynı düğmeyle mümkün değilse farklı bir düğmeyle söz konusu bilgileri temizledikten sonra Açıklama sayfasında A-B-C-D-E-F-G sütunlarındaki bilgileri 5.satırdan itibaren Liste sayfasında A-B-C-D-E-F-G sütunlarına 10.satırdan itibaren aktarılmasını sağlayabilir miyiz?
Eğer farklı bir düğmeyle aktarım yapılacaksa Bilgiler Aktarılsın mı diye gelecek uyarıda Hayır seçeneğinin seçili olarak gelmesi.
Tekrar teşekkür ederim.

Not: Açıklama sayfasında A-B-C-D-E-F-G sütunlarındaki bilgileri başka bir çalışma kitabından Düşeyara ve indis formülleri ile alıyorum.

 

[EmrExcel16]

Deneyin..

 

[teyadih]

Çok teşekkür ederim EmrExcel16 elinize sağlık.

 

[EmrExcel16]

Çok teşekkür ederim EmrExcel16 elinize sağlık.

Rica ederim ,iyi çalışmalar.