Eu estou recuperando dados do Excel e gostaria demantenha meus arrays 0 baseados, mas o Excel retorna 1 base. Existe uma maneira bastante simples de retornar alterar a matriz de 1 a 0 de base? Ou eu só preciso criar um loop?
Aqui está um exemplo de código aqui:
dim oData(,) as object
dim rng as range
dim wks as worksheet = xlApp.Activeworkbook.sheets(Sheet1)
rng=wks.Range("A1:B2")
oData=rng.Value2
Respostas:
7 para resposta № 1Um loop é a opção mais simples.
Dim target as string(0 to oData.Length - 1)
For index = 1 to oData.Length
target(index - 1) = oData(index)
Next
Isso é de memória e não testado, mas é óbvio o suficiente.