Excel Den Hücre Verisi Alma ?

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
18/01/2020, 12:33

berduş

Artik Çalışmanızı bu konuya ekleyebilirsiniz. Inceleyp çözmeye calisiriz
18/01/2020, 12:34

berduş

(18/01/2020, 12:28)Myalim yazdı: Sorunum veri alacağım Excel de boşluk satırım bulunuyor bunu saymadan sadece dolu satırlardaki verileri nasıl alabiliri
biraz daha açıklar mısınız?
18/01/2020, 12:35

Myalim

[attachment=31229 yazdı:feraz pid='162676' dateline='1579213749']Şimdi  bu kodlar accesse mi excelemi eklenecek ben excele ekliyordum.

Şimdi denedim kodu accesste çalıştırıp hata vermedi.Bende excelde deniyordum
Elinize sağlık.

(18/01/2020, 12:33)berduş yazdı: Artik Çalışmanızı bu konuya ekleyebilirsiniz. Inceleyp çözmeye calisiriz
ekledim efendim[attachment=31229]
18/01/2020, 12:46

berduş

1 - mumkunse açıklamaları dosya içinde yapmayın , konuya yazın
2 - Extended Properties=""Excel 12.0 Excel 12.0 yerine sizinki ile uyumlu sürümü ekleyebilisiniz
18/01/2020, 12:50

Myalim

(18/01/2020, 12:46)berduş yazdı: 1 - mumkunse açıklamaları dosya içinde yapmayın , konuya yazın
2 -  Extended Properties=""Excel 12.0 Excel 12.0 yerine sizinki ile uyumlu sürümü ekleyebilisiniz
Peki hocam kusura bakmayın ama esas istediğim exceldeki boş satırı görmeyim sadece alan üzerindeki veri olan satırları nasıl ekleyebiliriz.
18/01/2020, 13:21

berduş

sSql = "select * from [Sayfa1$]" 
kodunu
sSql = "select * from [Sayfa1$] where f1 Is Not Null"
ile değiştirip deneyebilirsiniz
yada üsttek koda dokunmazsınız
ama değerlerin belirtildiği satırı değiştirirsiniz
degerler = degerler & ", '" & rs.Fields(1) & "'"
yerine
If Len(Nz(rs.Fields(0), "")) > 0 Then degerler = degerler & ", '" & rs.Fields(1) & "'"
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15