............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

Timer Control

Ver el tema anterior Ver el tema siguiente Ir abajo

Timer Control

Mensaje por P@li el Dom Abr 06, 2008 8:20 pm

Hola,

Para los que programamos en Visual Basic 6.0, incluso en versiones posteriores y anteriores, tenemos un control que lo único que hace es ejecutar un evento llamado timer cada cierto tiempo, con lo que tenemos la posibilidad de crear un reloj, un cronómetro, o lo que querramos hacer con esa función.

Cuando vamos a VBA, y pretendemos usar este control, nos sorprende no tenerlo, porque pareciera ser uno de los más básicos controles ActiveX.

Ciertamente no está disponible para VBA, y por eso es que dedique un buen rato para lograr hacer uno con mis propias manos, haciendo uso de las API's de Windows.

Les dejo el control para instalar, y además el código fuente (Visual Basic 6.0)

Espero que le encuentren utilidad.

Saludos.

Para ver el LINK DE DESCARGA: REGISTRATE
DESCARGAR ARCHIVO

y
DESCARGAR ARCHIVO

P@li
Admin

Masculino Cantidad de envíos : 243
Edad : 33
Ciudad - Pais : Buenos Aires, Argentina
Version de Excel : Microsoft Excel 2002 (10.2614.2625)
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: Timer Control

Mensaje por GalileoGali el Jue Abr 10, 2008 8:57 pm

Muy buen aporte p@li!!!.
Ahora bien, puede ocurrir que a otros interesados en ver el Control, durante la isntalacion se les reclame la libreria vb6es.dll. A mi me costo encontrar una descarga gratuita, asi que me juego y aca les dejo un link:


DESCARGA VB6ES.DLL

Desde ya que despues de agregada a c:\WINDOWS\system32, tuve que habilitar como Control Adicional en la ToolBox del Userform del VBE, el Time Control, pegandolo sobre el formulario. Me permiti cambiar el Showmodal del Form a False, para que el Timer, no me impida desplazarme por la hoja.

Excelente aporte.....!!!!!!!!

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1962
Edad : 61
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

MIL GRACIAS p@li!!!

Mensaje por AdryG el Mar Abr 28, 2009 6:17 pm

Estuve buscando esto durante casi 2 días -horario laborable claro. E intentando alternativas que no funcionaron.

Nunca había estado en este sitio. Tuve miedo de registrarme pero valió el susto....

Excelente lo tuyo p@li y muchas gracias otra vez.

AdryG

Femenino Cantidad de envíos : 1
Edad : 39
Ciudad - Pais : Argentina
Version de Excel : 2007
Fecha de inscripción : 28/04/2009

Volver arriba Ir abajo

Re: Timer Control

Mensaje por gfellay el Jue Mayo 14, 2009 3:50 pm

Excelente aporte P@li y gracias Gali por la aclaración del VB6.

Saludos
gfellay

gfellay

Masculino Cantidad de envíos : 21
Edad : 47
Ciudad - Pais : Bs. As. - Argentina
Version de Excel : 2010
Fecha de inscripción : 12/09/2008

Volver arriba Ir abajo

Re: Timer Control

Mensaje por P@li el Vie Mayo 15, 2009 4:26 pm

Gracias a todos por sus comentarios y agradecimientos, (tarde pero seguro) gracias Gali por aclarar lo de la librería VB6, importantísima observación.

Saludos,

P@li
Admin

Masculino Cantidad de envíos : 243
Edad : 33
Ciudad - Pais : Buenos Aires, Argentina
Version de Excel : Microsoft Excel 2002 (10.2614.2625)
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: Timer Control

Mensaje por SALVADOR el Mar Ago 25, 2009 8:32 am

Aunque con retraso ,( el ultimo comentario fue el 15 de Mayo.....) ahora entro en este sitio y .... despues de descargar el Timer Control ,y el VB6s.dll ( y ponerla en c:\WINDOWS\system32 ), cuando intento poner el control en un formulario me aparece:
Bibioteca no registrada...??

Ahora que ??. Espero alguna ayuda

Gracias.

SALVADOR

Cantidad de envíos : 3
Fecha de inscripción : 12/03/2008

Volver arriba Ir abajo

Re: Timer Control

