kriterleri exceldeki sql sorgusu

[igmox]

slm,
kriterleri excel hanelerinde bulunan bir sql sorgu yapmaya çalışıyorum fakat ms query de yapamıyorum.
örneğin sorgu:

Select * from islemler WHERE miktar>50 AND (tarih BETWEEN '2007-01-01' AND '2007-12-31')

örnekteki 50, 2007-01-01 ve 2007-12-31 kriterlerini excel hanelerine girip bu hanelerdeki verilere göre sql serverdan isteyecek bir sorgu excelde nasıl yapılabilir ?

teşekkürler

 

[Zeki Gürsoy]

Select * from islemler WHERE miktar>[COLOR=red]50[/COLOR] AND (tarih BETWEEN " & Clng(CDate([a1])) & " AND " & Clng(CDate([a2])) & ")"

 

[Ferhat Pazarçevirdi]

Merhabalar

A1, A2 ve A3'ün sırasıyla belirttiğiniz değerleri taşıyan hücreler olduğu kabulüyle, aşağıdaki kodu kullanabilirsiniz

Miktar = Cells(1, 1)
BaslangicTarihi = Year(Cells(2, 1)) & "-" & Format(Month(Cells(2, 1)), "00") & "-" & Format(Day(Cells(2, 1)), "00")
BitisTarihi = Year(Cells(3, 1)) & "-" & Format(Month(Cells(3, 1)), "00") & "-" & Format(Day(Cells(3, 1)), "00")
SQLString = "SELECT * from islemler WHERE miktar>" & Miktar & " AND (tarih BETWEEN '" & BaslangicTarihi & "' AND '" & BitisTarihi

 

[igmox]

hocam server bağlantısını nasıl yapacağım ?

 

[conari]

Sub insertSQL()
Dim cnn As ADODB.Connection
Dim cmdCommand As ADODB.Command
Dim vtSql
Dim say%
    Set cnn = New ADODB.Connection
    cnn.Open "driver={SQL Server};server=SERVER;uid=USERIM;pwd=SIFREM;database=MYDATABASE"
   
    Set cmdCommand = New ADODB.Command
    Set cmdCommand.ActiveConnection = cnn

Bağlanırsın

 cnn.Close
    Set cmdCommand = Nothing
    Set cnn = Nothing
    
End Sub

bitirsiniz.

 

[igmox]

teşekkürler hocam, OLE DB, Jet, ADODB.. bu konularda bayağı araştırma yapmam lazım anlaşılan