Re: Griser un onglet de classeur |
Titre du sujet : Re: Griser un onglet de classeur par myDearFriend! le 08/11/2014 13:23:48 Bonjour ericcool, Mth, le Forum
Je suis un peu de l'avis de notre amie Mth, ce que tu cherches à faire ericcool est un peu "too much" pour Excel à mon avis...
Une seule proposition pour ma part (et qui ne répond pas tout à fait à ton souhait !) :
DANS LE MODULE DE CODE THISWORKBOOK :
Option Explicit
' myDearFriend! - www.mdf-xlpages.com Dim Jsem As String Private Sub Workbook_open() Jsem = Application.Proper(Format(Date, "dddd")) Sheets(Jsem).Activate End Sub Private Sub Workbook_SheetActivate(ByVal Sh As Object) If Not Sh Is Sheets(Jsem) Then Sheets(Jsem).Activate 'On réactive la feuille du jour End If End Sub Evidemment, ça suppose que tu possèdes à minima un onglet pour chaque jour de la semaine (et pour éviter un plantage si on lance le fichier le week-end, j'ai ajouté Samedi et Dimanche !).
Sauf à imaginer une usine à gaz sur base d'API Windows (et encore, je ne suis pas sûr que ça puisse être tout à fait réalisable), il n'y a aucune autre alternative à mon avis.
En espérant t'avoir rendu service... et en te remerciant pour ta participation au sein de ce Forum tout comme l'amie Mth
Bien cordialement, |
Forums