Ten samouczek nauczy Cię, jak wyczyścić tablicę w VBA.
Wyczyść całą tablicę
Aby wyczyścić całą tablicę, możesz użyć Usuń oświadczenie:
| 1 | Erase ArrPrzykład |
W praktyce:
| 123456789101112131415 | Sub ClearArray()'Utwórz szyk statycznyDim arrExample(1 do 3) jako String'Zdefiniuj wartości tablicy'arrExample(1) = "Shell"arrExample(2) = "Steve"arrExample(3) = "Neema"„Wymaż całą tablicę”Erase ArrPrzykład„Sprawdź wartość tablicy”MsgBox arrPrzykład(1)Napis końcowy |
Zmień rozmiar i wyczyść tablicę
Jeśli Twoja tablica jest dynamiczna (tablica dynamiczna to tablica, której rozmiar można zmienić, w przeciwieństwie do tablicy statycznej, której rozmiar nie może zostać zmieniony), możesz użyć Polecenie Wymnij aby zmienić rozmiar tablicy, czyszcząc całą tablicę wartości.
| 12 | „Wymaż całą tablicę”ReDim arrExample(1 do 4) |
Pełny przykład:
| 12345678910111213141516 | Sub ClearArray2()'Utwórz tablicę dynamicznąDim arrExample() As StringReDim arrExample(1 do 3)'Zdefiniuj wartości tablicy'arrExample(1) = "Shell"arrExample(2) = "Steve"arrExample(3) = "Neema"„Wymaż całą tablicę”ReDim arrExample(1 do 4)„Sprawdź wartość tablicy”MsgBox arrPrzykład(1)Napis końcowy |
Wyczyść część tablicy
Jak wspomniano powyżej, polecenie ReDim zmieni rozmiar tablicy, usuwając wszystkie wartości z tablicy. Zamiast tego możesz użyć ReDim Zachowaj aby zmienić rozmiar tablicy, zachowując wszelkie istniejące wartości. W praktyce można to wykorzystać do szybkiego wyczyszczenia części tablicy.
| 12 | 'Usuń pozycję 3+ReDim Zachowaj arrExample(1 do 2) |
Pełny przykład:
| 12345678910111213141516171819 | Sub ClearArray3()'Utwórz tablicę dynamicznąDim arrExample() As StringReDim arrExample(1 do 3)'Zdefiniuj wartości tablicy'arrExample(1) = "Shell"arrExample(2) = "Steve"arrExample(3) = "Neema"'Usuń pozycję 3+ReDim Zachowaj arrExample(1 do 2)'Zmień rozmiar do 3 pozycjiReDim Zachowaj arrExample(1 do 3)„Sprawdź wartość tablicy”MsgBox arrPrzykład(3)Napis końcowy |
Zapętlaj całą macierz - resetowanie wartości
Zamiast kasować wartości tablicy za pomocą Erase lub ReDim, można przejść przez całą tablicę, resetując każdą wartość.
**link do pętli**
