Merhaba Arkadaşlar
Kod bölümünde Veritabanı ile aşağıdaki gibi bağlantı kurduktan sonra
With ActiveSheet.QueryTables.Add(Connection:= _
"ODBC;DSN=" + Sheets("Ayarlar").Range("B1") + ";UID=SYSDBA;PWD=masterkey;" _
, Destination:=Range("A5"), _
Sql:=sSql)
sonuc A5 hucresinden başlayarak listeleniyor.
Yalnız Her yenile dediğimde soru yana doğru tekrar listelenerek gittiği için ben de şu satırı ekledim
ActiveSheet.Application.Cells.Clear
tum hucreleri sildiriyorum.
İstediğim şu olacak
A1=Baglantım
A2=01.01.2006
B2=10.10.2006
gibi filitre yazıp bu hucreleri de sql cumlesinde filitre olarak kullanmak istiyorum ama
ActiveSheet.Application.Cells.Clear bu satırdan dolayı sql de işleme girmiyor bu hucreler.
Kısaca yapmak istediğim. A5 hucresinin ustundeki hucrelere filitre değerlerini yazıp onlarıda kod bolumunde yazdığım SQL cumlesinde filitre olarak kullanmak..
2. Sorumda Sayfa1 bir Formlar arac çubugundan bir tane açılır kutu eklesem bunu SQL ile içerisine nasıl bilgi doldurabilirim.
Teşekkürler
Kod bölümünde Veritabanı ile aşağıdaki gibi bağlantı kurduktan sonra
With ActiveSheet.QueryTables.Add(Connection:= _
"ODBC;DSN=" + Sheets("Ayarlar").Range("B1") + ";UID=SYSDBA;PWD=masterkey;" _
, Destination:=Range("A5"), _
Sql:=sSql)
sonuc A5 hucresinden başlayarak listeleniyor.
Yalnız Her yenile dediğimde soru yana doğru tekrar listelenerek gittiği için ben de şu satırı ekledim
ActiveSheet.Application.Cells.Clear
tum hucreleri sildiriyorum.
İstediğim şu olacak
A1=Baglantım
A2=01.01.2006
B2=10.10.2006
gibi filitre yazıp bu hucreleri de sql cumlesinde filitre olarak kullanmak istiyorum ama
ActiveSheet.Application.Cells.Clear bu satırdan dolayı sql de işleme girmiyor bu hucreler.
Kısaca yapmak istediğim. A5 hucresinin ustundeki hucrelere filitre değerlerini yazıp onlarıda kod bolumunde yazdığım SQL cumlesinde filitre olarak kullanmak..
2. Sorumda Sayfa1 bir Formlar arac çubugundan bir tane açılır kutu eklesem bunu SQL ile içerisine nasıl bilgi doldurabilirim.
Teşekkürler