Página 1 de 1
Macro Copiar / Colar
Enviado: 20 Abr 2021 às 15:42
por CAMILOALVES
Boa Tarde!
O objetivo é, copiar o dado digitado na célula “C10” da planilha “Cadastro Horário” para a célula “N7” da planilha “CALENDÁRIO”, tentei até fazer uma macro, porém está dando bug.
Anexo planilha para se possível fazer análise do bug.
OBS: Caso tenham uma solução melhor, aceitamos sugestão
Desde Já Agradeço
Re: Macro Copiar / Colar
Enviado: 20 Abr 2021 às 15:59
por mucascosta
Veja se ajuda:
Public Sub HORARIO()
Plan30.Cells(7, 14) = Plan87.Cells(10, 3)
End Sub
Re: Macro Copiar / Colar
Enviado: 20 Abr 2021 às 16:30
por CAMILOALVES
Prezado mucascosta - 20 Abr 2021 às 16:59
Primeiramente Muito Obrigado Por dispor de seu tempo para ajudar-me.
Então, É isso mesmo, só que tentei replicar sua solução para as demais células ("C11", "C12", "C13") e não obtive êxito.
Se Possível, daria para Você Verificar?
Desde Já Agradeço.
OBS: Anexo novamente a planilha já com a sua solução para célula "C10".
Re: Macro Copiar / Colar
Enviado: 20 Abr 2021 às 17:14
por mucascosta
Vc pode vincular em um único botão para copiar as 4 informações...
Public Sub HORARIO()
Plan30.Cells(7, 14) = Plan87.Cells(10, 3)
Plan30.Cells(8, 14) = Plan87.Cells(11, 3)
Plan30.Cells(12, 14) = Plan87.Cells(12, 3)
Plan30.Cells(13, 14) = Plan87.Cells(13, 3)
End Sub
Re: Macro Copiar / Colar
Enviado: 20 Abr 2021 às 17:28
por osvaldomp
#
Prezado, CAMILOALVES - 20 Abr 2021 às 17:30.
E se você utilizar somente um botão para rodar a macro abaixo e replicar os 4 horários de uma vez, seria viável?
Código: Selecionar todosSub ReplicaHoras()
Sheets("CALENDÁRIO").[N7:N8].Value = [C10:C11].Value
Sheets("CALENDÁRIO").[N12:N13].Value = [C12:C13].Value
End Sub
Re: Macro Copiar / Colar
Enviado: 20 Abr 2021 às 17:30
por osvaldomp
mucascosta escreveu: ↑20 Abr 2021 às 17:14
Vc pode vincular em um único botão para copiar as 4 informações...
@mucascosta foi de Ferrari e eu de Fusca

Re: Macro Copiar / Colar
Enviado: 22 Abr 2021 às 14:48
por CAMILOALVES
Boa tarde!
Prezados mucascosta - 20 Abr 2021 às 18:14 e osvaldomp - 20 Abr 2021 às 18:28.
Primeiramente Gostaria de agradecê-los pela dedicação, paciência e ensinamento.
Dizer também que o compartilhamento de conhecimento só enobrece o Homem.
Ambas as soluções funcionaram, sendo úteis inclusive para futuras aplicações.
Atenciosamente.