Selamun Aleykum
.db uzantılı bir veritabanından excel'e bir veri yapıştırdığımda bazı kutucuklara veri yapışmıyor ve [INVALID_DATA] yazıyor. Bu sıkıntıyı nasıl çözebilirim.
Teşekkürler...

eklediğiniz dosya VB.Net dersleri
kendi dosynızı ekler misiniz?

(01/04/2021, 23:08)berduş yazdı: eklediğiniz dosya VB.Net dersleri
kendi dosynızı ekler misiniz?

Teşekkür ederim.

Veritabanını göndereyim. Buradan ilk 20 kaydı Excel e yapıştırmayı deneyebilirsiniz mesela.

siz db dosyanızı nasıl açıyorsunuz?

emin değilim ama anladığım kadarıyla: eğer metinde yeni paragrafa başlama işareti varsa Excel onu yeni satır olarak ekleyemediğinden hata veriyor.
kayıttaki bu değerleri yeni paragraf ekleme işaretlerini kaldırınca sorunsuz ekliyor

Sqlite için alttaki kod çalışıyor örnek olarak.

Private Sub CommandButton1_Click()



    Dim con As Object, rs As Object

    

    Set con = CreateObject("ADODB.Connection")

    Set rs = CreateObject("ADODB.Recordset")

    

    con.Open "DRIVER=SQLite3 ODBC Driver;Database=" & ThisWorkbook.Path & "\prod.db;"

    

    strSQL = "SELECT  _id,fasil,konu from hadisler "

    

    rs.Open strSQL, con, 1, 1

    

    With Sheets("Sayfa1")

        .Cells.ClearContents

        .Range("A1").CopyFromRecordset rs

    End With

    rs.Close

    con.Close

    Set rs = Nothing: Set con = Nothing

End Sub

---

SELECT * from hadisler

yukardaki gibi yapınca Excel donuyor.