Macro automática
Enviado: 12 Fev 2022 às 14:54
por 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!!
Re: Macro automática
Enviado: 12 Fev 2022 às 18:22
por osvaldomp
Sullivan2021 escreveu: ↑12 Fev 2022 às 14:54
Vocês sabem como fazer isso?
Eu não sei, mas segue um palpite ... vai que ...
Código: Selecionar todosSub 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.
Re: Macro automática
Enviado: 13 Fev 2022 às 14:02
por Sullivan2021
@osvaldomp funcionou!! Obrigado pela contribuição!! Me ajudou bastante e poupou muito tempo que eu iria gastar