+- 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ığı: Excel'den Access'e Butonla Veri Aktarma (/konu-excel-den-access-e-butonla-veri-aktarma.html)
Sayfalar:
1
2
Excel'den Access'e Butonla Veri Aktarma - prestij06 - 07/12/2017
Merhaba ustalar. Ekte projemle beraber Excel dosyası da var. Projemde bulunan "Excelden Aktar" butonuna tıkladığında ekteki Excel dosyasındaki verileri Access projeme aktarmasını istiyorum. Aktardıktan sonra ne kadar veri aktarmışsa örneğin "5 kayıt başarıyla aktarıldı" şeklinde mesaj gösterirse ve excelden aktarılan verinin aynısı veritabanında varsa "Kayıtlar Mevcut Üzerine Yazılsın Mı?" şeklinde uyarırsa çok iyi olur. Çok uğraştım yapamadım. Yardımcı olursanız çok sevinirim. Şimdiden çok tşkler.
Cvp: Excel'den Access'e Butonla Veri Aktarma - ozanakkaya - 08/12/2017
İnceleyip olumlu/olumsuz bildirimde bulununuz.
Ayrıca, bu zamana kadar cevap alamamanızın sebebini özel mesaj ile belirttim.
Cvp: Excel'den Access'e Butonla Veri Aktarma - prestij06 - 08/12/2017
Hocam elinize sağlık tam istediğim gibi olmuş. Yalnız Giriş Tarihi, Çıkış Tarihi ve Barınma verilerini almıyor?
Cvp: Excel'den Access'e Butonla Veri Aktarma - ozanakkaya - 08/12/2017
Merhaba,
Örnekte diğer verileri aldıran kod mevcut,
DoCmd.RunSQL "INSERT INTO DEFTER_KAYIT ( yil, [KAYIT NO], [KONUNUN ÖZETİ], KAYIT_TARIHI, SAYISI, geldigiyer ) SELECT TOP 1 tbl_Gecici.[KAYIT YILI], tbl_Gecici.[KAYIT SAYISI], tbl_Gecici.[ADI SOYADI], tbl_Gecici.[KAYIT TARİHİ], tbl_Gecici.[TC NO], tbl_Gecici.[İŞYERİ ADI] FROM tbl_Gecici WHERE tbl_Gecici.[KAYIT YILI]=" & GYili & " AND [KAYIT SAYISI]=" & GKayitSayi & ""Alınmasını istediğiniz diğer alanları kendiniz ekleyiniz.
Cvp: Cvp: Excel'den Access'e Butonla Veri Aktarma - prestij06 - 08/12/2017
(08/12/2017, 16:05)ozanakkaya yazdı: Merhaba,
Örnekte diğer verileri aldıran kod mevcut,
DoCmd.RunSQL "INSERT INTO DEFTER_KAYIT ( yil, [KAYIT NO], [KONUNUN ÖZETİ], KAYIT_TARIHI, SAYISI, geldigiyer ) SELECT TOP 1 tbl_Gecici.[KAYIT YILI], tbl_Gecici.[KAYIT SAYISI], tbl_Gecici.[ADI SOYADI], tbl_Gecici.[KAYIT TARİHİ], tbl_Gecici.[TC NO], tbl_Gecici.[İŞYERİ ADI] FROM tbl_Gecici WHERE tbl_Gecici.[KAYIT YILI]=" & GYili & " AND [KAYIT SAYISI]=" & GKayitSayi & ""
Alınmasını istediğiniz diğer alanları kendiniz ekleyiniz.
Hocam kendi istediğim alanları kendim ekledim ama ana tablo olan DEFTER_KAYIT tablosuna atmıyor. Geçici tabloya atıyor.
Cvp: Excel'den Access'e Butonla Veri Aktarma - ozanakkaya - 08/12/2017
Merhaba,
Eklediğiniz örnekteki kodda 2 problem var.
1-) from kodundan önce virgül olmamalı, belirlenen alanlar yazıldıktan sonra virgül eklenmez
2-) BARINIYORMU şeklinde alan eklemişsiniz. Ancak geçici tablodaki alanın adı [BARINI YORMU] şeklinde
kodun düzgün hali:
DoCmd.RunSQL "INSERT INTO DEFTER_KAYIT ( yil, [KAYIT NO], [KONUNUN ÖZETİ], KAYIT_TARIHI, SAYISI, geldigiyer, [TARİH], [ALINDIĞI TARİH], barinma ) SELECT TOP 1 [KAYIT YILI], [KAYIT SAYISI], [ADI SOYADI], [KAYIT TARİHİ], [TC NO], [İŞYERİ ADI], [GİRİŞ TARİHİ], [ÇIKIŞ TARİHİ], [BARINI YORMU] FROM tbl_Gecici WHERE [KAYIT YILI]=" & GYili & " AND [KAYIT SAYISI]=" & GKayitSayi & ""