A forma mais rápida e simples seria escrever: Sub Resposta_Atividade() Range("A3").Value="=20+10" End Sub
No entanto, se quisermos alterar o valor da célula e mantermos a soma, precisamos usar o seguinte código: Sub Resposta_Atividade() Range("A3").Value=Range("A1").Value+Range("A2").Value End Sub
