Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   access ve excelde arama sıralama süzme

access ve excelde arama sıralama süzme
Gold_Savt
Yeni Üye 1-15

*
Kayıt Tarihi: 06.10.2010
Toplam 2 konu açtı.
Toplam 9 yorum yaptı.
Toplam 0 puanı bulunmakta.
Beğeniler: 0 / 0
#1
07-10-2010, 23:04
Değerli arkadaşlar;
Başlığı tam açamamış olabilirim. Bunun için özür dilerim. Takıldığım nokta şurası: Ekte gönderdiğim programda "isme göre" ve "çalışan koduna göre" ARAMA butonu var. Ama benim istediğim şey sadece bu ikisinde değilde diğerlerinden bazılarında da arama yapabilmek. Arama yapmak istediğim sorgular şunlar.
1. çalışan kodu (zaten var)
2. adı (zaten var)
3. Soyadı
4. Vergi No
5. Adres
6. Departman
7. Görevi
8. Ücret Türü
9. İl
10. İlçe
11. Semt

Bu kadar. Resmi bir kurumda çalışıyorum. İlçeler hariç 350 personel, İlçelerle birlikte 1000'e yakın personel var. Amirler "Şu özellikte personel sayısını istiyorum" dediğinde didik didik arşiv incelemem gerekiyor. Büyük sıkıntı oluyor. Bu sistem oturursa süper olacak.
Şimdiden teşekkür ederim.


Eklenti Dosyaları
.zip   güzel personel programı.zip (Boyut: 64,87 KB / İndirilme: 115)



  Bul
  Alıntı
Bu mesajı beğenenler:
Zeki Gürsoy
Kıdemli Üye 400-1000

*
Kayıt Tarihi: 12.03.2008
Toplam 80 konu açtı.
Toplam 635 yorum yaptı.
Toplam 75 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016 TR,
Beğeniler: 1 / 4
#2
08-10-2010, 00:21
Sorguyu textbox change olayına kullanmışsınız.

En basitinden şunun gibi olabilir..

Visual Basic
  1. if optionbutton1.value = true then
  2. 'sorgu
  3. elseif optionbutton2.value = true then
  4. 'sorgu
  5. elseif optionbutton3.value = true then
  6. .
  7. .
  8. .
  9. end if



Daha kısa bir yapı da hazırlanabilir elbette. Bu, hemen kurabileceğiniz bir yapı.

.



  Website   Bul
  Alıntı
Bu mesajı beğenenler:
Gold_Savt
Yeni Üye 1-15

*
Kayıt Tarihi: 06.10.2010
Toplam 2 konu açtı.
Toplam 9 yorum yaptı.
Toplam 0 puanı bulunmakta.
Beğeniler: 0 / 0
#3
08-10-2010, 09:14
arama yapmayı az çok çözmeye çalışıyorum ama. arama sonuçlarını excel'e aktaramıyorum bir türlü. bu konuda yardım edermisiniz acaba ?



  Bul
  Alıntı
Bu mesajı beğenenler:
assenucler
Kıdemli Üye >1000

*
Kayıt Tarihi: 21.03.2008
Toplam 154 konu açtı.
Toplam 2.119 yorum yaptı.
Toplam 11 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 0 / 4
#4
08-10-2010, 09:30
Sayın Gold_Savt;

Günaydın..

Aşağıdaki linkin 2. mesajındaki dosya size yardımcı olacaktır..

http://www.access-sql.com/Konu-Access-te...i-aktarimi

Kolay gelsin..



  Bul
  Alıntı
Bu mesajı beğenenler:
Gold_Savt
Yeni Üye 1-15

*
Kayıt Tarihi: 06.10.2010
Toplam 2 konu açtı.
Toplam 9 yorum yaptı.
Toplam 0 puanı bulunmakta.
Beğeniler: 0 / 0
#5
08-10-2010, 10:36
yeni form ektedir.
eklediğim forma göre aramaları yapmayı öğrendim. ama aradıklarımı excele aktarma işi hala olmuyor. ilk iki butonda
1. çalışan kodu (veri excele aktarılıyor)
2. adı (veri excele aktarılıyor)
diğerlerinde aktarılmıyor.

bunu aşmak istiyorum. verdiğiniz linkte başlı başına bir ders var. o konuya tam giremiyorum. ön bilgilerimin eksik olmasından dolayı.

cevabınızı bekliyorum
yeni form ektedir.


Eklenti Dosyaları
.rar   veriaktarma.rar (Boyut: 55,29 KB / İndirilme: 89)



  Bul
  Alıntı
Bu mesajı beğenenler:
Taruz
Forum Yöneticisi

*
Kayıt Tarihi: 04.03.2008
Toplam 371 konu açtı.
Toplam 7.540 yorum yaptı.
Toplam 236 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010, Office 2019,
Beğeniler: 56 / 56
#6
08-10-2010, 13:22
Merhaba..

