Ben sadece içeriye aktarım konusunda bir çalışma yaptım. Örneğimi paylaşıyorum.
Lmnc-Yeni klasör.rar
(Dosya Boyutu: 85,06 KB | İndirme Sayısı: 3)
Excel Den Access Tabloya Veri Aktarımı
Lmnc-Yeni klasör.rar
(Dosya Boyutu: 85,06 KB | İndirme Sayısı: 3)
aşağıdaki kodu dener misiniz?
Not: xDosyaAd = "d:\Desktop\puantaj\EXPORT.XLSX" bu kısma kendi dosyanızın adı yazılmalı
xSayfaAd = "Sheet1" buraya da veri alınacak sayfa adı yazılmalı
Not: xDosyaAd = "d:\Desktop\puantaj\EXPORT.XLSX" bu kısma kendi dosyanızın adı yazılmalı
xSayfaAd = "Sheet1" buraya da veri alınacak sayfa adı yazılmalı
xDosyaAd = "d:\Desktop\puantaj\EXPORT.XLSX"
xSayfaAd = "Sheet1"
xSQL = "INSERT INTO puantaj " & _
"SELECT Xl.* " & _
"FROM [Excel 12.0 Xml;HDR=Yes;Database=" & xDosyaAd & "].[" & xSayfaAd & "$] as XL LEFT JOIN puantaj ON " & _
"(Xl.[Çıkış tarihi] = puantaj.[Çıkış tarihi]) AND " & _
"(puantaj.[Tren No] =clng(Xl.[Tren No])) AND " & _
"(clng(Xl.[Personel numarası]) = puantaj.[Personel numarası]) " & _
"WHERE (((puantaj.[Personel numarası]) Is Null) AND ((puantaj.[Tren No]) Is Null) AND ((puantaj.[Çıkış tarihi]) Is Null));"
CurrentDb.Execute xSQL
Konuyu cevaplanmış sorular bölümüne taşıyabiliriz.
Lemoncher2 ve Berduş üyelerimiz kucak dolusu teşekkür ediyorum.
Saygılar.
Lemoncher2 ve Berduş üyelerimiz kucak dolusu teşekkür ediyorum.
Saygılar.
Konuyu Okuyanlar: 1 Ziyaretçi
