Excel Den Access Tabloya Veri Aktarımı

Ben sadece içeriye aktarım konusunda bir çalışma yaptım. Örneğimi paylaşıyorum.

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ı

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.

Rica ederim
İyi çalışmalar)