Kapalı Doyadan veri alma sorunu

[ikikan]

Kolay gelsin arkadaşlar benmi bir hata yapıyorum? kapalı bir dosyadan içinde sayısal ve metinsel verileri olan
100 sütun 450 satırlık bir tablodan veri çekiyorum faka IMEX=1 yazmama rağmen sayıları metin olarak çekmiyor
ne yapmamlazım?


Data.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & D_Yolu & ";Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"";"
Tablpen "Select * from [" & S_Adi & "$]", Data
ws2.Range("A2").CopyFromRecordset Tablo


https://www.dosyaupload.com/6if7

 

[ikikan]

Haluk Bey kızıyor konuyu ilgili linke taşıdım https://www.excel.web.tr/threads/kapali-doyadan-veri-alma-sorunu.180147/

Ancak çözüm şu oldu
ADO RecorSet'te ilk 8 veriye bakıldığından "Haluk Beye Teşekkürler"
Başlıkları Metin yapıp HDR=No ; IMEX=1 yapınca tüm veriler metin olarak geliyor .

ilgilendiğiniz için size de teşekkürler Feraz Arkadaşım.