Bonsoir,

Quelqu'un pourrait-il m’éclairer sur ce plantage:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Sub test()
 
    Dim toto As Variant, titi As Variant
 
    toto = Range("A1:A3").Value
    Debug.Print UBound(toto, 1), UBound(toto, 2) 'affiche 3 (lignes) et 1 (colonne)
    titi = WorksheetFunction.Transpose(toto)
    Debug.Print UBound(titi, 1), UBound(titi, 2) 'plante sur la dimension 2, devrait afficher 1 et 3 ???????
 
End Sub
Je comprends pas tout là ?

Merci d'avance à tous.