Mensaje por SALVADOR el Mar Ago 25, 2009 8:43 am

Falsa alarma.... ya di con la solucion a este problema... ahora que ya me aparece el control time en el formulario, no puedo variarlo de tamaño ni distinguir ningun dato horario en su interior.....??.
La propiedad Activado, esta en false y no se puede variar a true.....

Que hay que hacer .....??

SALVADOR

Cantidad de envíos : 3
Fecha de inscripción : 12/03/2008

Volver arriba Ir abajo

Re: Timer Control

Mensaje por P@li el Mar Ago 25, 2009 10:42 am

Salvador,

Un ejemplo muy simple, insertá un formulario nuevo, al formulario agregale un Timer, y en el código del formulario poné esto:

Código:

Private Sub Timer1_Timer()
    Me.Caption = Now
End Sub

Private Sub UserForm_Initialize()
    Timer1_Timer
    Timer1.Visible = False
    Timer1.Intervalo = 1000 '1 segundo
    Timer1.Activado = True
End Sub

Lo que hace esto es incorporar un reloj en el título de la ventana, la verdad es que tiene múltiples usos, pero este es uno de los más comunes.

Saludos.

P@li
Admin

Masculino Cantidad de envíos : 243
Edad : 33
Ciudad - Pais : Buenos Aires, Argentina
Version de Excel : Microsoft Excel 2002 (10.2614.2625)
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: Timer Control

Mensaje por SALVADOR el Mar Ago 25, 2009 1:50 pm

Ah... es verdad.... Muy chulo...

Eres un genio P@li. Ahora a incorporarlo a los proyectos

¡ Enhorabuena Maestro !

SALVADOR

Cantidad de envíos : 3
Fecha de inscripción : 12/03/2008

Volver arriba Ir abajo

CONTROL TIMER

Mensaje por OMARDONIS el Vie Ene 15, 2010 12:05 pm

Con una consulta baje el control Timer, y al utilizar el instalador me da el siguiente error:
No se puede abrir el archivo: SETUP.LST
No se puede Copiar el archivo SETUP.LST. No se puede continuar con el proceso de instalacion.

Como puedo hacer para instalarlo manualmente?, ya probe copiando el archivo ControlTimer.OCX en System32 y luego REGSVR32 c:\windows\system32\ControlTimer.ocx, y tambien tengo en mi maquina ya instalados VB6ES.DLL y VB6STKIT.DLL. Pero al probar el control en una hoja de excel me aparece que no existe. Yo tengo Windows XP Profesional version 2002 con Sp2. Que puedo hacer?

OMARDONIS

Masculino Cantidad de envíos : 5
Edad : 35
Ciudad - Pais : GUATEMALA
Version de Excel : EXCEL 2003
Fecha de inscripción : 14/01/2010

Volver arriba Ir abajo

Re: Timer Control

Mensaje por OMARDONIS el Vie Ene 15, 2010 12:37 pm

Ya logre instalarlo, la solucion fue copiar el archivo de instalacion en el escritorio, y luego hacer el procedimiento normal, ahi me dejo instalarlo sin problemas, yo tenia el archivo en mis documentos/archivos/excel/macros/varios, al parecer por ejecutarlo desde ahi provocaba problema. Siempre gracias, talvez mi problema le sirva a alguien mas en el futuro.

OMARDONIS

Masculino Cantidad de envíos : 5
Edad : 35
Ciudad - Pais : GUATEMALA
Version de Excel : EXCEL 2003
Fecha de inscripción : 14/01/2010

Volver arriba Ir abajo

Re: Timer Control

Mensaje por P@li el Lun Ene 18, 2010 10:35 am

OMARDONIS
Me alegro que hayas podido instalar el control, entré para leer el mensaje que habían escrito, pero veo que ya está resuelto el asunto. Espero que le saques el mejor provecho y también me gustaría conocer tu oponión, sugerencia y/o comentario al respecto.

Saludos,
Pablo.

P@li
Admin

Masculino Cantidad de envíos : 243
Edad : 33
Ciudad - Pais : Buenos Aires, Argentina
Version de Excel : Microsoft Excel 2002 (10.2614.2625)
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: Timer Control

Mensaje por OMARDONIS el Lun Ene 18, 2010 10:55 am

