Този урок ще ви научи как да изчистите масив във VBA.
Изчистване на целия масив
За да изчистите цял масив, можете да използвате Изтриване на изявление:
1 | Изтриване на arrExample |
На практика:
123456789101112131415 | Sub ClearArray ()„Създайте статичен масивDim arrExample (1 до 3) като String„Определете стойностите на масиваarrExample (1) = "Shelly"arrExample (2) = "Стив"arrExample (3) = "Neema"„Изтриване на целия масивИзтриване на arrExample„Проверете стойността на масиваMsgBox arrExample (1)End Sub |
Преоразмеряване и изчистване на масива
Ако вашият масив е динамичен (динамичен масив е масив, който може да бъде преоразмерен, за разлика от статичен масив, който не може да бъде променен), можете да използвате Команда ReDim за преоразмеряване на масива, изчистване на целия масив от стойности.
12 | „Изтриване на целия масивReDim arrExample (1 до 4) |
Пълен пример:
12345678910111213141516 | Sub ClearArray2 ()„Създайте динамичен масивDim arrExample () As StringReDim arrExample (1 до 3)„Определете стойностите на масиваarrExample (1) = "Shelly"arrExample (2) = "Стив"arrExample (3) = "Neema"„Изтриване на целия масивReDim arrExample (1 до 4)„Проверете стойността на масиваMsgBox arrExample (1)End Sub |
Изчистете част от масив
Както бе споменато по -горе, командата ReDim ще преоразмери масива, изчиствайки всички стойности от масива. Вместо това можете да използвате ReDim Preserve за да преоразмерите масива, запазвайки всички съществуващи стойности. На практика това може да се използва за бързо изчистване на част от масив.
12 | „Изтриване на позиция 3+ReDim Preserve arrExample (1 до 2) |
Пълен пример:
12345678910111213141516171819 | Sub ClearArray3 ()„Създайте динамичен масивDim arrExample () As StringReDim arrExample (1 до 3)„Определете стойностите на масиваarrExample (1) = "Shelly"arrExample (2) = "Стив"arrExample (3) = "Neema"„Изтриване на позиция 3+ReDim Preserve arrExample (1 до 2)'Преоразмерете на 3 позицииReDim Preserve arrExample (1 до 3)„Проверете стойността на масиваMsgBox arrExample (3)End Sub |
Превъртане през целия масив - Нулиране на стойностите
Вместо да изчиствате стойностите на масива с помощта на Erase или ReDim, можете да преминете през целия масив, като нулирате всяка стойност.
** връзка към цикъл **