Como adicionar um novo valor a um array via vba?
Para adicionar um novo valor a um array existente, você deve ter um array dinâmico para redefinir seus elementos e, ao fazer isso, deve reter os valores dos elementos antigos. Isso ajuda a adicionar apenas o valor ao novo elemento definido e deixa o restante da peça intacto.
Abaixo você tem um array no qual definiu dois elementos. Como este é um array dinâmico, você tem uma instrução “ReDim” para definir dois elementos e então adicionar valores a esses elementos.
Em seguida, adicionaremos um terceiro elemento a este array.
Adicione um novo valor a um array em VBA
- Primeiro, você precisa usar a instrução “ReDim” com a palavra-chave “Preserve” para preservar ambos os elementos, incluindo o novo elemento ao qual deseja adicionar o valor.
- Em seguida, você precisa definir os elementos que deseja ter no array. Aqui você precisa ter três elementos, então usamos de 1 a 3 para isso.
- Depois disso, você precisa agregar valor ao terceiro elemento, que é o novo elemento que você define.
- No final use o debug.print para obter todos os itens com os novos itens na janela imediata.
Option Explicit Option Base 1 Sub vba_array_add_value() Dim myArray() As Variant ReDim myArray(2) myArray(1) = 5 myArray(2) = 10 ReDim Preserve myArray(1 To 3) myArray(3) = 15 Debug.Print myArray(1) Debug.Print myArray(2) Debug.Print myArray(3) End Sub
Deixe-me compartilhar mais algumas palavras com você.
- Você deve declarar um array como um array dinâmico no início se souber que precisará adicionar mais valor ao array no código posteriormente.
- Usando este método você só pode adicionar um novo elemento no final do array.