Excel VBA Dictionary
Słownik ogólnie zawiera zbiór słów o określonym znaczeniu i zastosowaniu. Tę samą koncepcję można zastosować w tworzeniu słownika Excel VBA, w którym możemy dodawać, aktualizować, zmieniać i usuwać dowolną liczbę słów. W VBA Dictionary możemy wykorzystać kolekcję tablic lub słów do zdefiniowania lub utworzenia dowolnej kategorii. Podobnie jak w zwykłym słowniku słów, widzimy słowa z ich znaczeniem, kategoriami, zastosowaniem, wymową itp. W VBA Dictionary możemy również zdefiniować wszystkie niezbędne cechy i wartości, które chcemy przypisać do dowolnego słowa lub zmiennej.
Aby użyć VBA Dictionary, musimy włączyć funkcję Microsoft Scripting Runtime, która jest dostępna w opcji menu Narzędzia pod Referencjami.
Narzędzie -> Referencje -> Środowisko wykonawcze skryptów Microsoft
Słownik VBA ma kilka głównych właściwości, jak wyjaśniono poniżej;
- Count = Zwraca liczbę zmiennych w kluczu słownika.
- Pozycja = Możemy uzyskać w ten sposób wartość przedmiotu określonego klucza.
- Klucz = W ten sposób możemy zastąpić dowolny klucz innym.
- Add = Służy do dodawania wartości klucza do słownika.
- CompareMode = Służy do porównywania różnych kluczy w słowniku.
Kroki tworzenia słownika w programie Excel VBA
Aby utworzyć Słownik VBA, najpierw musimy aktywować środowisko wykonawcze Microsoft Scripting Runtime, które jest pierwszym krokiem do aktywacji słownika Excel VBA. Postępuj zgodnie z instrukcjami, aby utworzyć słownik w programie Excel za pomocą kodu VBA.
Możesz pobrać ten szablon Excel VBA Dictionary tutaj - Szablon Excel VBA DictionaryKrok 1 : W tym celu przejdź do menu Narzędzia i wybierz z niego opcję Odnośniki, jak pokazano poniżej.
Krok 2 : Teraz w oknie Odniesienia - Projekt VBA wybierz Microsoft Scripting Runtime, który pomoże nam w aktualizacji słownika VBA. Po zakończeniu kliknij OK .
Krok 3: Teraz potrzebujemy modułu do napisania kodu dla słownika VBA. Więc otwórz opcję menu Moduł z menu Wstaw, jak pokazano poniżej.
Krok 4: Teraz napisz podprocedurę dla słownika VBA pod dowolną nazwą, jak pokazano poniżej.
Kod:
Sub VBA_Dictionary2 () End Sub
Krok 5: Teraz zdefiniujemy zmienną jako słownik i przypiszemy jej funkcję Dictionary, jak pokazano poniżej. Aby uniknąć nieporozumień, możesz wybrać dowolną inną nazwę zgodnie z własnym wyborem.
Kod:
Sub VBA_Dictionary2 () Dim Dictionary As Dictionary End Sub
Krok 6: Teraz ustaw zmienną Dictionary jako New Dictionary, jak pokazano poniżej.
Kod:
Sub VBA_Dictionary2 () Dim Dictionary As Dictionary Set Dictionary = New Dictionary End Sub
Krok 7: Teraz otworzymy With-End with Loop, jak pokazano poniżej.
Kod:
Sub VBA_Dictionary2 () Dim Dictionary As Dictionary Set Dictionary = Nowy słownik ze słownikiem End With End Sub
Krok 8: Jak już omówiliśmy różne właściwości lub aplikację, które możemy wybrać w Excel VBA Dictionary. Więc tutaj wybierzemy .Dodaj, który służy do dodawania słów ze słownika za pomocą dowolnego klucza, jak pokazano poniżej. Tutaj losowo wybraliśmy klucz jako 11.
Kod:
Sub VBA_Dictionary2 () Dim Dictionary As Dictionary Set Dictionary = New Dictionary With Dictionary .Add Key: = 11, End With End Sub
Krok 9: Teraz przypiszemy przedmiot do tego klucza. Wybraliśmy słowo „ Pies ” dla klucza 11 .
Kod:
Sub VBA_Dictionary2 () Dim Dictionary As Dictionary Set Dictionary = New Dictionary With Dictionary .Add Key: = 11, Item: = "Dog" End With End Sub
Krok 10: Podobnie dodajemy jeszcze kilka słów. Powiedzmy, że tymi słowami są „ Kot ” i „ Szczur ”, odpowiednio z klawiszami 12 i 13 .
Kod:
Sub VBA_Dictionary2 () Dim Dictionary As Dictionary Set Dictionary = New Dictionary With Dictionary .Add Key: = 11, Item: = "Dog" .Add Key: = 12, Item: = "Cat" .Add Key: = 13, Item: = „Rat” End With End Sub
Krok 11: Teraz wstaw polecenie Debug.Print, aby wydrukować wartości zapisane w używanych kluczach zgodnie z wprowadzonymi liczbami.
Kod:
Sub VBA_Dictionary2 () Dim Dictionary As Dictionary Set Dictionary = New Dictionary With Dictionary .Add Key: = 11, Item: = "Dog" .Add Key: = 12, Item: = "Cat" .Add Key: = 13, Item: = „Rat” End With Debug.Print (Dictionary (11)) End Sub
To uzupełnia nasz kod. Aby zrozumieć, w jaki sposób słowa będą dodawane do słownika Excel VBA, musimy dodać więcej okien do oglądania.
Krok 12: Przejdź do menu Widok i wybierz Okno podglądu i okno bezpośrednie, jak pokazano na poniższej liście.
Po tym nasze okno VBA prawdopodobnie będzie wyglądać jak pokazano poniżej.
Dostosowujemy otwarte okno Natychmiastowe i Oglądaj w dowolnym miejscu ekranu zgodnie z naszymi potrzebami.
Krok 13: Teraz dodaj listę Watch w oknie Watch. W tym celu kliknij go prawym przyciskiem myszy i kliknij Dodaj zegarek, jak pokazano poniżej.
Krok 14: W oknie zegarka nazwij wyrażenie i wybierz moduł, w którym napisałeś kod. Tutaj naszym modułem jest Moduł1 . I w końcu kliknij OK.
W oknie zegarka otrzymamy naszą listę obserwacyjną o nazwie Słownik, jak pokazano poniżej.
Krok 15: Teraz uruchom kod, klikając przycisk Odtwórz lub naciskając klawisz F5. Zobaczymy, jak nasze pierwsze słowo „ Pies ” zostanie dodane do słownika i będzie widoczne w Natychmiastowym oknie, jak pokazano poniżej.
Krok 16: Aby zobaczyć aktualizację w oknie Watch, naciśnij klawisz F8, aby uruchomić każdy krok jeden po drugim. Będzie punkt, w którym zobaczymy, że okno Watch zostało zaktualizowane o przedmiot i numer klucza przypisany do każdego numeru. Następnie kliknij znak plus w oknie podglądu, aby odkryć rzeczy przechowywane pod każdym numerem klucza.
Dzięki temu będziemy mogli zobaczyć liczbę zmiennych dodanych do naszego słownika, numery pozycji i przypisaną im kluczową wartość oraz ich rodzaj, jak pokazano poniżej.
Tutaj liczba wynosi 3, ponieważ wybraliśmy 3 różne słowa do dodania do naszego słownika. Dla pozycji Pies, Kot i Szczur przechowywane wartości wynoszą odpowiednio 11, 12 i 13. W kolumnie kontekstowej będziemy mogli zobaczyć Moduł, który wybraliśmy jako Moduł1.
Krok 17: Teraz, aby zobaczyć różne wartości elementu, będziemy musieli zmienić Numer klucza w Debugowaniu. Wydrukuj jak pokazano poniżej. Tutaj wybraliśmy 12 .
Krok 18: Teraz ponownie uruchom kod, klikając przycisk Odtwórz lub naciskając klawisz F5. W Natychmiastowym oknie zobaczymy kolejny przedmiot Cat .
Krok 19: Zostanie to zmienione, jeśli ponownie dodamy 13 w Debugowaniu. Wydrukuj jak pokazano poniżej.
Krok 20: Teraz ponownie uruchom kod, klikając przycisk Odtwórz lub naciskając klawisz F5.
W ten sposób możemy tworzyć i dodawać wiele słów do słownika Excel VBA zgodnie z naszym wyborem.
Zalety słownika Excel VBA
- Możemy wstawić dowolną liczbę niestandardowych słów, których można użyć przy tworzeniu dowolnej bazy danych.
- Bardzo łatwo jest znaleźć dodane słowo za pomocą przypisanego do niego klucza.
- Oprócz dodawania możemy usuwać, aktualizować i porównywać już dodane słowa ze słownika.
Wady słownika Excel VBA
- Musimy ponownie uruchomić cały kod po zmianie numeru klucza w Print, aby zobaczyć różne słowa dodane do słownika.
Rzeczy do zapamiętania
- Aby zobaczyć słowa dodane do słownika, wymagane są okna natychmiastowe i Watch.
- Dowolny rodzaj słowa, zakresu liczb, znaków można dodać o zdefiniowanym znaczeniu.
- Bezpośrednie okno pokazuje słowo dodane do słownika.
- Okno podglądu pokazuje wartość i rodzaj słów dodanych do słownika.
Polecane artykuły
To jest przewodnik po VBA Dictionary. Tutaj omawiamy przykłady tworzenia słownika w programie Excel za pomocą kodu VBA wraz z przykładem i szablonem programu Excel do pobrania. Możesz także przejrzeć nasze inne sugerowane artykuły -
- Korzystanie z VBA w Outlooku
- Ustawianie sprawdzania pisowni w programie Excel
- Jak korzystać z funkcji VBA InStrRev?
- Wstaw kalendarz do programu Excel | Przykłady