Comment utiliser la fonction UBound dans VBA ?

En VBA (Visual Basic for Applications), la fonction `UBound` est utilisée pour obtenir le plus grand indice dans une dimension spécifiée d’un tableau. Cela peut être particulièrement utile pour parcourir des tableaux lorsque vous ne connaissez pas à l’avance leur taille.

Voici les bases de l’utilisation de la fonction `UBound` :

Syntaxe

UBound(array, [dimension])
  • array : Le tableau dont vous voulez déterminer la limite supérieure.
  • dimension (facultatif) : Une valeur entière qui spécifie la dimension pour laquelle obtenir la limite supérieure. La première dimension a un indice de 1. Si cette fonction n’est pas spécifiée, la première dimension est utilisée par défaut.

Exemple

Supposons que vous ayez un tableau et que vous souhaitez parcourir ses éléments :

Sub ExempleUBound()
    Dim monTableau() As Integer
    Dim i As Integer

    ' Définir la taille du tableau
    ReDim monTableau(1 To 5)

    ' Initialiser le tableau
    For i = 1 To 5
        monTableau(i) = i * 10
    Next i

    ' Utiliser UBound pour parcourir le tableau
    For i = 1 To UBound(monTableau)
        Debug.Print monTableau(i)
    Next i
End Sub

Dans cet exemple :

  • Le tableau `monTableau` est redimensionné avec `ReDim` pour avoir 5 éléments.
  • La boucle `For` initialise le tableau avec des valeurs de 10 à 50.
  • Ensuite, `UBound(monTableau)` est utilisé pour obtenir la limite supérieure de la première dimension du tableau, ce qui permet de parcourir tous les éléments du tableau sans connaître la taille exacte à l’avance.

Note

  • Si vous utilisez `UBound` sur un tableau multidimensionnel, vous pouvez spécifier la dimension pour laquelle obtenir la limite supérieure. Par exemple, `UBound(array, 2)` pour obtenir la limite de la deuxième dimension.
  • Combinez souvent `UBound` avec `LBound` (qui renvoie le plus petit indice) pour parcourir un tableau entre ses limites.

Ce concept est essentiel pour travailler avec des tableaux de taille dynamique dans VBA, assurant que votre code peut s’adapter aux modifications de taille du tableau.

Unlock Your Potential

Excel

Basic - Advanced

Access

Access Basic - Advanced

Power BI

Power BI Basic - Advanced

Help us grow the project