Array - Adicionando dados em nova ARRAY
Enviado: 19 Dez 2021 às 18:50

boa noite a todos
Nesse exemplo abaixo, estou tentando atualizar uma nova ARRAY a cada loop ( executado )
Na planilha1.Range("E4:Y4") vai recebendo da Array " planilha2 " ( linha a linha ), quero aproveitar o loop na primeira linha e copiar outro range da planilha1 e ir acumulando essas informações numa nova ARRAY "planilha3" ( para no final descarregar todas de uma vez ),
fiz esse exemplo : planilha3 = planilha1.Range("c16:t16").Value , e só grava uma linha por cima da outra ( só restando a copiada por último na nova array (planilha3 ).
como faço para ir acumulando informações na nova array a cada loop ?
desde já obrigado
--------------------------------------------------------------------------------------------------------------------------------------------------------------
planilha3() as variant
For i = LBound(planilha2) To UBound(planilha2)
planilha1.Range("E4:Y4").Value2 = Application.Index(planilha2, i, 0)
planilha3 = planilha1.Range("c16:t16").Value2
Next i