exceldeki 1 satırı access e sürekli alt alta eklemek

[hakan439]

arkadaslar, raporlama için 1x9 luk bir satır yarattım. bu 1x9 luk satırı makro yardımı ile bir mdb file in icindeki table a göndermek istiyorum. ben her islem yaptıgımda bu belirledigim satır, raporlama için accesse gonderilecek ve son eklenen kaydın hemen altına eklenecek. workshhetlerden birini guncelleyip accesse gonderdigim bir kod mevcut. bu kod uzerınde ekleme yapmayı denedim ama beceremedim. yaptıgım eklemeler mavi renk ile renklendirdim.

satis isimli bir dosya zaten var mesajı veriyor. bunu silmek istemiyorum. içine surekli eklenmesi gerek cunku. tesekkurler


Dim Baglan As Object
Dim Katalog As ADOX.Catalog
Dim Komut As String
Dim Kaynak_Dosya As String
Dim Hedef_Dosya As String


Set Baglan = CreateObject("ADODB.connection")
Kaynak_Dosya = ThisWorkbook.FullName
Hedef_Dosya = "U:\urunler-stok.mdb"
Baglan.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & Kaynak_Dosya & ";" _
& "Extended Properties=""Excel 8.0;HDR=Yes"""

Set Katalog = New ADOX.Catalog
Katalog.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Hedef_Dosya

Komut = "SELECT * INTO [;DATABASE=" & Hedef_Dosya & "].[fatno] FROM [FAT$]"
Komut2 = "SELECT * INTO [;DATABASE=" & Hedef_Dosya & "].[satis] FROM [Satis$]"

On Error Resume Next
Katalog.Tables.Delete "fatno"
On Error GoTo 0
Baglan.Execute Komut
Baglan.Close
Baglan.Execute Komut2

Baglan.Close
Set Baglan = Nothing
Set Katalog = Nothing

 

[hakan439]

arkdasalar yok mu exceldeki table ı mdb dosyasına göndermek içi n bana yardım edecek biri

 

[Ferhat Pazarçevirdi]

Yeni kayıt eklemek için "INSERT INTO" komutunu kullanabilirsiniz. Basit şekliyle kalıp şu şekilde olabilir.

komut=INSERT INTO <veritabanındaki kayıt yapacağın table ismi> VALUES (<Alan1,Alan2,Alan3,Alan4,Alan5,Alan6,Alan7,Alan8,Alan9>)

 

[pebbless]

excel --> access

merhaba bir sorum olcaktı.excel deki verileri,access tablosuna kaydaden programı bilen var mı?yardımcı olursanız sevinirim.örneğinn excel de yazılmıs ad soyad borc değişkenlerini access e kaydeden program.

 

[Ferhat Pazarçevirdi]

Sn.pebbless, söylediğiniz şey mümkün.. Forumda da açıklayıcı bir çok örnek bulunmakta.

Tabi bunun için öncelikle neyi kaydetmek istediğiniz de önemli.. Yani xls dosyanızın yapısı bilinmeli. Aktarılacak kayıtlar genel Veritbanı yapısına uygun olmalı

Örnek bir dosya ekleyerek, yeni bir başlıkta konu açarsanız, yardımcı olunur. Hoşçakalın