AccessTr.neT
Tablodaki "," İle Ayrılan Verileri Saymak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Tablodaki "," İle Ayrılan Verileri Saymak (/konu-tablodaki-ile-ayrilan-verileri-saymak.html)

Sayfalar: 1 2 3 4 5 6 7 8 9


Cvp: Tablodaki "," İle Ayrılan Verileri Saymak - accessman - 27/03/2020

23.mesajdaki örnek için mi diyorsunuz


Cvp: Tablodaki "," İle Ayrılan Verileri Saymak - feraz - 27/03/2020

(27/03/2020, 13:00)accessman yazdı: 23.mesajdaki örnek için mi diyorsunuz
Evet


Cvp: Tablodaki "," İle Ayrılan Verileri Saymak - accessman - 27/03/2020

Sayıları bilmiyorum ama 3.kayıt 01.02.2020 ve 20.02.2020 tarihleri kriter olursa hesaplanmalı mı


Cvp: Tablodaki "," İle Ayrılan Verileri Saymak - feraz - 27/03/2020

Başka bir poblem var.

kes = Split(Replace(rs(index), " ", ""), ",") burdaki replace yi meyveler arasında yani Limonun sağında yada solunda boşluk varsa tam sonuç vermiyordu onun için replace ekledim.

Kuru üzüm gibi arada boşluk olunca Kuruüzüm olarak sonuç veriyor.


kes = Split(Trim(rs(index)), ",") böyle trim yaptım oda olmuor neden çözmemiz gerek.

(27/03/2020, 13:20)feraz yazdı: Başka bir poblem var.

kes = Split(Replace(rs(index), " ", ""), ",") burdaki replace yi meyveler arasında yani Limonun sağında yada solunda boşluk varsa tam sonuç vermiyordu onun için replace ekledim.

Kuru üzüm gibi arada boşluk olunca Kuruüzüm olarak sonuç veriyor.


kes = Split(Trim(rs(index)), ",") böyle trim yaptım oda olmuor neden çözmemiz gerek.

Yukarıdaki dediklerim için alttaki kod ile değiştirin ilgili satırı.

If rs.RecordCount > 0 Then
        Do While Not rs.EOF
            kes = Split(rs(index), ",")
            For k = LBound(kes) To UBound(kes)
                scr(Trim(kes(k))) = scr(Trim(kes(k))) + 1
            Next
            rs.MoveNext
        Loop
    End If



Cvp: Tablodaki "," İle Ayrılan Verileri Saymak - feraz - 27/03/2020

(27/03/2020, 12:35)accessman yazdı: hatalı sonuç değil ama şimdi eklediğim örnekte 3. kayıta ekleyip sildiğim limon hesap dışı kalması gerekmiyor mu
[Resim: do.php?img=9957]

başlama 01.02.2020 bitiş 29.02.2020 firma A için 3. Kayıttaki meyveler "Extra filtreli" de hesaplanmalı mı hesaplanmamalı mı
Extra filtreli  içinmi olacak


Cvp: Tablodaki "," İle Ayrılan Verileri Saymak - accessman - 27/03/2020

teşekkürler değiştirdim
eğer soru şöyle olmuş olsaydı nasıl tarih kriteri kullanacaktım
problem
bir fabrika ve bununda çeşitli bölümleri var. bu fabrikada çalışanların bazılarında kronik hastalık dediğimiz Diabet, Hipertansiyon, Astım, Kalp hast, hastalıklar var
bir kişide aynı anda hem diabet hem astım olabilir veya hiç hastalık olmayabilir.
bu çalışanlar 01.01.2000 ile 31.12.2020 tarihleri arasında işe giriş çıkış yapmışlar.mesela
Ali 01.05.2012 de girmiş 05.12.2015 de çıkmış Diabet ve Astım varmış
Veli 01.07.2008 de girmiş 25.10.2018 de çıkmış Hipertansiyon ve  Astım varmış.
böylece devam edip gidiyor. Patron da diyor ki accessman bana şöyle bir liste çıkar 
şu tarihler arasında her bölümde kronik hastalığı olanlardan kaçar kişi çalışmış
Bizim örnekte firmalar bölümlere denk geliyor
meyveler kronik hastalıklara denk geliyor
her kayıt bir işçi oluyor. umarım anlaşılmıştır
şimdi nasıl bir tarih kriteri ile sorgulamamız lazım ki patrondan fırça yemeleyim

(27/03/2020, 13:47)feraz yazdı:
(27/03/2020, 12:35)accessman yazdı: hatalı sonuç değil ama şimdi eklediğim örnekte 3. kayıta ekleyip sildiğim limon hesap dışı kalması gerekmiyor mu
[Resim: do.php?img=9957]

başlama 01.02.2020 bitiş 29.02.2020 firma A için 3. Kayıttaki meyveler "Extra filtreli" de hesaplanmalı mı hesaplanmamalı mı
Extra filtreli  içinmi olacak
evet