En VBA (Visual Basic for Applications), l’instruction `ReDim` est utilisée pour redimensionner les tableaux dynamiques. Elle permet de changer la taille d’un tableau après sa déclaration initiale. Voici comment l’utiliser :
Déclaration Initiale
Tout d’abord, vous devez déclarer un tableau dynamique sans spécifier sa taille :
Dim monTableau() As Integer
Utilisation de ReDim
Pour redimensionner le tableau, utilisez `ReDim` :
ReDim monTableau(5)
Cela crée un tableau capable de contenir 6 éléments (de l’indice 0 à 5).
Réinitialiser le Tableau
Gardez à l’esprit que `ReDim` réinitialise également les valeurs du tableau. Si le tableau contient déjà des données, ces dernières seront perdues.
Conserver les Données Existantes
Si vous souhaitez redimensionner le tableau tout en conservant les données existantes, utilisez le mot-clé `Preserve` :
ReDim Preserve monTableau(10)
Cela augmente la taille du tableau à 11 éléments tout en conservant les données existantes. Notez que seul le dernier indice d’un tableau peut être redimensionné lors de l’utilisation de `Preserve`.
Exemple Complet
Voici un exemple complet illustrant l’utilisation de `ReDim` et `Preserve` :
Sub ExempleReDim()
Dim monTableau() As Integer
Dim i As Integer
' Déclaration initiale et affectation de valeurs
ReDim monTableau(2)
For i = 0 To 2
monTableau(i) = i + 1
Next i
' Redimensionnement du tableau pour contenir plus d'éléments
ReDim Preserve monTableau(5)
For i = 3 To 5
monTableau(i) = i + 1
Next i
' Affichage des résultats
For i = 0 To 5
Debug.Print monTableau(i)
Next i
End Sub
Dans cet exemple, le tableau est initialement redimensionné pour contenir 3 éléments (0 à 2), puis étendu à 6 éléments (0 à 5) avec conservation des valeurs initiales.
Unlock Your Potential
Excel
Access
Power BI
