Afficher une feuille au bout d'un temp d'innactivité.

Bonjour,

Une piste mais en VBA.

1) Copiez le code suivant dans ThisWorkbook (faites Alt+F11 pour accéder au
VBE
puis, dans la fenêtre Projet, double cliquez sur ThisWorkbook et copiez
le code)
**********
'___________________________
Private Sub Workbook_Activate()
Call CreeDecompte
End Sub
'___________________________
Private Sub Workbook_Deactivate()
On Error Resume Next
Application.OnTime _
EarliestTime:=Start, _
Procedure:="SelectGraph", _
Schedule:úlse
End Sub
'___________________________
Private Sub Workbook_SheetSelectionChange _
(ByVal Sh As Object, ByVal Target As Range)
Call CreeDecompte
End Sub
**********

2) Dans un module standard copiez le code suivant (adaptez les constantes
DELAI
et GRAPHE à votre usage)
**********
'#########################################
'### Adaptez les Constantes suivantes ###
'### à votre usage. DELAI = "00:00:05" ###
'### signifie 5 secondes. GRAPHE est ###
'### le nom de la feuille fond d'écran ###
Const DELAI As String = "00:00:05"
Const GRAPHE As String = "Feuil3"
'#########################################

Public Start As Double
'___________________________
Sub CreeDecompte(Optional Dummy As Byte)
On Error Resume Next
Application.OnTime _
EarliestTime:=Start, _
Procedure:="SelectGraph", _
Schedule:úlse
Start = Now + TimeValue(DELAI)
Application.OnTime _
EarliestTime:=Start, _
Procedure:="SelectGraph", _
Schedule:=True
End Sub
'___________________________
Sub SelectGraph(Optional Dummy As Byte)
Sheets(GRAPHE).Select
Call CreeDecompte
End Sub
**********

CELA FAIT
Toutes les 5 secondes la feuille "Feuil3" est sélectionnée SAUF si
l'utilisateur
a changé la sélection de cellule(s). Si plusieurs classeurs sont ouverts
simultanément seul le classeur où figure les macros est affecté.

Cordialement.
---
PMO
Patrick Morange

j'ai un classeur ou il y a une feuille de saisi et autre qui contient un
graphe. je veu donc qd l'utilisateur saisi rien pendant un temp, affichier la
feuille ou il ya le graphe( en fond d'ecran).