- Katılım
- 22 Ekim 2012
- Mesajlar
- 4,318
- Excel Vers. ve Dili
- 2007 Türkçe
Son paylaştığınız dosyanın yapısı ile ilk paylaştığınız dosya yapıları birbirine uymuyor. Bununla ilgili 11 no'lu mesajda bir hatırlatma yapmıştım.
İncelediğim kadarıyla problem tarihle alakalı değil. Aşağıdaki kırmızı satırdaki şartlar bu dosyada sağlanmadığı için tarih değeri ve diğer değerler diziye yazdırılmıyor.
İncelediğim kadarıyla problem tarihle alakalı değil. Aşağıdaki kırmızı satırdaki şartlar bu dosyada sağlanmadığı için tarih değeri ve diğer değerler diziye yazdırılmıyor.
Rich (BB code):
ElseIf rs.Fields(0) <> "" And rs.Fields(1) <> "" And IsNumeric(rs.Fields(4)) Then
x = x + 1
dz(x, 1) = Mid(con.Properties("Data Source"), InStrRev(con.Properties("Data Source"), "\") + 1)
dz(x, 2) = trh