Vba Ambar Raporlama Oluşturması

Vba Ambar Raporlama Oluşturması - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Vba Ambar Raporlama Oluşturması (/konu-vba-ambar-raporlama-olusturmasi.html)

Sayfalar: 1 2 3 4 5

RE: Vba Ambar Raporlama Oluşturması - merttr07 - 28/01/2021

(28/01/2021, 14:20)berduş yazdı: sorun ilgili verinin tabloda olmamasından kaynaklanıyor
eğer kayıt sayısı = 0 ise kopyalanma hata verir aşağıdaki gibi if döngüsüyle sorun giderilebilir
If rs.RecordCount > 0 Then

Worksheets("ürüngiris").Range("a1").CopyFromRecordset rs

End If

Private Sub CommandButton7_Click()
Call connection_open

sql0 = "select * from ürünlist where clng([Ürün_Kayıt_Tarihi])= " & CLng(CDate(Me.TextBox1.Value))
rs.Open sql0, conn, 1, 1

If rs.RecordCount > 0 Then
Worksheets("ürüngiris").Range("a1").CopyFromRecordset rs
End If

sql0 = "select * from cikis where clng([Ürün_Cikis_Tarihi])= " & CLng(CDate(Me.TextBox1.Value))
rs.Open sql0, conn, 1, 1

If rs.RecordCount > 0 Then
Worksheets("ürüncikisveri").Range("a1").CopyFromRecordset rs
End If

rs.Close
End Sub

sql0 = "select * from cikis where clng([Ürün_Cikis_Tarihi])= " & CLng(CDate(Me.TextBox1.Value))
rs.Open sql0, conn, 1, 1 bu kısımda hata alıyorum hala o tarihte kayıtlı ürün yok yaptım ama hata veriyor.

RE: Vba Ambar Raporlama Oluşturması - berduş - 28/01/2021

bir önceki mesajda yazdığınız kodda ilk rs.close silinmiş görünüyor,.

RE: Vba Ambar Raporlama Oluşturması - merttr07 - 28/01/2021

Hala aynı hatayı alıyorum sizin attığınızdan direk kodu kopyalayıp yapıştırdım hata alıyorum

RE: Vba Ambar Raporlama Oluşturması - berduş - 28/01/2021

Benim dosyamda hata var mı, calisiyor mu

RE: Vba Ambar Raporlama Oluşturması - merttr07 - 28/01/2021

(28/01/2021, 15:58)berduş yazdı: Benim dosyamda hata var mı, calisiyor mu

Göndermiş Olduğunuz Dosyada da hata alıyorum

rs.Open sql0, conn, 1, 1 bu kısımda hata veriyor ne yazık ki.

RE: Vba Ambar Raporlama Oluşturması - berduş - 28/01/2021

gifte de göreceğiniz gibi bende sorunsuz çalışıyor sizde neden hata verdiğini anlayamadım
[Resim: do.php?img=10684]

https://resim.accesstr.net/do.php?img=10684