Skip to main content

AccessTr.neT


Excelden Accesteki veriyi filtreleme sorunu.

Excelden Accesteki veriyi filtreleme sorunu.

Çözüldü #1
Sub filtre()
Set baglan = CreateObject("adodb.connection")
Set rs = CreateObject("adodb.recordset")

Call baglanti

If ComboBox1.Text <> Empty And ComboBox2.Text = Empty And ComboBox3.Text = Empty Then
rs.Filter = "[CALISAN_KODU] like '" & Mid(ComboBox1.Text, 1, Len(ComboBox1.Text)) & "%'"


ElseIf ComboBox1.Text <> Empty And ComboBox2.Text <> Empty And ComboBox3.Text = Empty Then
rs.Filter = " [CALISAN_KODU] like '" & Mid(ComboBox1.Text, 1, Len(ComboBox1.Text)) & "%'" & _
"and [ADI] like '" & Mid(ComboBox2.Text, 1, Len(ComboBox2.Text)) & "%'"

End If

ListBox1.Column = rs.GetRows

End Sub
Kodu ile excelden accesteki veriyi süzdürme yapamıyorum,yardımcı olabilirmisiniz.
örnek dosya ekledim.
.rar EXCELDEN ACCESE VERİ AKTARMA -.rar (Dosya Boyutu: 32,3 KB | İndirme Sayısı: 11)
.rar VERİ.rar (Dosya Boyutu: 22,01 KB | İndirme Sayısı: 5)
Son Düzenleme: 06/01/2013, 14:52, Düzenleyen: alican60.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Excelden Accesteki veriyi filtreleme sorunu. - Yazar: alican60 - 05/01/2013, 15:43
Task