Skip to main content

AccessTr.neT


Tabloda 'evet/hayır' Veri Tiplerini Excel' E Çekme Hk.

Tabloda 'evet/hayır' Veri Tiplerini Excel' E Çekme Hk.

Çözüldü #1
Merhabalar,

Access tablosunda veri tipleri Ekte sunulan ekran görüntülerinde de görüleceği üzere;
"Evet/Hayır" olan verileri aşağıdaki kod ile Excel' ortamına çekmek istersek, işaretli olmayanları da Evet olarak getiriyor.
Özetle Hayır olanları da Evet gibi getiriyor
burada nerede hata yapıyor olabilirim?

Yardımlarınız için şimdiden teşekkürler,
iyi Çalışmalar.

Kod:
SQL = "Select * from tbl_Customers"
        SQL = SQL & " Where id= " & cId

        rs.Open SQL, cn, 1, 3

            txtClientName = rs!FirmaUnvani
            txtServiceProcess = rs!HizmetSureci
            cbServiceType.value = rs!HizmetTuru
            txtRateInfo.value = rs!OranTutarBilgisi
            
            txtPostScript.value = rs!Notes

            
            If rs!RaporYazilacakmi = True Then f1 = "E"
            If rs!DahaOnceRaporVarmi = True Then f2 = "E"
            If rs!BagliOrtaklik = True Then f3 = "E"
            If rs!ilkDefainceleniyor = True Then f4 = "E"
            If rs!DenetimKonsolidemiSunulacak = True Then f5 = "E"

.rar Pictures.rar (Dosya Boyutu: 133,34 KB | İndirme Sayısı: 2)
truhi, 29-09-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#2
Kodun tamamını görmeden kesin bir şey söylemesi zor ama
True iken E yap var ama false ise ne olacağına dair bir atama yok.
Cevapla
#3
(06/02/2025, 18:14)berduş yazdı: Kodun tamamını görmeden kesin bir şey söylemesi zor ama
True iken E yap var ama false ise ne olacağına dair bir atama yok.

"False" iken bir şey yapmayacak Hocam;

Kod:
dim f1, f2, f3, f4, f5
.......................

f1,f2,f3,f4,f5 değerleri zaten başta boş olduğu için "False" durumunda bu değerler boş olarak kalacak

teşekkürler,
iyi akşamalar.
truhi, 29-09-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#4
Then f1 = "E" Else f1="" gibi vır atama ise yarayabilir
Yada dim f1, f2 vs vs tanımlarken as string yazarak türün metin olmasını sağlayabilirsiniz
Cevapla
#5
(06/02/2025, 20:20)berduş yazdı: Then f1 = "E" Else f1="" gibi vır atama ise yarayabilir
Yada dim f1, f2 vs vs tanımlarken as string yazarak türün metin olmasını sağlayabilirsiniz

Şimdi deneyerek bilgi veriyorum Hocam
truhi, 29-09-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#6
(06/02/2025, 20:24)truhi yazdı:
(06/02/2025, 20:20)berduş yazdı: Then f1 = "E" Else f1="" gibi vır atama ise yarayabilir
Yada dim f1, f2 vs vs tanımlarken as string yazarak türün metin olmasını sağlayabilirsiniz

Şimdi deneyerek bilgi veriyorum Hocam

Tamamdır Hocam Sorun çözüldü, herşey için teşekkürler,
iyi akşamlar.
truhi, 29-09-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task