Strona główna

Wybrana funkcja

  • LICZ.WARUNKI
    Zlicza komórki wewnątrz zakresu, które spełniają wiele kryteriów.
Automatyczne ładowanie dodatków w Excelu

Dziś postaram się opisać, w jaki sposób można zarządzać dodatkami w Excelu w trakcie otwierania skoroszytu. Czasami chcemy, aby w trakcie otwierania, bądź też zamykania skoroszytu załadowały, bądź też wyłączyły się jakieś dodatki. Zadanie jest stosunkowo proste należy tylko wykorzystać dwa zdarzenia:

  • Workbook_Open ? zostaje odpalone w momencie otwieranie skoroszytu,
  • Workbook_BeforeClose ? zostaje odpalone przed zamknięciem skoroszytu.

Metody przeciążające te dwa zdarzenia powinny znaleźć się w obiekcie ThisWorkbook. Mając już wiedzę teoretyczną można przystąpić do kodowania. Aby zrealizować zamierzony cel należy dodać następujący kod VBA do obiektu ThisWorkbook:

1
2
3
4
5
6
7
Private Sub Workbook_Open()
    AddIns("Nazwa dodatku").Installed = True
End Sub
 
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    AddIns("Nazwa dodatku").Installed = False
End Sub

Jak można zauważyć w trakcie otwierania Excela zostanie ustawiony status Zainstalowany dodatku o podanej nazwie na True. Oznaczać to będzie, że dany dodatek został zainstalowany. Odwrotnie zadziała metoda odpalana przed zamknięciem arkusza ? status ten zostanie ustawiony na False. Należy tylko pamiętać, że w sytuacji, gdy dany dodatek nie zostanie znaleziony na komputerze, na którym otwierany jest skoroszyt to pojawi się okno informujące o błędzie w kodzie.

Powyższe rozwiązanie można wykorzystać również do sytuacji zupełnie odwrotnej ? wyłączenia dodatków przed otworzeniem naszego skoroszytu. Jeżeli wiemy, że jakiś dodatek źle działa z naszym skoroszytem to możemy go w sposób bezpieczny wyłączyć.

Dodatkowo metody te dwie można wykorzystać do wielu innych ciekawych zastosowań. Przykładowo można je użyć do kontroli dostępu danego użytkownika do całego skoroszytu, części arkuszy, czy nawet obszaru na arkuszu. Ogranicza nas tylko nasza pomysłowość.

 

Dodaj komentarz


Kod antysapmowy
Odśwież

Książka

Ankieta

Jakiej wersji Excela używasz?
 

Statystyki



Dzisiaj: 2
Wczoraj: 115
Bieżący tydzień: 341
Poprzedni tydzień: 620
Bieżący miesiąc: 2007
Poprzedni miesiąc: 2615
Ogółem: 7390