- Katılım
- 1 Mart 2005
- Mesajlar
- 22,254
- Excel Vers. ve Dili
-
Win7 Home Basic TR 64 Bit
Ofis-2010-TR 32 Bit
Merhaba ben bir tane silme amaçlı bir buton oluşturdum.Aşağıdaki kodlar oluştu.Ama ilk kaydı siliyor.Ben ise listboxta seçili satırdaki kaydı silmek istiyoru.
Idno listboxta ilk sütunda bulunuyor.
Idno listboxta ilk sütunda bulunuyor.
Kod:
Private Sub Sil_Click()
On Error GoTo Err_Sil_Click
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Exit_Sil_Click:
Exit Sub
Err_Sil_Click:
MsgBox Err.Description
Resume Exit_Sil_Click
End Sub