| Jak ukryć wiersz jeżeli wartość komórki wynosi zero? |
|
Problem: W jaki sposób najszybciej za pomocą makra ukryć wiersze, w których wartość komórki wynosi 0? Rozwiązanie: Rozwiązaniem może być makro, które zakłada autofiltr na wszystkie komórki oprócz tych, których wartość równa się 0. ![]() Sub UkryjZera() With Arkusz1 'Jezeli arkusz nie ma zalozonego autofiltra wtedy zaklada go If Not .AutoFilterMode Then .Range("A1").AutoFilter 'Wyswietla tylko wartosci rozne od zera .AutoFilter.Range.AutoFilter Field:=1, Criteria1:="<>0" End With End Sub |
|
| Zmieniony ( Czwartek, 01. Lipiec 2010 20:13 ) |
