Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
22/01/2013 21:07
Konu Sahibi
alican60
Yorumlar
5
Okunma
3571
Konuyu Oyla:
  • Derecelendirme: 3/5 - 1 oy
  • 1
  • 2
  • 3
  • 4
  • 5
alican60

alican60

Aktif Üye
50270
Al.... Ca....
 39
 128
 29/12/2012
0
 Tokat
 
 -
 Bugün,00:32
Aşağıdaki kod ile combobox1-2-3 den sorgu sonucu listelenen isimlerin sayısını textboxlara yazdırıyorum.Combobox4 e ise " GEÇMİŞ TARİH " ve " GELECEK TARİH "  ifadelerini aldırdım.Combobox4 ten "GEÇMİŞ TARİH" ifadesini seçersem KAYIT alanındaki tarihlerden bugünden önceki tarihleri listeliyorum.Yapmak istediğim ise ; Combobox1-2-3 ten sırasıyla veri seçtikten sonra combobox4 ten veri seçersem listelenen isimlerin herbirinin sayısını textboxlara yazdırmak.Combobox4 ü aşağıdaki koda nasıl adapte edebilirim.

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
sql = "select [ADI],count([ADI]) as sayi from [LİSTE] WHERE [CALISAN_KODU] like '" & ComboBox1.Text & "%" & _
                                                     "' AND [ADI]          like '" & ComboBox2.Text & "%" & _
                                                     "' AND [DOGUM_TARIHI] like '" & ComboBox3.Text & "%" & _
                                                "' group by [ADI] HAVING [ADI] like '" & ComboBox2.Text & "%" & "' "
Set baglan = CreateObject("adodb.connection")
Set rst = CreateObject("adodb.recordset")
Call baglanti
rst.Open sql, baglan, 1, 1

Do While Not rst.EOF

    lAdi = rst.Fields("ADI")
    lsayi = rst.Fields("sayi")
    If lAdi = "ALİ" Then
        TextBox1.Value = lsayi
    ElseIf lAdi = "VELİ" Then
        TextBox2.Value = lsayi
    ElseIf lAdi = "LALE" Then
        TextBox3.Value = lsayi
    End If
    rst.MoveNext
Loop

rst.Close
Set rst = Nothing




alican60

alican60

Aktif Üye
50270
Al.... Ca....
 39
 128
 29/12/2012
0
 Tokat
 
 -
 Bugün,00:32
Bu konuda bilgisi olan varmıdır.



...........
alican60

alican60

Aktif Üye
50270
Al.... Ca....
 39
 128
 29/12/2012
0
 Tokat
 
 -
 Bugün,00:32
Anlaşılabilir olması için dosya ekliyorum.



alican60

alican60

Aktif Üye
50270
Al.... Ca....
 39
 128
 29/12/2012
0
 Tokat
 
 -
 Bugün,00:32
Yardımcı olabilecek birisi varmıdır.




...........
alican60

alican60

Aktif Üye
50270
Al.... Ca....
 39
 128
 29/12/2012
0
 Tokat
 
 -
 Bugün,00:32
Img-cray Arkadaşlar konu hakkında bilgisi olan varmı. Img-cray



atoz112

atoz112

Onursal Üye
8839
 50
 9
 5.716
 04/08/2009
 İstanbul
 
 Ofis 2007
 09/12/2017,11:02
Sayın alican60,

konu takibiniz açısından,hatırlatma anlamında;
konunuz ile ilgili son gelişme ne durumdadır.

şüphesiz,geçen zaman akabinde,işlemleriniz tamamlanmış ve sorununuzu çözmüş de olabilirsiniz.bilgilendirmek ister misiniz lütfen.teşekkürler.

Cevaplanmış Sorular kategorisi içerisine taşınmasını da talep edebilirsiniz.


KONU
;
(içeriği itibarı ile),

"SQL" Kategorisi'nden alınıp,
"Excel Soruları ve Cevapları" Kategorisi'ne taşınmıştır.


KONU BAŞLIĞI;
(site içi aramalarında kolaylık sağlaması adına,içeriği itibarı ile),

"SQL kodu ile listelenen isimlerin sayısını bulmak." ifadesi yerine,
"Excelde listelenen isimlerin sayısını bulmak" olarak değiştirilmesi uyugn görülmüştür.

bilginize...iyi çalışmalar,saygılar.



...........

Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Excelde yaklaşan tarihleri outlook'a otomatik mail atma erdinc_1982 11 17.904 11/02/2019, 10:14
Son Yorum: serhatmolla
Çözüldü excelde bir hücreye yazdır butonunu koymak ocaku8 7 12.435 08/09/2017, 17:58
Son Yorum: kerimapo
Çözüldü Excelde comboboxları birbirine bağlamak alican60 2 2.596 25/09/2016, 12:50
Son Yorum: atoz112
Çözüldü Excelde Yıllık izinlerde pazar günleri ve resmi tatiller hariç hesaplanması lorenzo1903 6 6.100 16/06/2016, 18:22
Son Yorum: lorenzo1903
Çözüldü excelde tablo içinde yer eşleştirme orhanbalcı 5 1.915 05/06/2016, 15:59
Son Yorum: atoz112

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.