Excel den makro ile Access Veritabanına Insert İşlemi

[dfom_2004]

Merhaba,

Access veri tabanıma Excel Vba ekranından ulaşıp insert Query çalıştırmak istiyorum.
Bununla ilgili yardımcı olabilirseniz sevinirim

 

[Taruz]

Merhaba..

Sorunuzu biraz eksik kalmış.. Mevcut excel dosyanız üzerindeki veriyi mi insert edeceksiniz yoksa access içerisindeki bir insert sorguyu excel üzerinden mi çalıştıracaksınız? Örnek bir dosyanız varsa ve eklerseniz daha çok cevap alabilirsiniz..

Ya da;

Gerekli anahtar kelimelerle forum içerisinde arama yaptırırsanız bu konuda fikir alabileceğiniz bir çok çözüme ulaşmış konuya ulaşabilirsiniz..

 

[dfom_2004]

Merhaba tekrar,

Excel dosyası üzerindeki değil vba kod içinde oluşan verileri access e insert edeceğim. Ben Sorunu çözdüm aşağıdaki kod ile. İlgilenen varsa.





REFERANSLARA MICROSOFT ACCESS EKLENICEK.

Sub test()

Dim accapp As Access.Application
Set accapp = CreateObject("Access.Application")
accapp.OpenCurrentDatabase "c:\db.accdb", True
sqltext = "insert into Table1 (field1, field2) values (1,'abc')"

accapp.CurrentDb.Execute ("insert into Table1 (field1, field2) values (1,'abc')")

End Sub

kolay gelsin...