Notifications
Clear all

adicionando uma nova linha na Array a cada mudança de Loop

2 Posts
2 Usuários
0 Reactions
1,009 Visualizações
(@felipe2269)
Posts: 0
New Member
Topic starter
 

boa tarde a todos

Na planilha1 range("e4:y4") vai puxando os dados da array ( baseArray ) , o processo fica fazendo isso 100 vezes, gostaria que  a cada loop , inserir outro range c16:t16 ( dinâmico ) para uma nova array( gerando 100 resultados )

For i = LBound(baseArray, 1) To UBound(baseArray, 1)
Planilha1.Range("E4:Y4").Value2 = Application.Index(baseArray, i, 0)
novaArray() = planilha1.Range("c16:t16").Value2 ( nesse rang o resultado é dinâmico )
Netx i

 

criei a novaArray no padrão variant,

 

o resultado final é que na novaArray só consta um resultado ( ou seja sempre vai copiando o último loop ), não vai acumulando a cada loop

como faço para adicionar linha a linha na nova ARRAY a cada mudança de loop ?

 

desde já obrigado

 

 
Postado : 22/12/2021 12:51 pm
(@televisaos)
Posts: 0
New Member
 

Olá @felipe2269,

Vc já tentou usar a função Redim Preserve?

Att, Televisaos.

 
Postado : 27/12/2021 12:01 pm