Ferreira, é um pouco dificil dar uma resposta positiva sem ter seu exemplo, eu me basiei só pela sua imagem e pelo que postou, mas vamos tentar :
Disse que tem Botões nas celulas ao lado, necessitaria saber que tipo de Botão é (Controle).
Para alterar Hora em "O9" :
Supondo que seu Botão esteja em "N9", no Evento Click coloque a rotina:
Range("O9").Value = Format(Now, "hh:mm:ss")
Para alterar Hora em "Q9" :
Supondo que seu Botão esteja em "P9", no Evento Click coloque a rotina:
Range("Q9").Value = Format(Now, "hh:mm:ss")
Para alterar Hora em "O10" :
Supondo que seu Botão esteja em "N10", no Evento Click coloque a rotina:
Range("O10").Value = Format(Now, "hh:mm:ss")
Para alterar Hora em "Q10" :
Supondo que seu Botão esteja em "P10", no Evento Click coloque a rotina:
Range("Q10").Value = Format(Now, "hh:mm:ss")
e assim por diante.
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 25/10/2011 6:06 pm