UserForm Üzerinden Çalışma Sayfasına Kayıt Etme

Bu dosya, bir UserForm üzerinden çalışma sayfasındaki personel listesine kayıt eklemeyi, mevcut kaydı değiştirmeyi, silmeyi ve kayıtlar arasında gezinmeyi gösterir. Makrolara yeni başlayanlar için kendi formunu hazırlarken örnek alabileceği bir yapı sunar.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sayfa1: A1:J92 aralığında personel listesi bulunur. Görülen sütunlar Adı Soyadı (A), Doğum Tarihi (C) ve Maaşı (E) alanlarıdır. Örnek kayıtlar arasında Ali Veli ve Bahadır Örkmes yer alır. Sayfada formu açan bir CommandButton bulunur.
• UserForm1: Kayıt giriş ekranıdır. Beş veri alanı (TextBox1 - TextBox5), bir ListBox, kayıt numarasını gösteren TextBox99 ve gezinme ile işlem butonları içerir.
• Module1: Durum çubuğunda "Lütfen Bekleyiniz..." ve yüzde ilerleme mesajı gösteren iki örnek makro (status, st) vardır.

Dosyada formül bulunmaz, işlemler VBA kodu ile yapılır.

Makrolar​

• Workbook_Open: Dosya açıldığında UserForm1 otomatik olarak gösterilir.
• Sayfa1 CommandButton1_Click: Sayfadaki butona basıldığında formu yeniden açar.
• Cmd1 - Cmd4: Sırasıyla ilk kayda, önceki kayda, sonraki kayda ve son kayda gider. İlk ya da son kayıtta uyarı mesajı verir.
• CommandButton1_Click (Kaydet): Beş alanın boş olup olmadığını kontrol eder. Girilen ad listede varsa kaydı günceller, yoksa listenin sonuna yeni satır olarak ekler. Metinleri WorksheetFunction.Proper ile baş harfleri büyük yazar.
• CommandButton2 ve CommandButton3: Düzenleme ve yeni kayıt modunu açar, alanları düzenlemeye hazırlar.
• CommandButton4_Click (Sil): Onay sorduktan sonra seçili kaydın satırını siler.
• CommandButton5_Click: İptal ya da vazgeçme işlevi görür, alanları kilitleyip kayıt verisini yeniden yükler.
• CommandButton6_Click: Formu kapatır.
• Image1_Click: Formdaki resme tıklandığında geliştiriciye ait e-posta adreslerine "Veritabanı Dosyası" konulu bir mailto bağlantısı hazırlamaya çalışır. Bu, dışarıya yönelik bir bağlantıdır ve yalnızca e-posta istemcinizi açmaya yöneliktir.
• Yardımcı prosedürler: TextBoxTemizle, ButonlarPasif, ButonlarAktif, TextBoxKilitle, TextBoxAc, ListBoxKilitle, ListBoxAc ve VeriAl form denetimlerini yönetir. ListBox1_DblClick ve UserForm_Initialize listeyi doldurup seçimi yönetir.

Kodda dosya silme işlemi yoktur. Yalnızca sizin onayınızla, sayfadaki seçili kayıt satırı silinir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin, form otomatik olarak gelir.
2. Yeni kayıt için yeni kayıt butonuna basın, alanları doldurup kaydedin.
3. Gezinme butonlarıyla ilk, önceki, sonraki ve son kayda gidin.
4. Değiştirmek için kaydı seçip düzenleme moduna geçin, değeri güncelleyip kaydedin.
5. Silmek için kaydı seçip sil butonuna basın ve onay verin.
6. Formu kapattıysanız Sayfa1 üzerindeki butonla yeniden açın.

Excel'den Access dosyasına kayıt yapmayı öğrenmek isterseniz Excelden Accesse Kayıt Yapma dosyasını inceleyebilirsiniz.