Access'e kayıt yaparken boş hücre hatası

[irfancantr]

Merhaba,

Excelden access'e veri aktarımı yaparken, tanımladığım hücrelerden herhangi bir tanesi boş ise hata veriyor.

Kullandığım kod bu;

Private baglan As Object, rs As Object


Sub baglanti()
Set baglan = CreateObject("adodb.connection")
baglan.Open "provider=microsoft.jet.oledb.4.0;data source=" & ThisWorkbook.Path & "\HESAP.mdb"
End Sub



Private Sub CommandButton1_Click()
HESAP1
MsgBox "Veri Kaydı Tamamlanmıştır..!", vbInformation, "OK"
End Sub

Sub HESAP1()
Call baglanti
Set rs = baglan.Execute("INSERT INTO HESAP1 (TARIH,ADI,AHMET_BAKKAL,CAN_BAKKAL,OYA_BAKKAL,BORA_BAKKAL,MERT_BAKKAL,DURUM_BAKKAL,YORUM_BAKKAL,AHMET_KASAP,CAN_KASAP,OYA_KASAP,BORA_KASAP,MERT_KASAP,DURUM_KASAP,YORUM_KASAP) Values ('" & Now & "','" & Cells(5, 3) & "','" & Cells(8, 3) & "','" & Cells(8, 4) & "','" & Cells(8, 5) & "','" & Cells(8, 6) & "','" & Cells(8, 7) & "','" & Cells(8, 8) & "','" & Cells(8, 9) & "','" & Cells(9, 3) & "','" & Cells(9, 4) & "','" & Cells(9, 5) & "','" & Cells(9, 6) & "','" & Cells(9, 7) & "','" & Cells(9, 8) & "','" & Cells(9, 9) & "')")
Set baglan = Nothing: Set rs = Nothing:

End Sub

Hata mesajı bu;

-2147217913
Ölçüt ifadesinde veri türü uyuşmazlığı..

Bu durumu nasıl aşabilirim? Yardımlarınızı bekliyorum...

Not: Bu hatayı sadece sayısal verilerde alıyorum.Metin tanımlı hücrelerde bir problem görünmedi.

 

[Murat OSMA]

Eklediğiniz verilerin hepsi Metin türünde görünüyor.

Metinsel veriler için;
'" & veri & "'

açıklama: tek tırnak - çift tırnak - & veri & - çift tırnak - tek tırnak


Sayısal veriler için;
" & veri & "

açıklama: çift tırnak & veri & çift tırnak

şeklinde kullanın...


Bu arada, alınan hata boş hücre hatası değil.

 

[irfancantr]

Eklediğiniz verilerin hepsi Metin türünde görünüyor.

Metinsel veriler için;
'" & veri & "'

açıklama: tek tırnak - çift tırnak - & veri & - çift tırnak - tek tırnak


Sayısal veriler için;
" & veri & "

açıklama: çift tırnak & veri & çift tırnak

şeklinde kullanın...


Bu arada, alınan hata boş hücre hatası değil.

Sayın Murat OSMA,

Dediğiniz gibi düzenleyip tekrardan denedim fakat aynı hatayı tekrardan alıyorum, bu sefer tüm hücreler dolu olsa dahi hata verdi.

 

[Murat OSMA]

Insert Into yerine RecordSet kullanmayı deneyin. Daha az sorun yaşarsınız.

 

[irfancantr]

Insert Into yerine RecordSet kullanmayı deneyin. Daha az sorun yaşarsınız.

Bildiğim kadarı ile RecordSet denedim fakat , boş hücre bıraktığımda aynı hatayı alıyorum..

Rica etsem gönderdiğim dosya üzerinden ufak bir örnek veya hazırda farklı bir örnek ekleyebilirseniz sevinirim...

Dünden beri uğraşıyorum ama işin içinden çıkamadım...

 

[irfancantr]

Userform üzerine textboxlar koyarak denediğimde boş bıraktığım textboxlarda hata vermiyor, fakat sayfa üzerinde boş bırakarak kayıt yapmaya çalıştığımda veri türü uyuşmazlığı hatasını alıyorum,

Yardımcı olabilecek arkadaşlara şimdiden teşekkür ederim...