aliriza
Yeni Üye
- Katılım
- 29 Ocak 2024
- Mesajlar
- 13
- Aldığı beğeni
- 7
- Excel V
- Office 2003 TR
Konu Sahibi
Arkadaşlar merhaba
Listbox1 deki verileri dblclick ile listbox2 ye alıyorum. Ekran alındısında da görüldüğü gibi birden fazla şahısı listbox2 ye aldım. Ancak 4. satırdaki ŞAHIS14 ü yanlışlıkla aldığımı farkettim. listbox2 den ŞAHIS14 ü nasıl silebilirim?
Private Sub EVRAKARAMA_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
With EVRAKARAMA
Y = depo.ListCount: X = .ListIndex
If Y = -1 Then Y = 0
depo.AddItem
depo.List(Y, 0) = EVRAKARAMA.List(X, 1)
depo.List(Y, 1) = EVRAKARAMA.List(X, 2)
depo.List(Y, 2) = EVRAKARAMA.List(X, 3)
depo.List(Y, 3) = EVRAKARAMA.List(X, 4)
End With
End Sub
Listbox1 deki verileri dblclick ile listbox2 ye alıyorum. Ekran alındısında da görüldüğü gibi birden fazla şahısı listbox2 ye aldım. Ancak 4. satırdaki ŞAHIS14 ü yanlışlıkla aldığımı farkettim. listbox2 den ŞAHIS14 ü nasıl silebilirim?
Private Sub EVRAKARAMA_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
With EVRAKARAMA
Y = depo.ListCount: X = .ListIndex
If Y = -1 Then Y = 0
depo.AddItem
depo.List(Y, 0) = EVRAKARAMA.List(X, 1)
depo.List(Y, 1) = EVRAKARAMA.List(X, 2)
depo.List(Y, 2) = EVRAKARAMA.List(X, 3)
depo.List(Y, 3) = EVRAKARAMA.List(X, 4)
End With
End Sub