Cómo puedo saber cuantos valors de un array estan llenos?
Por ejemplo:

Dim Contador As Integer
Dim Directori() As String

Label2.Caption = "Directori " & Dir1.Path & " :" & vbCrLf

For Contador = 0 To (Dir1.ListCount - 1)
 Dir1.Path = Dir1.List(Contador)
 Directori = Split(Dir1.Path, "\")
 Label2.Caption = Label2.Caption & vbCrLf & Dir1.Path
 Dir1.Path = Dir1.List(-2)
Next
MsgBox "Aqui quiero saber el número de índices de Directori que existen, es decir, el último valor x de Directori(x) que existe"

Espero que puedan ayudarme (y que entiendan el problema, porque lo he puesto un poco lioso!!).
Muchas gracias!

Usa etiquetas code por favor sino se borran los post. Si no sabes lo que son mira el foro.