sayın @mmert06 aşağıdaki kodları dener misiniz
frm_klasor isimli formun geçerli olduğunda olayına

Private Sub Form_Current()

   Me.Liste11.RowSource = " SELECT tbl_arsiv.arsiv_id, tbl_arsiv.arsiv_adı, tbl_arsiv.arsiv_sahibi, tbl_arsiv.klasor_no, tbl_arsiv.arsiv_kategori" & _

               " FROM tbl_arsiv  ;"



End Sub

liste7'nin tıklandığında olayına da

Private Sub Liste7_Click()

   Dim strSQL As String

 

      strSQL = " SELECT tbl_arsiv.arsiv_id, tbl_arsiv.arsiv_adı, tbl_arsiv.arsiv_sahibi, tbl_arsiv.klasor_no, tbl_arsiv.arsiv_kategori" & _

               " FROM tbl_arsiv  " & _

               " WHERE (((tbl_arsiv.klasor_no)=" & Me.Liste7.Column(1) & "));"

   

   Me.Liste11.RowSource = strSQL



End Sub