AccessTr.neT
Excelden Accese Veri Atarken Boş Hücreyi Atlama - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Excelden Accese Veri Atarken Boş Hücreyi Atlama (/konu-excelden-accese-veri-atarken-bos-hucreyi-atlama.html)



Excelden Accese Veri Atarken Boş Hücreyi Atlama - yakanic - 17/09/2022

merhaba arkadaşlar aşağıdaki kodala excelden accese veri yolluyorum ama bazen hücreler boş kalabilior o zamanda hata veriyor illaki hücreleri doldurmam gerekiyor hücre boşsa onu atla şeklinde bir şey yapmak mümkün mü ?
teşekkürler.

Kod:
strqry = "Insert into adres(isim,BABA_ADI,ANA_ADI) VALUES ('" + Hcr.Text + "','" + Hcr.Offset(0, 2).Text + "','" + Hcr.Offset(0, 3).Text + "')"
con.Execute strqry




RE: Excelden Accese Veri Atarken Boş Hücreyi Atlama - berduş - 17/09/2022

ilgili alan boş ise NULL yazarak denenebilir
tabi örneğiniz olmadığı için deneme imkanım olmadı ama kabaca aşağıdkine benzer bir kod kullanılabilir
iif(len(alan)=0,null, değer) mantığı kullanılmıştır
strqry = "Insert into adres(isim,BABA_ADI,ANA_ADI) VALUES (" & iif(len(Hcr.Text)=0,"Null", "'" & Hcr.Text & "'") & "," 
& iif(len( Hcr.Offset(0, 2).Text )=0,"Null","'" & Hcr.Offset(0, 2).Text  & "'") &  "," & iif(len( Hcr.Offset(0, 3).Text )=0,"Null","'" & Hcr.Offset(0, 3).Text  & "'" ) &  ")"
con.Execute strqry



RE: Excelden Accese Veri Atarken Boş Hücreyi Atlama - yakanic - 17/09/2022

(17/09/2022, 14:30)berduş yazdı: ilgili alan boş ise NULL yazarak denenebilir
tabi örneğiniz olmadığı için deneme imkanım olmadı ama kabaca aşağıdkine benzer bir kod kullanılabilir
iif(len(alan)=0,null, değer) mantığı kullanılmıştır
strqry = "Insert into adres(isim,BABA_ADI,ANA_ADI) VALUES (" & iif(len(Hcr.Text)=0,"Null", "'" & Hcr.Text & "'") & "," 
& iif(len( Hcr.Offset(0, 2).Text )=0,"Null","'" &  Hcr.Offset(0, 2).Text  & "'") &  "," & iif(len( Hcr.Offset(0, 3).Text )=0,"Null","'" &  Hcr.Offset(0, 3).Text  & "'" ) &  ")"
con.Execute strqry

teşekkürler elinize sağlık.


RE: Excelden Accese Veri Atarken Boş Hücreyi Atlama - berduş - 17/09/2022

sorunsuz çalıştı mı?
cevaplanmışlara taşıyalım mı?


RE: Excelden Accese Veri Atarken Boş Hücreyi Atlama - yakanic - 17/09/2022

(17/09/2022, 16:28)berduş yazdı: sorunsuz çalıştı mı?
cevaplanmışlara taşıyalım mı?

evet sorunsuz çalişti teşekkürler.


RE: Excelden Accese Veri Atarken Boş Hücreyi Atlama - berduş - 17/09/2022

rica ederim
iyi çalışmalar
Not: Lütfen sorularınıza her zaman örnek dosya ekleyiniz