Wygodniejsze dopisywanie danych do długiej listy

Dopisywanie danych do długiej listy

W jednym z arkuszy naszego roboczego skoroszytu znajduje się lista wystawionych faktur. Uzupełniamy ją na bieżąco danymi wyszukanymi w zestawieniach zgromadzonych w pozostałych arkuszach. Niestety praktycznie za każdym razem musimy przewijać arkusz z listą dokumentów, aby dopisać kolejną pozycję. Proponujemy to usprawnić.

W tym celu:

1. Klikamy prawym przyciskiem myszy etykietę arkusza z listą faktur i z menu podręcznego wybieramy polecenie Wyświetl kod.

Rys. 1. Uaktywniamy menu podręczne dla aktywnego arkusza

2. W oknie kodu wyświetlonego Edytora VBA wprowadzamy makro widoczne na rysunku 2.

Rys. 2. Kod makra

 Zapisujemy i zamykamy Edytor VBA.

Od teraz każde uaktywnienie arkusza zawierającego listę faktur spowoduje uruchomienie makra i zaznaczenie komórki, w której powinna zostać wprowadzona kolejna pozycja na liście.

Rys. 3. Arkusz został automatycznie przewinięty