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 | |
|---|---|
| VB Penceresini Açmak | Alt F11 |
| Sayfa Sonları Ekleme | Alt P O E |
| Hücreleri biçimlendirme ekranını açma | Ctrl 1 |
| Ad Yöneticisi Penceresini Açma | Ctrl F3 |
| Yazdırma Alanı Belirlemek | Alt P M B |