Bonjour, j'ai une liste de valeurs texte dans un Range A27:A34 et je voudrais le mettre dans une liste et l'afficher. J'arrive à afficher "8" qui est la taille du range mais j'ai un bug en jaune sur la ligne où je veux afficher la 5eme valeur...

Comment faire svp ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Sub test()
    Dim Suppliers As Variant
    Suppliers = ActiveSheet.Range("A27:A34").Value2
    MsgBox UBound(Suppliers)
    MsgBox "" & Suppliers(5)
End Sub