Este fórum está sendo desativado

[Sullivan2021]

Boa tarde, estou com uma dúvida. Suponha que eu tenha um botão na célula F3, com uma macro configurada para copiar a célula D3. Eu quero copiar esse mesmo botão da célula F3 para a célula F5 e fazer com que ele automaticamente copie a célula D5, sem necessariamente eu criar um novo código de macro para esse botão da célula F5. Veja abaixo:



Vocês sabem como fazer isso? Obrigado pela atenção!!

[osvaldomp]

Vocês sabem como fazer isso?
Eu não sei, mas segue um palpite ... vai que ...

Código: Selecionar todos

Sub CopiaCélD()
 Cells(ActiveSheet.Buttons(Application.Caller).TopLeftCell.Row, "D").Copy [A1]
End Sub

#
O código acima adota como referência a linha em que estiver o canto esquerdo alto do botão clicado.

[Sullivan2021]

@osvaldomp funcionou!! Obrigado pela contribuição!! Me ajudou bastante e poupou muito tempo que eu iria gastar