Excelden Veri Alma Ve Kaydı Güncelleme

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
04/02/2020, 23:25

feraz

Videoyu tam izlemedim 1.ci dakikadan itibaren başlıyor anlattıklarım.

https://youtu.be/ixFPTHm-s-Y
04/02/2020, 23:35

berduş

Konuyu tekrar sorulara taşıdım, dosya ekleyebilirsiniz.
Sayın @yahyamacit benim gönderdiğim çalışmadaki-hızlı yöntem kodlari- yanlış sonuçlar mi veriyor?

2 dosyayı da şimdi tekrar inceledim ve kast ettiğinizi şeyi anladım ama şöyle bir sorun var diyelim ki rasgele 5 kaydın sadece KOD kısmını değiştirip A5 yaptım
yani aynı A5 koduna fakat farklı/aynı değerlere sahip 5 kaydımız oldu.
eski sistemde excelde tek A5 kaydı olduğundan accessteki 5 kaydı da exceldeki A5 kaydına dönüştürüyor
son kullandığım kodda ise bu 5 tane A5 kaydı silinip exceldeki tek A5e çevriliyor

kodları incelediğim kadarıyla [Kod] sütunundaki değerlerin benzersiz olması gerekmiyor mu bir nevi kimlik gibi.
05/02/2020, 13:28

feraz

Benzersizliği bilmiyorumda A5 varsa değişecek
05/02/2020, 14:12

berduş

 If DCount("[kod]", "Tablo1", "[kod] = '" & rs(0) & "'") > 0 Then 

CurrentDb.Execute _
"UPDATE Tablo1 SET [kod] = '" & rs(0) & "'," & _
"[ad] = '" & rs(1) & "'," & _
"[yas] = '" & rs(2) & "'," & _
"[Tarih] = '" & rs(1) & "'" & _
"WHERE [kod] = '" & rs(0) & "'"
yukardaki koda dikkat ederseniz Access tablosundaki tüm A5 li kayıtlar aynı değere güncelleniyor. excelde 5 tane A5li kayıt olsa bile accessteki tüm A5li kayıtlar exceldeki son A5li kaydın değerini alacak demek olur. Çünkü rs recordseti exceldeki tüm kayıtlar içinde sırayla dolaşır. dolayısıyla son A5 değerini accessteki tüm A5lere atar. yani Kod sütunu benzersiz olmalı hem excelde hem Accesste. Bu açıdan bakarsanız son yöntem -dosyadaki hızlı yöntemi- hem daha hızlı hem daha uygun gibi.
05/02/2020, 21:41

yahyamacit

Yaptığım çalışmanın son şekli bu şekilde. İncelerseniz sevinirim. Excel dosyasındaki mükerrer kaydı oluşturmadım. Aslında iyi olurdu. Yorumlarınız.
05/02/2020, 22:24

feraz

B2 den itibaren aynı veri girmeye çalışın fark edersiniz.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19