Sorgu için arama sonuçları: sorgu tarih

yusuf bey hata veriyor özellikle , Set con = VBA.CreateObject("adodb.Connection") con.Open "provider=microsoft.ace.oledb.12.0;data source=" & _ ThisWorkbook.FullName & ";extended properties=""Excel 12.0;hdr=yes""" sorgu = "select İsim,Tarih,Çeşit,Kğ,f,Tescil,T_İsmi,Tutar,Bakiye,G_Bakiye from...

Initialize kodlarını aşağıdakiyle değiştirince not sütunu hariç diğer sütunları listeliyor ama not sütununu da ekleyince kodlar söz dizimi hatası veriyor, nedenini çözemedim: Private Sub UserForm_Initialize() Dim sonhb, sonV, i, h As Long, s1 As Worksheet, son As Integer, con, sorgu, rs sonV =...

Arkadaşlar merhaba, logo kullanıcısıyım ,excelde sql bağlantılı cari hesap ekstresi almak istiyorum belirticeğim cari kod ve tarih aralığına göre aşağıdaki sonuçları döndürecek sql sorgusuna ihtiyacım var...yardımcı olabilecek arkadaşa şimdiden sonsuz teşekkürler not: 1-cari kod ve tarih aralığı...

Bu türden sorularda örnek dosya çok önemlidir, muhtemelen şimdiye kadar cevap almamanızın nedeni de dosya paylaşmamış olmanızdır. Dosya olmadığı için kodları deneyemedim. Siz deneyin: Sub RAPORLAMA() Set s1 = Sheets("PLAN") Set s2 = Sheets("URT RAPORU") son = s1.Cells(Rows.Count...

Sub RAPORLAMA() Set s1 = Sheets("PLAN") Set s2 = Sheets("URT RAPORU") son = s1.Cells(Rows.Count, "E").End(3).Row eski = WorksheetFunction.Max(9, s2.Cells(Rows.Count, "D").End(3).Row) sonsut = s1.Cells(2, Columns.Count).End(xlToLeft).Column s2.Range("D9:J" & eski).ClearContents If s2.[L6] = ""...

Tam anladığımdan emin değilim ancak aşağıdaki kodları bir modüle kopyalayıp deneyin:. Kodun düzgün çalışmaması için veri sayfasında C sütununda örneğinizdeki gibi boş hücrelerde tarih verisi olmamalıdır. Kod C sütunundaki tarihlere göre işlem yapmaktadır. Eğer o sütunda boş görünen hücrelerde...

@YUSUF44 Yusuf bey merhaba. çalışmayı formülle yapmayı düşünüyordum ama hem makrolu hem formüllü yapmaya karar verdim. Korhan Beyin formüllerini uyguladım. ona yazım düzenini ekledim. ancak kodda bunu yapamadım. sanırım Application.Proper(cell) kullanmamız gerekiyor. bunu kodların neresine...

Şunu dener misiniz: sorgu = "select [Yapılması Gereken Ödeme],[Yapılacak Tarih] from [Sheet1$A1:D" & son & "] where BGS=1 order by [Yapılacak Tarih]"

sorgu satırını aşağıdakiyle değiştirip deneyin: sorgu = "select [Yapılması Gereken Ödeme],[Yapılacak Tarih] from [Sheet1$A1:D" & son & "] where BGS=1 order by BGS"

Formülle nasıl düzeltilir bilemedim ama makroyla isterseniz aşağıdaki makroyu deneyiniz: Sub tarihler() Set s1 = Sheets("Sheet1") son = s1.Cells(Rows.Count, "D").End(3).Row eski = s1.Cells(Rows.Count, "I").End(3).Row If eski > 1 Then s1.Range("H2:I" & eski).ClearContents Set con =...

Haluk beyin bahsettiği işlemi yaptığımda, Bu sonucu aldım. Buna rağmen 2021.05.20 sonucu alıyorsanız, Denetim Masası-Bölge buradan tarih formatınızı kontrol ediniz.

Teşekkürler Yusuf bey

With ListBox1 satırından önce başka bir sorgu ve döngüyle kontrol yapılabilir: If ListBox1.List(i, 0) = TextBox1.Value Then With ListBox1 .List(i, 2) = .List(i, 2) + TextBox4.Value ' satış adet .List(i, 4) = .List(i, 4) +...

Sanıyorum A1 hücresindeki Fide sayfa adının sonundaki boşluktan kaynaklanıyor. Kodun düzgün çalışması için 1. satıra yazdığınız sayfa isimlerinin gerçek sayfa isimleriyle birebir aynı olması gerekir. Kodu aşağıdakiyle değiştirirseniz hatalı sayfa adlarını dikkate almaz ve o hücreyi kırmızıya...

Aşağıdaki gibi daha iyi oldu sanki: Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, [B3]) Is Nothing Then Exit Sub Set s1 = ActiveSheet eski = s1.Cells(Rows.Count, "B").End(3).Row If eski > 3 Then s1.Range("A4:V" & eski).ClearContents s1.Range("A4:V" &...

Bu kısım ADO ve SQL ile rapor oluşturma kısmı. Set satırından sorgu ile başlayan kısıma kadar olan yerde bu yöntemle rapor alacağımızı tanımlıyoruz. Bu kısmı kopyala yapıştır yapıyorum, standart değişmez kodlar. Sadece sonundaki hdr=no kısmı veritabanının ya da tablonun durumuna göre hdr=yes...

ondalık sayılardaki noktaları virgün yaptım çalıştı ama formülü yanlış değerlendiriyor 1. sorgu yanlışsa ikiye geçmek yerine ilk koşulun eğerine bakıyor

Arama menüsünde bolca örnek var https://www.excel.web.tr/search/192414/?q=sorgu+tarih&o=date https://www.excel.web.tr/threads/sql-sorgu-satirinda-tarih-formati.191735/

Sayın NextLevel bey dogru söylüyorsunuz toplamda herhangi bir 3 saat içerisinde örnekte oldugu gibi 2 kritere göre de veri olabilir ve her ikisini de ilk tarih ve saatten başlayarak sorgu sayfasına getirmesini istiyorum. Zaten sizin belirttiğiniz şekilde olması çok zor ve eger gelirsede çok...

Sayın NexLevel bey öncelikle yardımlarınızdan ve katkılarınızdan dolayı çok teşekkür ederim. Veri sayfasındaki verilere göre herhangi bir plaka 3 saat içerisinde sorgu sayfasındaki J2 Ve K2 kriterlerine göre yakıt almış ise Sorgu sayfasında ki örnekte olduğu gibi Tarih- saat sırasına göre...