Dobrý den,
chtěla bych požádat o radu ve vytvoření makra - filtru.
mám několik sloupců (veškeré info se týká smluv), potřebuji vyfiltrovat dle data a platnosti (pomocí funkce "KDYŽ" jen vypisuje ANO nebo NE, pokud je platná k aktuálnímu datu).
Pro rozšířený filtr jsem si nastavila kritéria (zřejmě) správně, zadávám-li filtr ručně, je vše OK (nová tabulka se vytvoří). Jakmile spustím makro, tabulka zůstane prázdná, tedy nic se mi nevyfiltruje.
Ještě před samotným filtrem mám nastaveno smazání předchozích dat.
Zde je mnou vytvořený kód:
Sub filtr_2017()
Range("A4:H300").Select
Selection.ClearContents
Selection.ClearFormats
Range("J7").Select
Range("data").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets( _
"pom").Range("A4:B7"), CopyToRange:=Range("A3:H4"), Unique:=False
End Sub
Mohl by mi někdo, prosím, poradit, kde dělám chybu?
Děkuji
Rozšířený filtr jako VBA
-
- Pohlaví:
Re: Rozšířený filtr jako VBA
a) Filtrujete datum v českém prostředí? Pro účely filtru převeďte datum na Long (funkce CLng).
b) Bez sešitu a přílohy nemohl.
b) Bez sešitu a přílohy nemohl.
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
-
Excel - filtr na formát buňky + obsah Příloha(y)
od popcorn » 19 zář 2023 17:07 » v Kancelářské balíky - 0
- 1867
-
od popcorn
Zobrazit poslední příspěvek
19 zář 2023 17:07
-
-
-
Excel - filtr hyperlinku na druhý list Příloha(y)
od mikiracan » 06 čer 2023 11:49 » v Kancelářské balíky - 2
- 2438
-
od mikiracan
Zobrazit poslední příspěvek
18 srp 2023 10:17
-
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 8 hostů