Vetores

[lcs_sp]

E ai pessoal beleza ???

toh tentando vazer o seguinte: tenho uma string e quero quebrar com um split e depois pegar o número máximo do vetor, mas tah dando erro, o q tah errado :

'vetor de conversão de dia
Dim vet_dia As String
Dim dia(0 To 30) As String

dia = "F1|E1|D1|C1|B1|A1|Z0|Y0|X0|V0"
vet_dia = Split(dia, "|")

    MsgBox UBound(vet_dia)

Valeu

[Garcia]

Você inverteu as variáveis.

Tenta assim:

'vetor de conversão de dia

Dim vet_dia As Variant

Dim dia As String

dia = "F1|E1|D1|C1|B1|A1|Z0|Y0|X0|V0"

vet_dia = Split(dia, "|")

MsgBox UBound(vet_dia)

Beleza ?