Boa tarde Edimar,

Fazer um código para copiar é simples, mas não entendi bem o seu propósito.

Se você quer copiar o valor de varias células para uma? O Excel tem mais de 1 milhão de linhas, não vai ficar bom para trabalhar com tantos botões.

Coloque uma planilha de exemplo, assim fica mais fácil ajudar e entender.

att,

Ou entao fazer assim

Em B1

=Plan1!A1

Depois basta arrastar.

Boa tarde Bruno,

Anexei uma planilha com exemplo do que preciso.

A ideia é trabalhar com no máximo 50 botões.

Obrigado.

Qual a ideia que vc tem sobre isso. Enfim qual o objetivo?

Talvez nao precise de 50 botoes

Se vc esclarecer o objetivo talvez apareça uma solução melhor.

Não é usual criar 50 macros para fazer a mesma coisa.

Boa tarde edimar,

O código abaixo copia o valor da célula da Plan1 para a célula A1 da Plan2:

Sub Copiar01()
    
    Sheets("Plan2").Range("A1").Value = Sheets("Plan1").Range("C4").Value
    
End Sub

Para colocar o código no botão, clique em cima do botão -> Atribir macro -> selecione a macro -> OK.
Não esqueça de colocar o código dentro de um módulo. Para o outros botões, 'basta' ir copiando o código e alterando o valor que vai na Range.("C4") para a célula correspondente e ir colocando botões e atribuindo a macro...

Agora, você poderia explicar melhor o que você está fazendo como colocado pelo colega MPrudencio.
Talvez alguém possa sugerir algo melhor do que repetir a estrutura umas 50 vezes.

att,

Obrigado pelas respostas.

O objetivo e criar um gráfico na plan2 com base no texto copiado da plan1. A ideia é que o gráfico mude de acordo com o texto base.
Num primeiro momento achei melhor criar 50 botões ai invés de criar 50 gráficos.

Esse texto copiado é a base para uma série de informações de venda na empresa onde trabalho.

Pq vc nao usa uma validação de dados?

O ideal seria uma planilha com mais informações (mais proxima da planilha original com mais informações do objetivo).

Mas pela pouca informação acho que uma validação resolve.