Skip to main content

AccessTr.neT


Mevcut Uygulaması Ve Excele Aktarımı

Mevcut Uygulaması Ve Excele Aktarımı

#37
Ekteki dosyayı indirip dener misiniz?
.rar Mevcut_userx.rar (Dosya Boyutu: 75,54 KB | İndirme Sayısı: 7)
"Dünyayı fazla düşünme."
#38
Hızlıca birkaç deneme yaptım. Tamam görünüyor. Nerede değişiklik yaptığınızı öğrenebilir miyim? İşyerindeki dosyayı da güncellemem gerekecek.
#39
Önce
        Excl.Cells(y, "A") = rs2(0)
        Excl.Cells(y, "B") = rs2(2)
        Excl.Cells(y, "D") = rs2(3)
        Excl.Cells(y, "F") = rs2(4)
        Excl.Cells(y, "H") = rs2(5)
Sonra
Excl.Cells(y, "A") = IIf(rs2(0) = "  ()", "", rs2(0))
Excl.Cells(y, "B") = IIf(rs2(2) = "  ()", "", rs2(2))
Excl.Cells(y, "D") = IIf(rs2(3) = "  ()", "", rs2(3))
Excl.Cells(y, "F") = IIf(rs2(4) = "  ()", "", rs2(4))
Excl.Cells(y, "H") = IIf(rs2(5) = "  ()", "", rs2(5))
"Dünyayı fazla düşünme."
#40
Çok teşekkür ederim.
#41
Kolay gelsin.
"Dünyayı fazla düşünme."

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da