Come logica ci sei.
Modifica però il primo For
codice:
For i = 0 To UBound(vett) -1