Birde excele almak istedim sqlite veritabanından bağlnantı hatası var galiba nasıl çözülecek.Anlıyorsunuz diye konu açmadan size danışayım dedim.
Private Sub CommandButton1_Click()
Dim conn As Object, rst As Object
Set conn = CreateObject("ADODB.Connection")
Set rst = CreateObject("ADODB.Recordset")
conn.Open "DRIVER=SQLite3 ODBC Driver;Database=" & ThisWorkbook.Path & "\ee.db;"
strSQL = "SELECT * from tbltest;"
rst.Open strSQL, conn, 1, 1
Sheets("Sayfa1").Cells.Clear
Sheets("Sayfa1").Range("A1").CopyFromRecordset rst
rst.Close
conn.Close
Set rst = Nothing: Set conn = Nothing
End Sub
Sn. @
feraz Kelin merhemi olsa başına sürermiş.
(16/05/2020, 04:41)accessman yazdı: [ -> ]Sn. @feraz Kelin merhemi olsa başına sürermiş.
Yazılarınızda sqlite veritabanı kullanıyorum diyordunuz o yüzden yazmıştım.Neyse bakayım biraz.Olmazsa bende bir konu açayım.
Odbc üzerinden sihirbazla
Access e bağlıyorum
Excel bana zor geliyor
(16/05/2020, 15:17)accessman yazdı: [ -> ]Odbc üzerinden sihirbazla Access e bağlıyorum
Excel bana zor geliyor
Bende öyle yayıp çıkan bağlantıyı almayı planlıyordum.Deneyeceğim sonucu yazarım.Sqlite kullanacağımdan değilde iş olsun
Biraz baktım
ODBC de sqlite bağlantısı çıkmıyor.
(16/05/2020, 15:17)accessman yazdı: [ -> ]Odbc üzerinden sihirbazla Access e bağlıyorum
Excel bana zor geliyor
Biraz uğraşınca sqliteye excelden bağlanmayıda buldum.Bir küçük exe yükleniyor.Sonra sqlite veri tabanından veri çekiliyor yani menüde bağlantıda çıkıyor ado için daha bakamadım.
https://menne-biomed.de/blog/sqlite-excel