Mükerrer Kaydı Onaylama

Üstadlarım yardımlarınızı rica ediyorum.

Koruma Şifresi Sadece Genel Sayfasında var Şifre : 1

İz sayfasında bulunan tüm verilerin sadece değer olarak İz_Arşiv sayfasına aktarılmasını istiyorum.
Eğer mükerrer olarak kayıt İz_Arşiv sayfasında varsa,
D sütununa göre mükerrer kaydı bulsun, D sütunu içeriğini (Sicil Numarasını) yazsın
ve onay istesin. Her mükerrer kayıt için evet dersem aktarsın, hayır dersem aktarmasın.

Aktarınca İz_Arşiv sayfasının F sütununa da günün tarihini yazacak.

Veya toplu şekilde seçimlide olabilir. Bunlar aktarılsın, şunlar aktarılmasın gibi.

Üstadlarım yardımlarınızı rica ediyorum.

AKtarma kodunu aşağıdaki ile değiştirin.

Çok çok teşekkür ederim Feyzullah bey. Çok işime yaradı. Çok şey öğrendim. Sağolun. Varolun.

Feyzullah hocam,
Hiç başıma gelmemişti. Örneğin İz Sayfasında 1 veri var ve aktar diyorsunuz
2 adet veri aktarıldı mesajı veriyor 1 kaydı doğru aktarıyor 2. satırada sadece
tarih atıyor. Bunu nasıl düzeltebiliriz. Saygılarımla.

Hocam size zahmet olacak. Saygılarımla.

Hocam lütfen yardımınızı rica ediyorum.

Sorunumu çözdüm sonunda. Aşağıdaki şekilde değişiklik yaptım. Saygılarımla.

Haydaaa, @Feyzullah bey lütfen kusuruma bakmayın
bu defada hiç kayıt yokkan aktar dediğinizde
1 kayıt aktarıldı yazıyor ve sadece f sütununa tarih atıyor.

If son < 2 Then son = 2
bu satırın 1 üstüne
If son = 1 Then exit sub yazıp denermisiniz.

Yani kodun en başlarında verinin olmadığını tespit edip kodtan çıkmanız , kodun başlamaması gerekiyor.

Sayın MESKO,
Teşekkür ederim ilginiz için fakat hiç tepki vermiyor.