• FORUMU MOBİL UYGULAMADAN TAKİP EDİN

    Forumu isteyen üyelerimiz Tapatalk (Harici bir hizmet) üzerinden mobil uygulamadan takip edebilirler.
    iOS için : https://itunes.apple.com/app/id307880732?mt=8
    Android için : https://play.google.com/store/apps/details?id=com.quoord.tapatalkpro.activity
    adreslerinden indirebilirsiniz.

    Bir iki haftaya da foruma özel kendi uygulamamız yayında olacak.
ALTIN ÜYELİK Hakkında Bilgi
-----------------------

SQL'den Excel'e Veri Çekme

Katılım
12 Kasım 2009
Mesajlar
50
Beğeniler
0
Excel Vers. ve Dili
2013
Türkçe
#1
Merhaba,
Excel'de aşağıdaki kodu kullanarak SQL'den verileri excel'e aktarıyorum ancak yapmak istediğim kodu hiç değiştirmeden bir buton yardımıyla koddaki tarih aralığını belirleyip öyle kodu çekmem mümkün mü?

Kod:
SELECT TOP 2000 [PrimaryObjectName],
      [MessageUTC]
      ,[SecondaryObjectName]   
FROM [SWHSystemJournal].[dbo].[JournalLog]
where SecondaryObjectName like '%tur%' and MessageUTC between '2018-06-25 00:00:00' and '2018-07-01 23:59:00'
 

merakli_72

Destek Ekibi
Destek Ekibi
Katılım
24 Temmuz 2007
Mesajlar
728
Beğeniler
0
Excel Vers. ve Dili
Excel 2010 tr
#2
Selam;
Tr1="2018-06-25 00:00:00"
Tr2="2018-07-01 23:59:00"
.......
where SecondaryObjectName like '%tur%' and MessageUTC between '" & Tr1 &"' and '" & Tr2 &"'"
şeklinde denermisiniz
 

merakli_72

Destek Ekibi
Destek Ekibi
Katılım
24 Temmuz 2007
Mesajlar
728
Beğeniler
0
Excel Vers. ve Dili
Excel 2010 tr
#4
hatayı göremiyorum,
tırnak işaretlerinde problem olabilir mi?
 
Katılım
12 Kasım 2009
Mesajlar
50
Beğeniler
0
Excel Vers. ve Dili
2013
Türkçe
#5
Aşağıdakileri herhangi 2 satıra yapıştırmam yeterli mi? Yoksa başka bir işlem mi yapmam gerekiyor?
Tr1="2018-06-25 00:00:00"
Tr2="2018-07-01 23:59:00"
 

merakli_72

Destek Ekibi
Destek Ekibi
Katılım
24 Temmuz 2007
Mesajlar
728
Beğeniler
0
Excel Vers. ve Dili
Excel 2010 tr
#6
Where satırında da tarihler yerine değişkenleri yazmanız gerekir
 
Katılım
31 Aralık 2005
Mesajlar
3,606
Beğeniler
46
Excel Vers. ve Dili
Office 2016 (64 bit) - Türkçe
#7
Önerilen değişken değerleri ADO & VBA kodu gerektirir. Anladığım kadarıyla Excelin "dış veri" özelliğini kullanacaksınız.
Microsoft query ile dış veri alarak editörde kısıt kısmına köşeli parantez [] yazıp parametre özelliği açılır. Nasıl yapıldığı konusunu buradan tarif etmek de biraz zor.
 
Katılım
17 Nisan 2007
Mesajlar
319
Beğeniler
0
Excel Vers. ve Dili
Office 2013 Türkçe
#9
verdiği hata tırnak işareti ile ilgili bir hata

SELECT TOP 2000 [PrimaryObjectName],
[MessageUTC]
,[SecondaryObjectName]
FROM [SWHSystemJournal].[dbo].[JournalLog]
Tr1="2018-06-25 00:00:00"
Tr2="2018-07-01 23:59:00"
where SecondaryObjectName like '%tur%' and MessageUTC between ' "& Tr1 &" ' and ' " & Tr2 &" '

bu şekilde denermisiniz...
 
Katılım
12 Aralık 2015
Mesajlar
652
Beğeniler
19
Excel Vers. ve Dili
Ofis 2007
#10
CommandText'i, ancak makro ile değişken yapabilirsiniz.F1 ve F2 hücrelerini metin olarak biçimlendirin ve hücrelere tarihleri 2018-06-25 00:00:00 şeklinde girin F3'e ise adı veya adın bir kısmını girin makroyu çalıştırın
Kod:
Sub Makro2()
    With Range("A1").ListObject.QueryTable
        .CommandText = Array( _
        "Select PrimaryObjectName, MessageUTC, SecondaryObjectName from JournalLog where SecondaryObjectName like '%" & Range("f3") & "%' an" _
        , "d MessageUTC between '" & Range("f1") & "' And '" & Range("f2") & "'")
        .Refresh BackgroundQuery:=False
    End With
End Sub
 
Üst