22/04/2010, 20:25
excel den access veri aktarma
22/04/2010, 20:33
ogulcan92
Sn:febas
Bir önceki mesajdada belirtiğim gibi 7 nolu mesajı inceleyini.Buyrun Likler aşağıdadır.
1.Örnek Txt Dosyası Kullanımı
Excel Txt Bağlantısı
2.Örnek Access Dosyası Kullanımı
Excel Access Bağlantısı
Bir önceki mesajdada belirtiğim gibi 7 nolu mesajı inceleyini.Buyrun Likler aşağıdadır.
1.Örnek Txt Dosyası Kullanımı
Excel Txt Bağlantısı
2.Örnek Access Dosyası Kullanımı
Excel Access Bağlantısı
22/04/2010, 21:47
febas
sn Oğulcan92
bu örnekte excellden Access aktarma Excel üzerinden yapılmış benim yaptığım şöyle Access de oluşrueduğum forma bir buton ekledim. bu butona tıkladığımda excelldeki verileri tabloya aktarıyor. Bunu ancak excelldeki belirli bir alan için yapabiliyorum.yapmaya çalışdığım şey sütunun sonundaki veriyi kod ile bulsun ve o satura kadar tabloya eklesin.
oluşturduğum sistemde excelldeki veriler sürekli güncellenecek ve satır sayıları değişecek.
buarada excelldeki makroları çalıştırmıypr sanırım bendeki office den kaynaklanıyor.
yardımınız için şimdiden teşekkürler
DoCmd.TransferSpreadsheet transfertype:=acImport, SpreadsheetType:=5, _
tablename:="TOPLUVERI", FileName:=CurrentProject.Path & "\" & "veri.xls", _
Hasfieldnames:=True, Range:="sayfa1!a1:E65536"
bu örnekte excellden Access aktarma Excel üzerinden yapılmış benim yaptığım şöyle Access de oluşrueduğum forma bir buton ekledim. bu butona tıkladığımda excelldeki verileri tabloya aktarıyor. Bunu ancak excelldeki belirli bir alan için yapabiliyorum.yapmaya çalışdığım şey sütunun sonundaki veriyi kod ile bulsun ve o satura kadar tabloya eklesin.
oluşturduğum sistemde excelldeki veriler sürekli güncellenecek ve satır sayıları değişecek.
buarada excelldeki makroları çalıştırmıypr sanırım bendeki office den kaynaklanıyor.
yardımınız için şimdiden teşekkürler
DoCmd.TransferSpreadsheet transfertype:=acImport, SpreadsheetType:=5, _
tablename:="TOPLUVERI", FileName:=CurrentProject.Path & "\" & "veri.xls", _
Hasfieldnames:=True, Range:="sayfa1!a1:E65536"
22/04/2010, 21:56
ercansahin
Neden sizde hata verdiğini anlayamadım. A1:j65536 yazarak ben deniyorum, gayet düzgün çalışıyor.
Düğmenin tıklandığında olayına yazarak denedim.. Excel tablomda da sno, adisoyadi, babaadi alanları var.
Buda denediğim örnek..
Düğmenin tıklandığında olayına
Kod:
Dim Klasor As String
Klasor = CurrentProject.Path & "\deneme.xls"
DoCmd.TransferSpreadsheet acImport, 8, "Tablo1", Klasor, True, "b1:d65000"
Buda denediğim örnek..
22/04/2010, 23:25
febas
kod ile önce tablo oluşturup sonrasında o tabloya verileri atıyordum o kısmı sildim düzeldi. yardımlarınız için çok teşekkür ederim
küçük birşey daha sorabilirmiyim _) bilgiyorum çok acemice sorular ama çok yeniyim bu işte. ilettiğiniz örnekte oromatik uyarı vermeden tabloya veriler ekleniyor ama ben kendi hazırladığımda şimdi 24 satır ekleniyor.. gibi uyarı ardından evete tıklarsam tabloya ekliyor. bu uyarıyı Access kendi veriyor ben herhangi birşey yapmadım özeelikle. bu uyarıları nasıl engelliyebilirim.
küçük birşey daha sorabilirmiyim _) bilgiyorum çok acemice sorular ama çok yeniyim bu işte. ilettiğiniz örnekte oromatik uyarı vermeden tabloya veriler ekleniyor ama ben kendi hazırladığımda şimdi 24 satır ekleniyor.. gibi uyarı ardından evete tıklarsam tabloya ekliyor. bu uyarıyı Access kendi veriyor ben herhangi birşey yapmadım özeelikle. bu uyarıları nasıl engelliyebilirim.
22/04/2010, 23:32
ercansahin
Belirttiğiniz gibi eklediğim örnekte böyle bir mesaj vermiyor. Sizin kodlarınızı görmediğimiz için yorum yapamıyorum. Ancak sistemin verdiği bu tür mesajları engellemek için kullanılmaktadır.
Kod:
DoCmd.SetWarnings False