Este fórum está sendo desativado

[ragealgu]

Pessoal,

preciso que após computado algumas somatorias que faço, clicando
no botão ele transporte a linha de Totais para a PLAN2.... E assim por diante
toda soma que eu fizer e clicar no botão ele armazena.

No anexo esta melhor o entendimento.

[osvaldomp]

Código: Selecionar todos

Sub ReplicaSoma()
 Sheets("Plan2").Cells(Rows.Count, 1).End(3)(2).Resize(, 11).Value = Range("A18:K18").Value
End Sub