Ado ile SQL bağlantısı ve sorguda tarihi bir hücreye eş

[bezl]

aşağıdaki gibi 1. sayfadaki A1 hücresindeki tarihi TARIH'e eşitlemeye çalışıyorum ama hata veriyor. Bu konuda yardımcı olabilecek var mı?

WHERE (dbo.TBLCAHAR.TARIH = #" & CDate(Sheets(1).Range("A1")) & "#)

 

[ALPEN]

[vb:1:a039724e22]WHERE (dbo.TBLCAHAR.TARIH = & "#" & CDate(Sheets(1).Range("A1")) & "#"&)[/vb:1:a039724e22]

Not: denemedim.

 

[bezl]

syntax error veriyor

 

[bezl]

A1 hücresinde today() formülünü kullanıyorum. Koda uysun diye

=TEXT(TODAY();"gg.a.YYYY")

veya

=(TODAY()

şekillerinde denedim olmadı.

 

[ALPEN]

Dosyanın sadece problemli olan bölümünü alabilir miyim?

 

[bezl]

dediğim gibi A1 hücresinde =today() varken daha önce kod

WHERE (dbo.TBLCAHAR.TARIH = Left(GETDATE(), 11)))

idi ben bunu bu hücreyi değişken olarak vereyim istiyorum çok denedim sizin verdiğiniz

WHERE (dbo.TBLCAHAR.TARIH = & "#" & CDate(Sheets(1).Range("A1")) & "#"&)

kodunu da denedim olmadı.

 

[bezl]

Bu konuda yardımcı olabilecek var mı?

 

[lsuersoy]

Sorunu çözmüş iseniz

Aşağıdaki link de belirttiğim soruna yardımcı olabilirmisiniz....

http://www.excel.web.tr/showthread.php?p=246300#post246300