• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Excel sorgu çalıştırma

  • Konbuyu başlatan Konbuyu başlatan pasham55
  • Başlangıç tarihi Başlangıç tarihi
Katılım
14 Mart 2009
Mesajlar
1
Excel Vers. ve Dili
2003 türkçe
Access de SQL veritabanına bağladığım tablolara bir sorgu oluşturup yeni bir tablo yaptım. Excell den de bu yeni yaptığım tabloyu veri al ile alıp rapor yaptım. Soru şu ki Access de oluşturduğum sorguyu hergün Access e girip, çalıştırıp tablodaki güncelleştirmeleri yapmasını sağlamam gerekiyor. Hiç accesse girmeden direk excel üzerinden bu sorguyu çalıştırmanın bir yolu varmıdır? teşekkürler
 
slm

farklı yöntemler var..

Kod:
Private CNN As Object
Private RST As Object

Kod:
Sub BAGLAN()
Set CNN = New ADODB.Connection
CNN.CursorLocation = adUseClient
CNN.Open "provider=microsoft.jet.oledb.4.0;data source=" & ThisWorkbook.FullName & _
                                                       ";extended properties=""excel 8.0;hdr=yes"""
End Sub

Kod:
Private Sub CommandButton1_Click()
BAGLAN   
Set RST = CNN.Execute("SELECT bb FROM [DATA$] where bb = 'cc' ")   
Sheets("1").Range("f1").CopyFromRecordset RST  'excel sayfasına yaz
End Sub

Set RST = CNN.Execute("sorgu yazılacak")

Bu sorgulama örneğinde excelde 'data' sayfasından veriler sorgulanıyor...
Burada sayfanının [DATA$] yazılmasına dikkat...!
 
SLM

toll references den ACTİVE X 2.8 denetimi ok olmalı..

Bağlantı.........access..................................
Kod:
   Set CNN = New ADODB.Connection                       
      With CNN                                                  
          .Provider = "Microsoft.Jet.OLEDB.4.0;"
         .ConnectionString = "D:\DATA.MDB"
         .CursorLocation = adUseClient                       
         .Open                                                      
      End With
---------------------------------------
Sorgulama

Kod:
   Set RST = New ADODB.Recordset                                  
   RST.Open SORGU, CNN, adOpenKeyset, adLockOptimistic

SORGU değeri select ile yapılmış sorgu...

Her iki örnektede kotlar yöntemler karma yapılabilir... Yani ilk örnekteki gibi object açılıp, access.MDB bağlantı kurulabilir...Set..Excecute ile acceess için sorgu yapılabilir...

Umarım yeterli olur. sana fikir vermiştir.. bu noktadan hareketle çözeceğini sanıyorum..
 
slm

zaten bunları biliyosun... söylemek istediğim accesde yapılan çalışmaların gibi bir çalışmayı excelde yapmak çözüm olabilir.. direk bir çözüm arıyosan...
excele macro yazdır...

yeni bir macro oluştur..
sonra yaptığın veri al yöntemini uygula...
yaptığın bu uygulamanın macrosunun yazılıp yazılmadığına bakman gerek...
excelin VB macro kot modülüne bak...
kot yazıp yazmadığını incele...
kot yazılı ise aynı kotu bir komut butona kopyala... butona tıklamak aynı macroyu çalıştıracaktır...
 
Geri
Üst