Aktarma prosedürünü bu şekilde kullanınız..:

Visual Basic
  1. If OptionButton3.Value = True Then
  2.     sayfaya_yaz
  3. End If
  4. Dim trz As String
  5. trz = "select * from [PERSONEL]"
  6. If OptionButton1.Value = True Then trz = trz & " WHERE ADI LIKE '%" & TextBox1.Text & "%'"
  7. If OptionButton2.Value = True Then trz = trz & " WHERE CALISAN_KODU LIKE '%" & TextBox1.Text & "%'"
  8. If OptionButton5.Value = True Then trz = trz & " WHERE SOYADI LIKE '%" & TextBox1.Text & "%'"
  9. If OptionButton6.Value = True Then trz = trz & " WHERE VERGI_NO LIKE '%" & TextBox1.Text & "%'"
  10. If OptionButton7.Value = True Then trz = trz & " WHERE ADRES LIKE '%" & TextBox1.Text & "%'"
  11. If OptionButton8.Value = True Then trz = trz & " WHERE DEPARTMAN LIKE '%" & TextBox1.Text & "%'"
  12. If OptionButton9.Value = True Then trz = trz & " WHERE GOREVI LIKE '%" & TextBox1.Text & "%'"
  13. If OptionButton10.Value = True Then trz = trz & " WHERE UCRET_TURU LIKE '%" & TextBox1.Text & "%'"
  14. If OptionButton11.Value = True Then trz = trz & " WHERE ADRES IL '%" & TextBox1.Text & "%'"
  15. If OptionButton12.Value = True Then trz = trz & " WHERE ADRES ILCE '%" & TextBox1.Text & "%'"
  16. If OptionButton13.Value = True Then trz = trz & " WHERE ADRES SEMT '%" & TextBox1.Text & "%'"
  17.  
  18.  
  19. If OptionButton4.Value = True Then
  20. Sheets("veri").Select
  21. Sayfa1.Cells.ClearContents
  22. Call baglanti
  23. Set rs = baglan.Execute(trz)
  24. With Sheets("veri")
  25.     .Range("a1").CopyFromRecordset rs
  26. End With
  27. Set baglan = Nothing: Set rs = Nothing:
  28. End If


Bulunamayan yerleri bulmak için önce kaybolmak gerekir.
Kaptan Hector Barbossa


SORU SORMA KILAVUZU
Giriş | Sormadan Önce | İlgili Forumu dikkatlice seçin | Anlamlı ve duruma uygun konu başlıkları kullanın | Anlamsız soru cümleleri kurmayın | Açık, dilbilgisi kurallarına uygun ve sözdizimlerine dikkate ederek yazın | Sorunuz sizin için çok acil olsa bile, çok acil diye yazmayın | Sorununuz hakkında tam ve aydınlatıcı iletiler yazın | Amacınızı belirtin | Problemin belirtilerini tanımlayın, kendi tahminlerinizi değil | Sorunuz hakkında açık olun | Nezaket asla yaralamaz ve bazen oldukça yararlıdır | Boyut her şey değildir! | Kabalıkla ilgilenmek | Cevabı E-Posta ile istemeyin | İnsanlardan özel mesajla cevap vermelerini istemeyin | Eğer cevabı anlamadıysanız | Şayet bir cevap alamazsanız | Sorununuz çözüldükten sonra küçük bir not ile bildirin | Sorulmaması gereken türde sorular | İyi ve kötü sorular

Sorulara nasıl doğru düzgün cevap verilir



  Website   Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Sıralama evren89 2 311 08-07-2024, 10:03
Son Mesaj: evren89
  Gruplu Sıralama evren89 2 321 06-07-2024, 15:08
Son Mesaj: evren89
  [VBA] Metin Içerisindeki Kelimeler Ile Arama Yapma ekremer1969 6 1.329 22-06-2024, 16:15
Son Mesaj: dsezgin
  [FORM] Teslim Tarihi Alanına Göre Süzme, Filtreleme programmer67 14 1.066 09-05-2024, 23:27
Son Mesaj: programmer67
  [FORM] Arama Sorunu Pasham 0 379 08-04-2024, 14:32
Son Mesaj: Pasham
access-sql-18 Dsum Ile Toplam Alırken Tarih Aralığınıda Süzme Yaptırma Sorunu kesoka 2 544 07-04-2024, 16:13
Son Mesaj: kesoka
  Excelde 70mb Olan Veri Access 1000mb Oluyor !!! adnnfrm 1 408 26-11-2023, 11:36
Son Mesaj: dsezgin
  Liste Arama Kutusundan Kayıt Silme CarpeDiem 12 865 21-07-2023, 10:31
Son Mesaj: onur_can

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi