AccessTr.neT
(VBA) F7 Tuşu ile Form Filtresi (Filtre Aç) moduna geçsin - 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ığı: (VBA) F7 Tuşu ile Form Filtresi (Filtre Aç) moduna geçsin (/konu-vba-f7-tusu-ile-form-filtresi-filtre-ac-moduna-gecsin.html)

Sayfalar: 1 2 3


Cvp: (VBA) F7 Tuşu ile Form Filtresi (Filtre Aç) moduna geçsin - WiniFred - 13/12/2011

Sayın Coskun0559,
o yöntemde çalışmadı maalesef. Bu arada örneği de hazırladım.

Ek Dosyalar
 F7TusuIleFiltre_WiniFred2003.rar(588.83 KB)

Ek Dosyalar
 F7TusuIleFiltre_WiniFred2007.rar(590.98 KB)



Cvp: (VBA) F7 Tuşu ile Form Filtresi (Filtre Aç) moduna geçsin - POWER - 13/12/2011

Benim kullandığım bir arama motoru belki işinize yarar...


Cvp: (VBA) F7 Tuşu ile Form Filtresi (Filtre Aç) moduna geçsin - WiniFred - 13/12/2011

Sayın POWER,
çok teşekkür ederim ama o şekilde bir yöntem düşünmüyorum.

Yapmak istediğim şeyin üzerinde düşünmeye devam ediyorum bu arada. F8 ile son filtreyi geri getirebiliyor. Demek ki Form Filtresi modundayken, birşeyler bu komutun çalışmasını engelliyor. Yani sanki F8 tuşunun blok'unda, filtreyi uygula komutundan önce "veri girişi bitti" gibi birşey demem lazım.


Cvp: (VBA) F7 Tuşu ile Form Filtresi (Filtre Aç) moduna geçsin - WiniFred - 14/12/2011

arkadaşlar düşündüklerimi yazmaya devam ediyorum. Belki sizin aklınıza gelen birşeyler olur.

yukarıdaki mesajımda F8 ile son filtreyi getirebildiğini belirtmiştim. Koddaki F8 blok'unu

If KeyCode = vbKeyF8 Then
msgbox "tamam"
End If

şekline dönüştürürsem de -filtre açık değilken- F8'e bastığımda mesaj görüntüleniyor. Anladığım kadarıyla filtre modundayken herşeyi disable ediyor Access (F7'yi algılama sebebi de bu tuşa basıldığında henüz filtrenin açık olmaması, yani disable olan birşey yok). Ta ki şeritteki "filtreyi değiştir" ya da "filtre/sıralama uygula" butonuna tıklayana kadar.

Formun "Filtrede" event'ına da birşeyler yazmayı denedim ama olmadı.