Zamiana wierszy w arkuszu Calc

Gotowe szablony, skrypty, makropolecenia i rozszerzenia. Tutaj możesz pochwalić i podzielić się swoją twórczością z innymi użytkownikami
Awatar użytkownika
Jermor
Posty: 2352
Rejestracja: sob paź 12, 2013 11:09 am
Kontakt:

Zamiana wierszy w arkuszu Calc

Post autor: Jermor »

Jeden z forumowiczów spytał na forum, czy istnieje możliwość zamiany dwóch sąsiadujących wierszy arkusza kalkulacyjnego przy pomocy jakiegoś polecenia lub skrótu klawiaturowego.
Sprawa wydała mi się ciekawa i być może interesująca także innych użytkowników programu Calc, więc napisałem odpowiednie makro. Właściwie to dwa makra: jedno zamieniające wskazany wiersz arkusza z tym wierszem, który leży powyżej i drugie - zamieniające wskazany wiersz z wierszem leżącym poniżej. Makra nazwałem odpowiednio AltShiftUp i AltShiftDown. Nazwy nawiązują do nieobsadzonych w Calcu skrótów klawiaturowych, które przypisane do odpowiedniego makra będą realizowały jego funkcje (użytkownik może oczywiście utworzyć własne skróty klawiaturowe).
Same makra zapisałem w bibliotece o nazwie UpAndDown i przekształciłem ją do postaci pliku rozszerzeń pakietu LibreOffice i Apache OpenOfficce. Plik rozszerzenia nosi nazwę UpAndDown.oxt. Należy go pobrać i zainstalować w swoim systemie.
Aby to wykonać należy skorzystać z polecenia "Narzędzia -> Menedżer rozszerzeń..." i przyciskiem "Dodaj" rozpocząć proces dodawania. Wynikiem będzie umieszczenie tej biblioteki w kontenerze "Moje Makra". Po tej operacji, aby zmiany zostały uwzględnione, oprogramowanie poprosi o zrestartowanie pakietu.
Drugim krokiem będzie przypisanie skrótów klawiaturowych do poszczególnych makr. To zrealizować należy poleceniem "Narzędzia -> Dostosuj..."
Kliknij aby powiększyć ilustrację.
Kliknij aby powiększyć ilustrację.
  • Po otwarciu okna dialogowego należy przejść do zakładki "Klawiatura".
  • W obszarze "Skróty klawiaturowe" zaznaczyć wybrany skrót.
  • W obszarze "Kategoria" przewinąć drzewo kategorii do "Moje makra" i rozwinąć ją. Odnaleźć bibliotekę "UpAndDown" i także ją rozwinąć. Zaznaczyć pozycję "Module1".
  • Po tym działaniu w obszarze "Funkcja" pojawią się nazwy dwóch makr. Należy kliknąć to makro, które ma zostać przypisane do wybranego skrótu klawiaturowego.
  • Dopiero teraz aktywnym stanie się przycisk "Modyfikuj" i należy z niego skorzystać.
  • Powtórzyć takie przypisanie dla drugiego makra.
Działanie procedury.
Makra działają na zasadzie utworzenia nowego pustego wiersza (odpowiednio powyżej albo poniżej), do którego zostanie przeniesiona zawartość wskazanego wiersza. Wiersz dotychczas zajmowany przez dane zostaje usunięty. Komórka aktywna pozostaje w przeniesionym wierszu, więc kolejne użycie skrótu klawiaturowego dokona kolejnego przeniesienia.
Aby wykonać zamianę wierszy należy wskazać komórkę w wierszu, który ma zmienić położenie, komórka nie może być pusta . Zamieniane są całe wiersze. Zamiana wierszy nie nastąpi wtedy, gdy nie będzie możliwości wstawienia pustego wiersza.
Załączniki
UpAndDown.oxt
(2.31 KiB) Pobrany 220 razy
AOO 4.1.15, LO 24.8.2 (x64) na Windows 10 64bit
Ważne!
Jeśli twój problem został rozwiązany, wróć do swojego pierwszego postu, przejdź do edycji i dopisz [SOLVED] w temacie.
Inni, którzy mają podobny problem, będą wiedzieli, że istnieje jego rozwiązanie.
ODPOWIEDZ