Ouvrir par défaut une feuille selon la date
Marie
-
cs_Le Pivert Messages postés 8437 Statut Contributeur -
cs_Le Pivert Messages postés 8437 Statut Contributeur -
Bonjour,
Je travaille de nuit dans une urgence du centre-ville. Nous avons un fichier Excel pour gérer les appels fait aux médecins. Sur le coup de minuit, j’ouvre un document intitulé « changements ». Chaque jour du mois correspond à une feuille. Le fichier a été programmé pour s’ouvrir sur la feuille du 21. Y a t-il une façon qu’il s’ouvre sur la date du jour ? Et si oui, peut on choisir que le 1er par exemple, soit calculé de 8am le 1er à 8am le matin du 2. Ainsi à partir de 8am le 2, la feuille s’ouvrirait sur le 2. Merci !
Je travaille de nuit dans une urgence du centre-ville. Nous avons un fichier Excel pour gérer les appels fait aux médecins. Sur le coup de minuit, j’ouvre un document intitulé « changements ». Chaque jour du mois correspond à une feuille. Le fichier a été programmé pour s’ouvrir sur la feuille du 21. Y a t-il une façon qu’il s’ouvre sur la date du jour ? Et si oui, peut on choisir que le 1er par exemple, soit calculé de 8am le 1er à 8am le matin du 2. Ainsi à partir de 8am le 2, la feuille s’ouvrirait sur le 2. Merci !
2 réponses
-
Bonjour.
" Le fichier a été programmé pour s’ouvrir sur la feuille du 21 " Comment ?
-
Bonjour,
a mettre dans ThisWorkbook et à adapter:
Option Explicit Private Sub Workbook_Open() Dim heure As String Dim jour As String heure = Format(Now, "hh") jour = Format(Now, "dd") If heure > 8 Then Sheets(jour).Activate End If End Sub
voilà
