Arkadaşlar merhaba.
Access ile yapmış olduğum uygulamada tbl_ogrenci isimli bir tablo var.
Bu tabloya Excel listesi ile hazırlanmış olan öğrenci listesini form üzerinden ekleyebilir miyim?
Yani dış veri kaynağı olarak bir Excel listesini form üzerinden tabloya toplu bir şekilde aktarabilir miyim?
Access Form Üzerinden Tabloya Veri Ekleme
Merhaba,
İstediğiniz gibi olmuş mu kontrol edermisiniz.
İstediğiniz gibi olmuş mu kontrol edermisiniz.
Hocam öncelikle teşekkür ediyorum. Butona tıkladığımda "Bu eylem bir Dosya Adı değişkeni gerektiriyor" diyor. Neden olabilir?
Butona tıkladığınızda ilgili Excel dosyasını seçmek üzere yeni bir pencere alışması gerekiyor. Bende sorunsuz çalışıyor. Excel dosyasını seçmeden çıktığınızda o uyarıyı almanız gerekiyor. Kodu aşağıdaki şekilde değiştirirmisiniz.
On Error GoTo Err_Komut0_Click
Dim Klasor As String
Klasor = GetOpenFile_CLT("D:\", "Aktarılacak Excel dosyasını seç" & ".xlsx" & ".xls")
DoCmd.TransferSpreadsheet acImport, 8, "tblogrenci", Klasor, True, "a1:d1000000", 0
MsgBox "Aktarım Gerçekleşmiştir.", vbInformation, "Accesstr.net"
Exit_btn_aktar_Click:
Exit Sub
Err_Komut0_Click:
MsgBox "İlgili Excel dosyasını seçmediniz.", vbInformation, "Accesstr.net"
End Sub
Private Sub Komut0_Click()On Error GoTo Err_Komut0_Click
Dim Klasor As String
Klasor = GetOpenFile_CLT("D:\", "Aktarılacak Excel dosyasını seç" & ".xlsx" & ".xls")
DoCmd.TransferSpreadsheet acImport, 8, "tblogrenci", Klasor, True, "a1:d1000000", 0
MsgBox "Aktarım Gerçekleşmiştir.", vbInformation, "Accesstr.net"
Exit_btn_aktar_Click:
Exit Sub
Err_Komut0_Click:
MsgBox "İlgili Excel dosyasını seçmediniz.", vbInformation, "Accesstr.net"
End Sub
Son Düzenleme: 15/01/2020, 16:42, Düzenleyen: tekinuygun.
Tamamdır hocam, çok teşekkür ediyorum problemi çözdüm, emeğinize sağlık.
Konuyu Okuyanlar: 1 Ziyaretçi