Botão para copiar um valor e colá-lo em determinada célula fixa.
Boa tarde. Estou tentando criar uma macro para fazer um botão que copie qualquer célula selecionada da planilha e cole numa célula fixa qualquer. Obrigado pela atenção. Exemplo: quando eu clicar no botão, e a célula selecionada for a A1, a célula B1 fica com o valor da A1. Clicando no botão com a célula A2 selecionada, a célula B1 fica com o valor da A2.
No excel ela é assim:
Sub Macro1()
Selection.Copy
Cells(2, 2).Select
Selection.PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub