Inserir diversos valores num array

2024 - VBA & Macros

Post Recente por xlarruda 7 anos atrás

4 Posts

2 Usuários

0 Reactions

1,167 Visualizações

RSS

gilbertjrs

(@gilbertjrs)

Posts: 77

Trusted Member

Topic starter

Pessoal, tem como inserir diversos valores ao mesmo tempo num array?

Ao invés de:

Dim strNomes(5) as String

strNomes(0)="João da Silva"
strNomes(1)="Maria Lima"
strNomes(2)="Pedro Sabino"
strNomes(3)="Marcia de Souza"
strNomes(4)="Carlos Manga"

Fazer algo assim:

Dim strNomes(5) As String

strNomes = ["João da Silva","Maria Lima","Pedro Sabino","Marcia de Souza","Carlos Mang"]

Postado : 11/01/2018 10:12 am

xlarruda

(@xlarruda)

Posts: 732

Honorable Member

Olá colega gilbertjrs Tudo bem?

Não sei se entendi mas, seria isso?

* No caso abaixo o valor da célula ativa é : Pedro Sabino.

Sub teste()
Dim strNome As Variant

strNome = Array("João da Silva", "Maria Lima", "Pedro Sabino", "Marcia de Souza", "Carlos Mang")

ActiveCell.Value = strNome(2)
End Sub

Abrç!

___________________________________________________________________________________________
Se a resposta atendeu sua dúvida, por favor, clique no Gostei e marque o Tópico como [Resolvido].

Att.

André Arruda

Postado : 11/01/2018 10:24 am