[Resolvido]Copiar uma coluna na janela de código VBA.

Salve galera.

Na janela de código VBA eu gostaria de copiar uma coluna (parte do código na vertical) para colar em outro parte do código;

Ex:

Me.TXT_VFATAL_201 = Nz(DSum("Vitima_Fatal", "cs_Acidente_por_Data_Digitada", "Rodovia = '201'"), 0) ' Soma a quantidade de Vítima Fatal na SP 201 (se não houver valor exibe 0
Me.TXT_VFATAL_225 = Nz(DSum("Vitima_Fatal", "cs_Acidente_por_Data_Digitada", "Rodovia = '225'"), 0) ' Soma a quantidade de Vítima Fatal na SP 225 (se não houver valor exibe 0
Me.TXT_VFATAL_328 = Nz(DSum("Vitima_Fatal", "cs_Acidente_por_Data_Digitada", "Rodovia = '328'"), 0) ' Soma a quantidade de Vítima Fatal na SP 328 (se não houver valor exibe 0
Me.TXT_VFATAL_332 = Nz(DSum("Vitima_Fatal", "cs_Acidente_por_Data_Digitada", "Rodovia = '332'"), 0) ' Soma a quantidade de Vítima Fatal na SP 332 (se não houver valor exibe 0


Nesse caso eu copiaria somente a coluna abaixo (e não as linhas completas);

201
225
328
332



Não sei se é possível, tentei de várias formas e não consegui.

Valew.

Boa tarde,
Porque não cria um array e executa o código em ciclo através do array e também pode aceder aos números armazenados no array

Boa tarde Alexandre Neves.

Nunca criei esse, seria possível me dar um exemplo?

Boa noite
Estude arrays. obtém ajuda em muitos locais
veja este
https://msdn.microsoft.com/en-us/library/wak0wfyt.aspx

Bom Dia a todos;

Aqui também muito bem explicado;

https://www.maximoaccess.com/t7580-arrays-veja-como-utiliza-las-para-simplificar-e-automatizar-tarefas

blz pessoal, brigadão pela força.