22/04/2010, 20:25
22/04/2010, 20:33
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
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
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
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
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