Excel w praktyce

Aby skorzystać z pełnej wersji serwisu

Zarejestruj się

Makro przydatne nie tylko w księgowości

Kasowanie jeden po drugim wierszy z powtórzonymi wpisami to koszmar każdego użytkownika Excela. Idą święta więc, nie będziesz miał czasu na takie ręczne robótki. Czekają bilanse, zestawienia i raporty roczne. Pokażę Ci, jak nakłonić do tej pracy Excela.

Załóżmy, że od swojego współpracownika otrzymałeś listę z nazwami firm, które kupowały produkty Twojej firmy w minionym roku. Dane były uzupełniane przez kilku pracowników i niestety na liście znajdują się powtórzone nazwy. Ty potrzebujesz szybko je usunąć. Proponujemy zastosowania makra, dzięki któremu zrobisz to błyskawicznie.

Przykładową listę zawierającą powtórzone wartości przedstawia rysunek.

Aby szybko pozbyć się duplikatów, wykonaj następujące czynności:
1. Kliknij dowolną komórkę zawierającą nazwę firmy i wybierz na pasku narzędziowym ikonę polecenia Sortuj rosnąco (w Excelu 2007: znajdziesz ją na karcie Dane).
2. Wciśnij kombinację klawiszy lewy Alt + F11, aby otworzyć Edytor VBA.
3. W oknie Edytora wstaw nowy moduł, wybierając z menu Insert polecenie Module.
4. Do okna po prawej wpisz kod widoczny na kolejnym rysunku.

5. Zapisz i zamknij Edytor VBA.
6. Teraz zaznacz zakres komórek zawierający nazwy firm i wciśnij kombinację klawiszy lewy Alt + F8.
7. Zostanie wyświetlone okno dialogowe Makro, w którym kliknij nazwę makra OznaczDuplikaty i kliknij przycisk Uruchom.

Zamiast powtórzonych nazw firm w komórkach pojawiło się słowo Duplikat. A zatem wszystkie wiersze, w których się ono znajduje, powinny być usunięte.

Aby to szybko zrobić:
8. Zaznacz dowolną komórkę w pierwszym wierszu zestawienia i uruchom autofiltr.
9. Kliknij rozwijaną listę w komórce A1 i jako kryterium filtrowania wskaż Duplikat.

W efekcie widoczne będą tylko wiersze, w których znajduje się słowo Duplikat.

10. Zaznacz widoczne wiersze i usuń je.
11. Teraz rozwiń listę z komórki A1 i wybierz pozycję Wszystkie (w Excelu 2007: Zaznacz wszystko).

Przedstawione rozwiązanie okazuje się wyjątkowo przydatne, gdy potrzebujesz usunąć duplikaty z listy obejmującej wiele tysięcy wierszy. Musisz jednak zawsze pamiętać o tym, aby przed uruchomieniem makra posortować listę.

Liczba wyświetleń: 289

15 grudnia 2011 - 06:39 - Najlepsze porady