Dim lst As string
For Each lst In array('list1','list5','list10','posledni')
If Worksheets(lst).FilterMode = True Then
Worksheets(lst).ShowAllData
Next lst
citovat
Zaslal/a €Ł мσşqμΐτσ 9.11.2011 7:12
Ahoj.
Chci se zeptat jak by šlo předělat příkaz viz níže.
aby mi kontrolovalo jenom na některých listech a ne na všech. např. první dva listy vynechat je ich dohromady 8
Díky
Dim lst As Worksheet
For Each lst In Worksheets
If lst.FilterMode = True Then lst.ShowAllData
Next lst
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.