Stránka 1 z 1
VBA Excel - Automatický filtr
Napsal: 21 říj 2010 14:46
od Branscombe
Možná triviální otázka, ale jak přidám automatický filtr do horního řádku pomocí VBA ??
Re: VBA Excel - Automatický filtr
Napsal: 21 říj 2010 14:51
od navstevnik
Co takhle zkusit nahrat makro a patricne upravit? Je to vhodny zpusob pro jednoduche pozadavky, kdyz nevis jak to ve VBA napsat.
Re: VBA Excel - Automatický filtr
Napsal: 21 říj 2010 14:53
od Branscombe
To jsem samozřejmě vyzkoušel a nic ... Zkusil jsem i Google a taky nic ...
Re: VBA Excel - Automatický filtr
Napsal: 21 říj 2010 16:50
od navstevnik
Ches snad tvrdit, ze se nezaznamenalo takoveto podobne makro?
Kód: Vybrat vše
Sub Makro1()
'
' Makro1 Makro
' Makro zaznamenané 21.10.2010, Private User
'
'
Selection.AutoFilter
End SubUpravou ziskas - priklady:
Kód: Vybrat vše
Option Explicit
Sub AktivovatAutoFiltr()
' aktivuje autofiltr
ActiveSheet.UsedRange.AutoFilter
End Sub
Sub AktivovatAutoFiltr1()
' aktivovat autofitr, sloupec 2, kriterium "21"
Dim FBlk As Range
Set FBlk = ActiveSheet.UsedRange
FBlk.AutoFilter Field:=2, Criteria1:="21"
Set FBlk = Nothing
End Sub
Sub DeaktivovatAutoFiltr()
Selection.AutoFilter
End Sub
Re: VBA Excel - Automatický filtr Vyřešeno
Napsal: 21 říj 2010 19:01
od Branscombe
No zaznamenalo se mi to co pises, ale nenapadlo me to prevest do takovehoto formatu...
diky moc za rady, jsi proste dobrej ...