Subscript - Pod Fechar

[DeStiLaDo]

OLÁ;

TENHO A SEGUINTE SEQUENCIA:

TEXTO = #NOME#EMAIL#TEXTO1#TEXTO2

DANDO SPLIT NOS DADOS FICARIA ASSIM:

texto = split(TEXTO,"#")

texto_count=int(((UBound(TEXTO)+1))-0.5)

for f = 0 to texto_count - 0 step 1

NEXT

AI POSSO SEPARAR OS DADOS, (OBS.: COMEÇARIA EM "0" MAS COMO EU PUS O DELIMITADOR JÁ NO INICIO, AI EU COMEÇO EM 1)

O CASO É Q ÀS VEZES A VARIAVEL TEXTO, NÃO APRESENTA A SEQUENCIA EXPLICADA ACIMA, DANDO ESSE ERRO:

Subscript out of range: '[number: 1]'

TENHO 2 PERGUNTAS POIS não SEI C O ERRO ESTÁ NO LOOP OU C NA DEFINIÇÃO DA PRIMEIRA PARTE DO RETORNO DO PROCESSO DO LOOP:

1)CASO A SOLUÇÃO SEJA NO LOOP

COMO FAÇO PARA CRIAR UMA CONDICIONAL DENTRO DO FOR PARA ELE SAIR DO LOOP CASO ELE DETECTE Q A VARIÁVEL NÃO TEM SEQUENCIA?

texto = split(TEXTO,"#")

texto_count=int(((UBound(TEXTO)+1))-0.5)

for f = 0 to texto_count - 0 step 1

COMO FAÇO???

NEXT

2)CASO SEJA quando MONTO OS DADOS EM SEPARADO

var1 = texto(1) - o subscript out of range dá na linha da definicão desta variavel

var2 = texto(2)

var3 = texto(3)

var4 = texto(4)

TENHO Q CRIAR A CONDIÇÃO DO ERRO AKI?

VALEU GENTE

[dnlmosilva]

Tenta:

texto = split(TEXTO,"#")
texto_count = UBound(TEXTO) + 1

for f = 0 to texto_count - 1 step 1
   ... codigo ...
next

Tipo Array começa com indice zero...

[DeStiLaDo]

USEI UMA VARIANTE DA SUA SOLUÇÃO dnlmosilva;

fiz uma condição no momento que defini as 4 variáveis... caso não forem um total de 4, pára o restante do script... ai não porecisei mexer no loop;

valeu