Yapıştır Ve Filtrele - 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ığı: Yapıştır Ve Filtrele (/konu-yapistir-ve-filtrele.html) Sayfalar:
1
2
|
Yapıştır Ve Filtrele - serdem48 - 30/04/2019 baska bir programdan kopya yaptığım veriyi (örneğin: 107/3) form yüklendiğinde olayına ilişkisiz metin kutusu (Metin1)'ye yapıştırıp Alan kısmından filtreleme yaparak form filtresi yapmak istiyorum. Denedim ancak yapamadım. mümkünmüdür. aşagıdaki kodu denedim. olmuyor.
Cvp: Yapıştır Ve Filtrele - maytas - 30/04/2019 Projelerimde çok kullandığım aşağıdaki ögneği kendi ihtiyacına göre uyarlarsın. İstediğin kadar kriter kullanabilirsin. Burada dikkat edilmesi gereken nokta filtreyi uygulamak istediğin tablodaki alan ile filtreyi belirttin tip ayni olmalı, yani tablodaki alan metin ise belirttiğin tip de metin olmalı. Benim aşağıdaki örnekte veriler hep metin. Eğer sendeki veri sayı ise çift tırnağın önündeki ve arkasındaki tek tırnakları kaldır. Private Sub filtre_uygula() On Error Resume Next Dim kriter As String If Nz(Me.cmbYon, "") <> "" Then kriter = kriter & "[YoneticiID] = '" & Me.cmbYon & "' AND " End If If Nz(Me.cmbProje, "") <> "" Then kriter = kriter & "[ProjeID] = '" & Me.cmbProje & "' AND " End If If Nz(Me.cmbProjeTipi, "") <> "" Then kriter = kriter & "[Proje Tipi] = '" & Me.cmbProjeTipi & "' AND " End If If Nz(Me.cmbProjeAdi, "") <> "" Then kriter = kriter & "[Proje Isim] = '" & Me.cmbProjeAdi & "' AND " End If If kriter <> "" Then kriter = Left(kriter, Len(kriter) - 5) 'en sağadaki fazladan AND alma Me.Filter = kriter Me.FilterOn = True Else Me.Filter = "" Me.FilterOn = False End If End Sub Cvp: Yapıştır Ve Filtrele - berduş - 30/04/2019 formu açmak için hangi komutu kullanıyorsunuz? Cvp: Yapıştır Ve Filtrele - serdem48 - 30/04/2019 (30/04/2019, 14:24)haliliyas yazdı: formu açmak için hangi komutu kullanıyorsunuz? Netcad cizim programından direkt Access dosyasının linki ile prpgram çalışıyor. açılış formu tanımladığım sayfa direkt olarak açılıyor. burada benim tanımladığım bir metin kutusuna netcad den kopya aldığı ada parsel ile bir filtre uygulayıp formu ilgili ada parselin kaydını filtrelemek istiyorum. örnek bir çalışmam var denediğim. ancak başarısız oldum Cvp: Yapıştır Ve Filtrele - berduş - 30/04/2019 form yüklendi olayının kodu:
Cvp: Yapıştır Ve Filtrele - berduş - 30/04/2019 sizin çalışmanıza uyarlarsak
|