Ez az oktatóanyag megtanítja, hogyan kell törölni egy tömböt a VBA -ban.
Teljes tömb törlése
A teljes tömb törléséhez használja a Nyilatkozat törlése:
1 | Törlés arrExample |
Gyakorlatban:
123456789101112131415 | Sub ClearArray ()'Statikus tömb létrehozásaPélda (1-3.) Karakterlánc'Határozza meg a tömbértékeketarrExample (1) = "Shelly"arrExample (2) = "Steve"arrExample (3) = "Neema"'Törölje az egész tömbötTörlés arrExample'Ellenőrizze a tömb értékétMsgBox arrPélda (1)End Sub |
Tömb átméretezése és törlése
Ha a tömb dinamikus (a dinamikus tömb olyan tömb, amely átméretezhető, szemben a statikus tömbrel, amely nem méretezhető át), akkor használhatja a ReDim parancs a tömb átméretezésére, a teljes értéktömb törlésére.
12 | 'Törölje az egész tömbötReDim arrExample (1-4) |
Teljes példa:
12345678910111213141516 | Sub ClearArray2 ()'Dinamikus tömb létrehozásaDim arrExample () karakterlánckéntReDim arrExample (1-3)'Határozza meg a tömbértékeketarrExample (1) = "Shelly"arrExample (2) = "Steve"arrExample (3) = "Neema"'Törölje az egész tömbötReDim arrExample (1-4)'Ellenőrizze a tömb értékétMsgBox arrPélda (1)End Sub |
Egy tömb világos része
Amint fentebb említettük, a ReDim parancs átméretezi a tömböt, törli az összes értéket a tömbből. Ehelyett használhatja ReDim Preserve hogy átméretezze a tömböt, megőrizve a meglévő értékeket. A gyakorlatban ezzel egy tömb egy részét gyorsan törölhetjük.
12 | 'Törölje a 3+ pozíciótReDim Preserve arrExample (1-2) |
Teljes példa:
12345678910111213141516171819 | Sub ClearArray3 ()'Dinamikus tömb létrehozásaDim arrExample () karakterlánckéntReDim arrExample (1-3)'Határozza meg a tömbértékeketarrExample (1) = "Shelly"arrExample (2) = "Steve"arrExample (3) = "Neema"'Törölje a 3+ pozíciótReDim Preserve arrExample (1-2)'Átméretezés 3 pozícióbaReDim Preserve arrExample (1-3)'Ellenőrizze a tömb értékétMsgBox arrExample (3)End Sub |
Loop keresztül az egész tömbön - Az értékek visszaállítása
A tömbértékek törlése vagy törlése vagy a ReDim használatával a cikket a teljes tömbön keresztül lehet áthelyezni, minden értéket visszaállítani.
** link a hurokhoz **