11/01/2023, 20:41
Sayfalar: 1 2
11/01/2023, 21:03
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
12/01/2023, 10:20
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.
12/01/2023, 10:56
Rica ederim
İyi çalışmalar)
İyi çalışmalar)
Sayfalar: 1 2