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

teşekkürler Haluk Hocam, iyiki varsınız, aynı mantık ile saat' i de denedim fakat hata vardi, orada nasıl bir çözüm önersiniz? tekrar teşekkürler, Sub Test() Dim tarih As Double Dim saat As Double Baglan tarih = CDate(Sayfa1.Range("A2")) saat =...

Dim Con As Object ' Sub Test() Dim tarih As Double Baglan tarih = CDate(Sayfa1.Range("A2")) a = sorguTarih(tarih) MsgBox a End Sub ' Sub Baglan() Dim yol As String Set Con = VBA.CreateObject("adodb.Connection") yol = ThisWorkbook.FullName...

Merhaba, Ekli dosyada Tarih sorgulamasını bir türlü yapamadım, bir çok yol denedim ama; bir türlü sonuca ulaşamadım. teşekkürler, iyi akşamlar. Dim Con As Object Sub Test() Dim tarih As Date Baglan tarih = CDate(Sayfa1.Range("A2")) a = sorguTarih(tarih) MsgBox a End Sub Sub Baglan() Dim...

33 bin satırlık veri var bu işlem doğru sonucu veriyor fakat işlem uzun sürüyor işlemi tamamıyla ADO ile yapabilir miyiz? İl merkezinden çıkış yapıp 1 saat içerisinde dönen araçların listesi gerekiyor Plaka Tarih Saat PTS Nokta Adı Araç Tip Araç Yıl Araç Marka Araç Renk OKUNAMADI...

Merhaba, Aşağıdaki kodu basitçe yazmaya çalıştım başta. Soru olursa yine cevaplarım. Sistemi açıklayayım Ayrı bir kayıpliste.xlsx olarak dosyam var, buradan belirli tarih aralığında olan verileri çekmek istiyorum. kayıpliste.xlsx dosyası SAP uygulamasından çekilen bir rapor. Yani o raporu hiç...

DefObj C, E-F, R Sub vericek() Range("A:D").ClearContents Set Rky = CreateObject("adodb.connection") Set FSO = CreateObject("scripting.filesystemobject") Set cat = CreateObject("adox.catalog") For Each evn In FSO.getfolder(ThisWorkbook.Path).Files If Not evn.Name Like "*" & ThisWorkbook.Name...

üstad öncelikle teşekkür ederim, ortadaki ve sondaki sorgu işime görecek ancak Count değil distinct yaptırmam lazım. Satır sayısını değil benzersiz irsaliye numarasını saydırmak ve kesilen irsaliye adedini öğrenmek istiyorum. Dönemi İrsaliye Adedi Ocak 255 Şubat 422 Mart 375

Geceden beri denemediğim kod kalmadı kolay olduğunu düşünüyorum ama nerede hata yapıyorum hiç biri istediğimi yapmadı. Bu sorgu ile öncelikle TARİH sütunundaki aylara göre gruplandırıp ve her ayda benzersiz olan İRSALİYE NO sayısını hesaplayıp, DISTINCT kullanarak aynı ay içinde birden fazla...

Sorguyu kendime uyarladım ama geçersiz yordum çağrısı şeklinde hata veriyor. Birde burada count var, count satır sayısını saymaz mı? Benim benzersiz irsaliye adedini saydırmam gerekiyor. Bir irsaliyenin içindeki tüm stok hareketleri aynı irsaliye numarasıyla birden fazla satır olabiliyor...

Merhaba; aşağıdakine benzer sorgu kullanın... select monthname([irsaliye tarih]) as [Ay], count([irsaliye no]) as [İrsaliye Say] from [Stok hareketler] group by monthname([irsaliye tarih])

@Haluk üstad bende bu koddan istifade ederek irsaliyeleri benzersiz numaralarına göre aldırdım ancak ocak şubat ve mart olarak tüm ayların toplamı geldi. Benim kullandığım kod aşağıdaki gibidir. strSQL = "Select count([İRSALİYE NO]) as irscount from(select distinct([İRSALİYE NO]) From...

Merhaba Üstadlar, Forumda arama yaptım ama eski konularda sadece sorgu ile çözümleri gördüm, Cebteteb için yapılmış olan macrolu bir çalışma mevcut bunun Enpara için çalışan versiyonu elinde olan var mı? Teb için çalışan macro aşağıdadır bunu Enpara için değiştirebilir miyiz? Sub...

Sorgu ile excel dondu yanıt vermedi. Çok uzun bekledim ama çözülmedi. Veri az olunca stabil olur ama veri çok olunca çok kasıyor. Sadece Ado ile sorgu yaparak çözmek istedim ama sanırım hızlı bir şekilde olmuyor.

Üstad indirdim baktım dosyaya kod çalışıyor bende de sonradan çalıştı düzenle diyerek mesajımı yenilemiştim. Kod çalıştı ancak senin eklediğin excel üzerinden söylersem daha net olacak diye düşünüyorum. Sheet1 sayfasında A Sütunundan 153.001.002 kodlu ürünü filtre ettiğimizde sadece 2 adet...

Yine de tam anlamamış olabilirim, ama bir deneyin... sorgu = " Select Distinct T1.[STOK KODU], T1.[STOK AÇIKLAMA], T2.MaxDate, T2.[ALIŞ FİYATI] " & _ " From [satis$] As T1 " & _ " Inner Join " & _ " (Select [STOK KODU], [ALIŞ FİYATI], Max(TARİH) As MaxDate From [fiyat$]...

Üstad emeğine sağlık. Kodları denedim fakat Group by ile ilgili bir sıkıntı var. Editlemeye çalıştım ama çözemedim. Genel olarak Satışta ay boyunca her gün satılan buna nazaran alış tablosunda ay içinde bir kaç kere alınmış ürünler oluyor. Sorguda tüm satışlar içinden Satış Tarihi ve Stok...

İstediğiniz bu mu, bilemedim .... Siz bir ara denersiniz. sorgu = " Select T1.[STOK KODU], T1.[STOK AÇIKLAMA], T2.MaxDate, T2.[ALIŞ FİYATI] " & _ " From [satis$] As T1 " & _ " Inner Join " & _ " (Select [STOK KODU], [ALIŞ FİYATI], Max(TARİH) As MaxDate From [fiyat$] " &...

Saygıdeğer üstadlar aşağıdaki kod ile satış tarihine eşit ve küçük son alış tarihini ve bu tarihteki alış fiyatını tek sorgu ile birlikte almak istiyorum ama aşağıdaki yaptığım kodda tüm satışları çekiyorum, yanına son alım tarihini getiriyorum fakat son alış tarihindeki fiyat gelmiyor, alımlar...

@Korhan Ayhan üstadım tekrardan merhabalar. Bazen saatlerce ben koda bakıyorum kod bana bakıyor o arada beynimde kodu çalıştırıyorum falan derken beyin duruyor. Aşağıdaki şekilde çözdüm burada paylaşmak istedim. Sende bir bak istersen. Ekleme/çıkarma revize belki bir dokunuşun olur ve...

Üstad sorgu ile harika aslında ama sıkıntı şu Range("H2") ile Range("I2") bölümünde ben örnek dosyada sadece bir satır ürün ekledim. orada tüm satışlar var. Yani veri çok tek satır değildi orayı yanlış anlatmış olabilirim. Önceki formüllerin kasmasının sebebi çok satır olmasındaydı ancak sorgu...