Kayıtları Kontrol Etme ve Mükerrer Olanları Engelleme

Bu dosya, UserForm üzerindeki TextBox'a girilen verinin kaydedilmeden önce kontrol edilmesini ve mükerrer (çift) kaydın engellenmesini gösteren makrolu bir örnektir. Aynı değer A sütununda varsa yeni kayıt yapılmaz, kullanıcı hangi hücrede kayıtlı olduğu bilgisiyle uyarılır.

Dosyanın içeriği​

• Sayfa1: A1:A30 aralığında "A Sütunundaki Kayıtlar" başlığı ve örnek kayıtlar (ExcelDestek, ExcelDepo, Excel Örnek Dosyaları, Excel Kısayolları, Excel İpuçları) bulunur. Sayfada formül yoktur.
• UserForm1: Veri girişi için bir TextBox1 ve kaydı başlatan bir CommandButton1 içerir.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Dosyada dış bağlantı, dosya silme gibi zararlı bir işlem yoktur.

• Sayfa1 / CommandButton1_Click: Sayfadaki düğmeye tıklandığında UserForm1 formunu açar.
• UserForm1 / CommandButton1_Click: Formdaki düğmeye tıklandığında şu adımları izler:

1. TextBox1'e yazılan değer okunur. Alan boşsa "Kayıt için veri girmediniz..!" uyarısı verilir ve işlem durur.
2. A2'den A sütunundaki son dolu satıra kadar tüm hücreler girilen değerle karşılaştırılır.
3. Eşleşme varsa "Bu kayıt ... hücresine kayıt edilmiş..!" uyarısı hücre adresiyle birlikte gösterilir ve kayıt yapılmaz.
4. Eşleşme yoksa değer A sütunundaki ilk boş hücreye yazılır, "Yeni Kayıt Eklendi" bilgisi verilir, TextBox temizlenir ve imleç yeniden TextBox'a getirilir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Sayfa1 üzerindeki düğmeye tıklayarak formu açın.
3. TextBox'a kaydedilecek değeri yazıp formdaki düğmeye tıklayın.
4. Değer listede yoksa A sütununun sonuna eklenir; varsa uyarı mesajında kayıtlı olduğu hücre belirtilir.
5. Aynı değeri tekrar girerek kontrolü deneyebilirsiniz.

Kod, A sütununu 65536. satıra kadar tarar; kendi çalışmanıza uyarlarken TextBox ve sütun adreslerini ihtiyacınıza göre değiştirebilirsiniz.