ListView Üzerinde Seçilen Veriyi Düzenleme isimli içerikte, ilgili işlemlerin nasıl yapılacağı detaylıca ele alınmaktadır.
UserForm ve ListView Nesnelerini Hazırlama
Öncelikle, daha önce oluşturduğunuz UserForm ve ListView nesnelerinin mevcut olduğundan emin olun. Eğer henüz oluşturmadıysanız, bir UserForm ekleyin ve ListView nesnesini Toolbox'tan seçerek UserForm üzerine yerleştirin.Düzenleme İşlevini Ekleyin
ListView'deki verileri düzenlemek için üç TextBox (Metin Kutusu) ve bir CommandButton (Komut Düğmesi) ekleyeceğiz. Kullanıcı, TextBox'lara düzenlemek istediği yeni değerleri girecek ve CommandButton'a tıklayarak seçili öğeyi güncelleyecek.Adımlar:
- UserForm üzerine üç TextBox (Metin Kutusu) ve bir CommandButton (Komut Düğmesi) ekleyin.
- TextBox'ları sırasıyla "Ad", "Yaş" ve "Şehir" verilerini düzenlemek için kullanacağız.
- CommandButton'un adını "Güncelle" olarak değiştirin.
- CommandButton'a çift tıklayın ve aşağıdaki VBA kodunu ekleyin:
VBA Kodu:
VBA:
Private Sub CommandButton1_Click()
Dim itm As ListItem
' Seçili öğeyi kontrol et
If ListView1.SelectedItems.Count = 0 Then
MsgBox "Lütfen düzenlemek için bir öğe seçin."
Exit Sub
End If
' Seçili öğeyi al
Set itm = ListView1.SelectedItems(1)
' TextBox'lardan yeni verileri al ve ListView'deki öğeyi güncelle
itm.Text = TextBox1.Value
itm.SubItems(1) = TextBox2.Value
itm.SubItems(2) = TextBox3.Value
End SubUserForm'u Çalıştırma
Oluşturduğunuz UserForm'u çalıştırmak için VBA geliştirme ortamında aşağıdaki kodu kullanabilirsiniz. Bu kod, UserForm'u görüntüler ve ListView'e verilerin eklenmesini sağlar.VBA Kodu:
VBA:
Sub ShowUserForm()
UserForm1.Show
End SubSonuç
Bu adımları izleyerek, ListView nesnesinde seçilen bir veriyi düzenleme ve güncelleme işlevini ekleyebilirsiniz. Bu yöntem, kullanıcıların ListView'deki verileri kolayca güncellemelerini sağlar ve verilerin doğru ve güncel kalmasını sağlar.
ListView ile Filtreleme ve Arama İşlemi
2024-05-16
ListView Üzerindeki Veriyi Silme
2024-05-16
