Longueur d'une variable tableau

[jennifer]

Rebonjour,
j'aimerais utiliser ce code, afin de séparer plusieurs valeurs d'une cellule
(pour l'isntant je met toutes les separtions dans le tableau puis je veux mettre dans chaque cellule le prenom

Le probleme c'est que je ne connais pas la taille de ce tableau ( qui peut varier)
Comment faire pour connaitre sa taille?

Merci d'avance milles fois!

Jennifer

Sub macro2()
Dim Tab() As String
Cells.Find(what:="Prenoms").Select
r = 0
While ActiveCell.Offset(r + 1, 0).Value <> ""
Tab = Split(ActiveCell.Offset(r + 1, 0).Value, ",")
j=0
For i = 0 to ( max du tableau??)
if tab(i)<>"" then
activecell.offset(r+1,j)=Tab(i)
j=j+1
end if
next
r = r + 1
Wend

End Sub

 

[PascalXLD]

Re : Longueur d'une variable tableau

Bonjour

Max du tableau = ubound(tableau)

par contre ce serait bien

For i = 0 to ubound(Tab) -1

ou

For i = 1 to ubound(Tab)

Bonne soirée

 

[jennifer]

Re : Longueur d'une variable tableau

Super super!

Merci encore!
je déteste etre bloquée sur des petites fonctions que je neconnais pas, d'ou vive le forum!

Jennfier