Me parece un excelente aporte, de hecho yo en un tiempo realice en excel un libro que era usado por varios usuarios, y necesite ponerle tiempo de uso, que el usuario indicara cuanto tiempo lo iva a utilizar, 1 minuto, 2, 3, 5 minutos. y cuando se cumpliera el tiempo se cerrara el libro. Busque en muchos lugares como hacer eso y necesitaba un control como este, pero no lo encontre, lo resolvi con esta macro:

Sub StartTemporizador()
datHora = Now + TimeValue("00:00:01")
Application.OnTime _
Earliesttime:=datHora, _
Procedure:=conRunMacro, _
Schedule:=True
End Sub

Pero era bastante complicadado de manejar, con este control voy a poder hacer un monton de cosas que antes no podia, muy buen aporte te lo agradezco, la verdad es de mucha utilidad....

OMARDONIS

Masculino Cantidad de envíos : 5
Edad : 35
Ciudad - Pais : GUATEMALA
Version de Excel : EXCEL 2003
Fecha de inscripción : 14/01/2010

Volver arriba Ir abajo

Re: Timer Control

Mensaje por P@li el Miér Ene 20, 2010 9:34 am

Gracias por tu comentario,
A mi me pasaba algo parecido, y acostumbrado a programar en Visual Basic la falta del Timer en VBA realmente complica las cosas, por eso hice este control.
No dudes en comentar cualquier consulta o sugerencia.

Saludos,
Pablo.

P@li
Admin

Masculino Cantidad de envíos : 243
Edad : 33
Ciudad - Pais : Buenos Aires, Argentina
Version de Excel : Microsoft Excel 2002 (10.2614.2625)
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: Timer Control

Mensaje por Antoni el Sáb Feb 06, 2010 6:08 am

P@li, eres un genio.
avatar
Antoni
Moderador
Moderador

Masculino Cantidad de envíos : 21
Edad : 66
Ciudad - Pais : Santiago de Compostela - Galicia
Version de Excel : XP-2007
Fecha de inscripción : 28/12/2009

Volver arriba Ir abajo

Re: Timer Control

Mensaje por P@li el Vie Mar 05, 2010 12:50 am

Gracias por el elogio Antoni, pero sinceramente no creo que sea para tanto, jajaja!!

P@li
Admin

Masculino Cantidad de envíos : 243
Edad : 33
Ciudad - Pais : Buenos Aires, Argentina
Version de Excel : Microsoft Excel 2002 (10.2614.2625)
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: Timer Control

Mensaje por alpuca el Jue Dic 27, 2012 2:13 pm

P@li
Buenos dias y feliz fin de año.
Descargue los dos archivos, el paquete de instalacion y el codigo fuente.
pero ya descargados salen con extencion .png y no se que hacer con ellos.
si pudieras explicarme por favor.
Gracias.

alpuca

Masculino Cantidad de envíos : 1
Edad : 37
Ciudad - Pais : cuba
Version de Excel : 2003
Fecha de inscripción : 27/12/2012

Volver arriba Ir abajo

Re: Timer Control

Mensaje por luisramald1970 el Vie Mar 28, 2014 12:10 am

22:10:1203.27.2014
avatar
luisramald1970

Masculino Cantidad de envíos : 1
Edad : 41
Ciudad - Pais : Lima
Version de Excel : xp
Fecha de inscripción : 27/03/2014

Volver arriba Ir abajo

Re: Timer Control

Mensaje por mekka el Jue Oct 30, 2014 5:32 pm

El link para descargar el time control no esta funcionado

mekka

Masculino Cantidad de envíos : 1
Edad : 38
Ciudad - Pais : santiago
Version de Excel : 2010
Fecha de inscripción : 30/10/2014

Volver arriba Ir abajo

no funcionan los link

Mensaje por jaimefranco1985 el Sáb Mar 28, 2015 10:59 pm

no funcionan los link me podrias ayudar con eso por favor muchas gracias

jaimefranco1985

Masculino Cantidad de envíos : 1
Edad : 31
Ciudad - Pais : colombia
Version de Excel : 2013
Fecha de inscripción : 28/03/2015

Volver arriba Ir abajo

Re: Timer Control

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.