Bitácora y reloj digital

[EMIRO ERAZO]

Como Ingeniero Civil, elaboré una Bitácora de Obra, con Calendario cuyo día está enlazado con una Celda; genera Imágenes (del estado de la Obra). Aparte tengo un Reloj digital LED.

Quiero colocar este Reloj digital LED, en una celda de la Bitácora

Bitácora.rar

Reloj digital LED.rar

[AlexanderS]

Hola el adjunto del reloj esta vació, si quieres un reloj en una celda pon esto en un modulo:

Sub Reloj()

  Range("A1").Formula = "=NOW()"

  Application.OnTime Now + TimeValue("00:00:01"), "reloj"

End Sub[/CODE]

Y esto en ThisWorkbook

[CODE]Private Sub Workbook_Open()
call Reloj
End Sub
[/CODE]

La hora la mostrara en la celda "A1", debes cambiar el formato de la celda para que solo muestre la hora y no la fecha tambien.

Salu2

[EMIRO ERAZO]

• El reloj digital LED, que tengo está elaborado en base a un gráfico de dispersión XY.

(Las Fórmulas de dispersión deben aparecer en una tercera Hoja de la Bitácora)

• Hay una serie de líneas para cada dígito en su estado encendido y apagado.

•El código VBA se actualiza los valores de tiempo.

• Las posiciones de las líneas xy se realizan usando la fórmula dentro de las células

Nota: Me gusta la apariencia de este Rerloj, y quisiera que se insertara en mi Bitácora en celda M10

Reloj LED.xls

[EMIRO ERAZO]

Tengo un nuevo Reloj: Reloj digital en USERFORM, que es más accequible para manejarlo. Requiero insertarlo en Mi Bitácora en Celda M10

Reloj didital en Userform.rar

[EMIRO ERAZO]

Inserté el Reloj digital en mi Bitácora, pero ahora la insertación de Imágenes que me funcionaba, ahora no me funciona

Bitácora con Reloj digital.rar