Merhaba,

Veri görünümünde +1000 satır veri olan bir veri görünümünde formum var.
Bu formda filtrelenmiş ya da filrelenmemiş verileri listboxa kopyalamak istiyorum. Aşağıdaki kodlarla ilerliyorum fakat tablodaki verilerin bir kısmını listboxa alıyor.
Örneğin filtrelenmiş formda 1000 satır varsa 325 tanesini alıyor nerde hata olduğunu da bulamıyorum.
Yardımcı olabileceklere teşekkür ederim.

Dim rs As Recordset
Set rs = Me.altform.Form.RecordsetClone
With rs
        .MoveFirst
            While Not .EOF
                Me.lb_seçilenmalzemeler.AddItem (rs.Fields(0).Value & ";" & rs.Fields(1).Value & ";" & rs.Fields(2).Value & ";" & rs.Fields(3).Value & ";" & rs.Fields(4).Value & ";" & rs.Fields(5).Value & ";" & rs.Fields(6).Value)
                .MoveNext
            Wend
        .Close
End With

Set rs = Me.altform.Form.RecordsetClone
sonrasına
rs.movefirst
deyin.

@dsezgin bey,

4.satırda bahsettiğiniz ifade var. değiştirip ekledim, yine düzelmedi.

(11-03-2022, 16:34)sdurg demiş ki: 4.satırda bahsettiğiniz ifade var. değiştirip ekledim, yine düzelmedi.

AddItem ile veriyi combobox'a yüklemektesiniz, sütun veri genişliklerine bağlı olarak en fazla yaklaşık 32737 Uzunluğunda metni rowsource bölümüne kaydediyor. AddItem yerine SELECT .. veya tabloya yükleyip + boşaltma ile veri gösterimi yapılabilir.