[Yardım]  Kaldılan Filtrelemenin Korunması

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

Kaldılan Filtrelemenin Korunması

İleti#1)  erseldemirel2 » 22 Oca 2023 00:59

Arkadaşlar; "İcmal" sekmesinde filtreleme yapmak için "Filtre" sekmesinde kısmındaki İL bilgileri Module1 ile kullanılıyor.
Ancak; çalıştıktan sonra İCMAL de A1C1 arası filtreleme hali ortadan kalkıyor. Yeniden filtreleme yaparsam süzülmüş tüm veriler tekrar geliyor. Kısaca ben module1 filtreme yaptıktan sonrada filtre kısmında başka İl seçebileyim yada kaldırabileyim.
Module1 çalıştıktan sonra A1-C1 filtreleme aktif kalması nasıl sağlanır? Teşekkürler
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
www.erseldemirel.com.tr
Kullanıcı avatarı
erseldemirel2
Site Dostu
 
Kayıt: 31 Oca 2019 14:51
Meslek: Mühendis
Yaş: 38
İleti: 1066
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Ankara / Çankaya

Yıllık Maaş Bordrosu Hesaplama 2022

Cevap: Kaldılan Filtrelemenin Korunması

İleti#2)  Yken » 22 Oca 2023 21:42

Kod: Tümünü seç
Sub Filrele()
Dim i As Integer, sonsat1 As Integer
Dim ar() As Variant, sonsat2 As Integer

sonsat1 = Sayfa1.Range("a1").End(xlDown).Row
sonsat2 = Sayfa2.Range("a1").End(xlDown).Row
ReDim ar(1 To sonsat2)
For i = 2 To Sayfa2.Range("a1").End(xlDown).Row
ar(i - 1) = Sayfa2.Range("A" & i)
Next i

Worksheets("İCMAL").[B1].AutoFilter 2, ar, xlFilterValues
End Sub
Kullanıcı avatarı
Yken
Siteye Alışmış
 
Kayıt: 07 Kas 2014 11:06
Meslek: Muhasebe
Yaş: 57
İleti: 114
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul

Cevap: Kaldılan Filtrelemenin Korunması

İleti#3)  erseldemirel2 » 23 Oca 2023 11:44

Tesekkurler uyarlama yapayım
www.erseldemirel.com.tr
Kullanıcı avatarı
erseldemirel2
Site Dostu
 
Kayıt: 31 Oca 2019 14:51
Meslek: Mühendis
Yaş: 38
İleti: 1066
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Ankara / Çankaya


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 2 misafir

Bumerang - Yazarkafe