- 10 Dez 2021 às 18:14
#68262
Boa tarde, colegas.
Como posso adequar esse código para que ele copie somente algumas células da linha imediatamente acima na tabela?
Preciso copiar os valores da Linha 1 para a Linha 2 e isso o código acima atende certinho.
Mas agora tenho necessidade de copiar SOMENTE os valores das colunas (3 a 6), (9) e (11 a 12) para não perder as fórmulas das demais colunas.
Acho que funcionaria com a função "ARRAY", correto? Mas não sei montar o código com ela ainda.
Alguém poderia me ajudar?
Como posso adequar esse código para que ele copie somente algumas células da linha imediatamente acima na tabela?
Código: Selecionar todos
Tenho uma Tabela que possui aproximadamente 20 colunas e algumas delas com fórmulas.With Tabela
.ListRows.Add (Linha), alwaysinsert:=True
.ListRows(1).Range.Copy
.ListRows(2).Range.PasteSpecial xlPasteAllUsingSourceTheme, Operation:=xlNone _
, SkipBlanks:=False, Transpose:=False
End With
Preciso copiar os valores da Linha 1 para a Linha 2 e isso o código acima atende certinho.
Mas agora tenho necessidade de copiar SOMENTE os valores das colunas (3 a 6), (9) e (11 a 12) para não perder as fórmulas das demais colunas.
Acho que funcionaria com a função "ARRAY", correto? Mas não sei montar o código com ela ainda.
Alguém poderia me ajudar?