[حل شده] دستوری برای باز و بسته کردن فیلتر

[pishraw]

با سلام و درود به همه اساتید و دوستان عزیز

کد یا دستوری می خواستم جهت باز کردن ستون های فیلتر شده و همچنین فیلتر کردن چندین ستون به طور همزمان .

[Ali Parsaei]

سلام،
با ضبط ماکرو راحت مي توانيد کدهايش را پيدا کنيد،
مثلا" با برداشتن و گذاشتن دوباره فيلتر از منوي data کل فيلترهاي اعمال شده فعلي پاک مي شود، که اين کدش است:

Range("Table1[#Headers]").Select
    Selection.AutoFilter
    Selection.AutoFilter 

بعد با ضبط ماکرو و اعمال فيلترهاي جديد کد آن را نيز مي توان يافت.