Codigo de tiempo

03/02/2005 - 21:48 por Esmerlin Morillo | Informe spam
Saludos,

Utilizo es te codigo para generar en una celda (E5), el
tiempo,

ActiveSheet.Range("E5") = Time

como logro hacer para que cuando pulse el boton de
comando de este codigo me apararezca el tiempo en la
celda de mas abajo, sin afectrame el tiempo de la celda
anterior ("E5"), y asi continuamente.

Gracias por ayuda
 

Leer las respuestas

#1 Fabian
04/02/2005 - 06:23 | Informe spam
Sub Tiempo()
Dim R As Range
For Each R In Range("E5:E65536")
If R = "" Then: R = Time: Exit For
Next
End Sub

Dime, si es lo que necesitas, saludos.
Fabian
"Esmerlin Morillo" escribió en el
mensaje news:11b701c50a31$a6a98550$
Saludos,

Utilizo es te codigo para generar en una celda (E5), el
tiempo,

ActiveSheet.Range("E5") = Time

como logro hacer para que cuando pulse el boton de
comando de este codigo me apararezca el tiempo en la
celda de mas abajo, sin afectrame el tiempo de la celda
anterior ("E5"), y asi continuamente.

Gracias por ayuda

Preguntas similares