/ / Taille d'un tableau dans Excel VBA

Taille d'un tableau dans Excel VBA

Pour obtenir le taille d'un tableau dans Excel VBA, vous pouvez utiliser les fonctions UBound et LBound.

Placez un bouton de commande sur votre feuille de calcul et ajoutez les lignes de code suivantes:

1. Nous devons d’abord déclarer le tableau. Notre tableau a deux dimensions. Il se compose de 5 lignes et 2 colonnes. Déclarez également deux variables de type Integer.

Dim Films(1 To 5, 1 To 2) As String, x As Integer, y As Integer

Le tableau peut ressembler à ceci.

Taille d'un tableau dans Excel VBA

2. Ensuite, nous obtenons la taille du tableau. Ajoutez les lignes de code suivantes:

x = UBound(Films, 1) - LBound(Films, 1) + 1
y = UBound(Films, 2) - LBound(Films, 2) + 1

UBound (Films, 1) donne la limite supérieure de la première dimension, qui est 5.
LBound (Films, 1) donne la limite inférieure de la première dimension, qui est 1.

UBound (Films, 2) donne la limite supérieure de la deuxième dimension, qui est 2.
LBound (Films, 2) donne la limite inférieure de la deuxième dimension, qui est 1.

En conséquence, x est égal à 5 ​​et y est égal à 2.

3. Nous utilisons une MsgBox pour afficher le nombre d'éléments du tableau.

MsgBox "This array consists of " & x * y & " elements"

Résultat:

Résultat de la taille d'un tableau

Lisez aussi: