Afficher un message

  #4 (permalink)  
Vieux 02/02/2008, 16h27
Geo
 
Messages: n/a
Par défaut Re: gadget horloge dans office 2007 section Word ?

Bonjour à roileo qui nous a écrit :

> je souhaite avoir l'horloge comme celle qui se trouve dans la barre du bureau de vista
> mais dans le logiciel office en continue (j'espère être assez clair, rire).
> merci de votre réactivité et convivialité.
> amitié.


Voici une macro qui fait ça :
Option Explicit
Public Const Délai As Integer = 5 ' secondes
Public Sub Affiche()
Dim Message As String
Dim conv As Double ' jours en secondes
conv = 1 / CDbl(86400)
Message = "Il est " & Time & " "
StatusBar = Message
Application.OnTime when:=Now + Délai * conv, name:="Affiche"
End Sub
Vous l'appelez à partir d'une macro AutoExec et vous adaptez le délai.
L'affichage est relativement fugitif car Word met des tas
d'informations dans cette barre et ça va se chamailler.

--
A+


Réponse avec citation
 
Page generated in 0,28259 seconds with 9 queries