ListBoxta Seçilen Satırın Silinmesi
11 Aralık 2020
11 Aralık 2020
Üstteki gibi verilerimiz var. Bu verileri ListBox'a ekliyoruz.
Bu verilerden silinmesini istediğimiz ismin üzerinde çift tıklamamız sonrasında, o veri sayfadan silinmektedir.
Kodlar şu şekildedir:
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim i As Integer
For i = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(i) = True Then
Sayfa1.Range("A" & ListBox1.ListIndex + 2).EntireRow.Delete
End If
Next
End Sub
Dim i As Integer
For i = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(i) = True Then
Sayfa1.Range("A" & ListBox1.ListIndex + 2).EntireRow.Delete
End If
Next
End Sub
Kodların tamamını dosyamızı indirerek inceleyebilirsiniz.
| YARARLI KISAYOLLAR | |
|---|---|
| Özel Yapıştır Penceresini Açma | Ctrl Alt V |
| Aktif hücrenin içine girme | F2 |
| Bul Penceresini Açma / Alternatif | Shift F5 |
| Kopyala Kısayolu | Ctrl C |
| Çalışma Sayfasının Tümünü Seçme | Ctrl A |