Fonction VBA : IsArray
La fonction VBA IsArray renvoie True si la variable pointe vers un tableau ou False si ce n'est pas le cas.
Utilisation :
IsArray(variable)
Exemple d'utilisation
La fonction suivante renvoie le nombre d'éléments d'un tableau ou la valeur -1 s'il ne s'agit pas d'un tableau (déterminé grâce à la fonction IsArray) :
Function count(tableau)
If IsArray(tableau) Then
count = UBound(tableau) + 1
Else
count = -1
End If
End Function
Exemple de valeurs retournées par cette fonction :
Sub exemple()
'Exemple avec un tableau (avec 2 éléments)
tableau = Array("EXCEL", "PRATIQUE")
MsgBox count(tableau) 'Renvoie : 2
'Exemple avec un tableau (avec 4 éléments)
Dim tableau2(3)
MsgBox count(tableau2) 'Renvoie : 4
'Exemple avec une variable
texte = "EXCEL"
MsgBox count(texte) 'Renvoie : -1
End Sub