Ce tutoriel vous apprendra comment effacer un tableau en VBA.
Effacer le tableau entier
Pour effacer un tableau entier, vous pouvez utiliser le Effacer la déclaration:
1 | Effacer l'arrExemple |
En pratique:
123456789101112131415 | Sous ClearArray()'Créer un tableau statiqueDim arrExample (1 à 3) en tant que chaîne'Définir les valeurs du tableauarrExample(1) = "Shelly"arrExample(2) = "Steve"arrExample(3) = "Neema"'Effacer le tableau entierEffacer l'arrExemple'Vérifier la valeur du tableauMsgBox arrExemple(1)Fin du sous-marin |
Redimensionner et effacer le tableau
Si votre tableau est dynamique (un tableau dynamique est un tableau qui peut être redimensionné, par opposition à un tableau statique qui ne peut pas être redimensionné), vous pouvez utiliser le Commande ReDim pour redimensionner le tableau, en effaçant tout le tableau de valeurs.
12 | 'Effacer le tableau entierReDim arrExample (1 à 4) |
Exemple complet :
12345678910111213141516 | Sous ClearArray2()'Créer un tableau dynamiqueDim arrExample() en tant que chaîneReDim arrExample (1 à 3)'Définir les valeurs du tableauarrExample(1) = "Shelly"arrExample(2) = "Steve"arrExample(3) = "Neema"'Effacer le tableau entierReDim arrExample (1 à 4)'Vérifier la valeur du tableauMsgBox arrExemple(1)Fin du sous-marin |
Effacer une partie d'un tableau
Comme mentionné ci-dessus, la commande ReDim redimensionnera un tableau, effaçant toutes les valeurs du tableau. Au lieu de cela, vous pouvez utiliser ReDim préserver pour redimensionner le tableau, en préservant toutes les valeurs existantes. En pratique, cela peut être utilisé pour effacer rapidement une partie d'un tableau.
12 | 'Effacer la position 3+ReDim Preserve arrExample (1 à 2) |
Exemple complet :
12345678910111213141516171819 | Sous ClearArray3()'Créer un tableau dynamiqueDim arrExample() en tant que chaîneReDim arrExample (1 à 3)'Définir les valeurs du tableauarrExample(1) = "Shelly"arrExample(2) = "Steve"arrExample(3) = "Neema"'Effacer la position 3+ReDim Preserve arrExample (1 à 2)'Redimensionner à 3 positionsReDim Preserve arrExample (1 à 3)'Vérifier la valeur du tableauMsgBox arrExample(3)Fin du sous-marin |
Boucle sur l'ensemble du tableau - Réinitialisation des valeurs
Au lieu d'effacer les valeurs du tableau à l'aide d'Erase ou de ReDim, vous pouvez parcourir tout le tableau en réinitialisant chaque valeur.
**lien vers la boucle**