ouverture d'excel sur une feuille donnée

Dans le module de this Workbook :

Private Sub Workbook_Open()
Sheets(Format(Date, "mmmm")).Select
End Sub

AV

bonjour,

Ecirire une procédure Workbook_Open dans le module Thisworkbook du fichier
dans laquelle les instrcutions suivantes peuvent être mises

Mois=month(now)
ensuite soit un select case p.e

select case Mois
case 1
sheets("Janvier").activate
etc...

soit si les feuilles sont rangées dans l'ordre ( mais je déconseille la
pratique suivante ) toujours Month(now) mais directement
sheets(Month(now)).activate

A+

bonjour,
J'ai un fichier excel avec 12 feuilles que j'ai appelé "janvier", "février",
"mars" etc...
Comment faire pour que lors de l'ouverture du fichier, il s'ouvre toujours
sur la feuille du mois en cours?
merci

Bonjour dd,

Non testée...
dans la feuille de code de ThisWorkbook

Private Sub Workbook_Open()
Sheets(Format(Date, "mmmm")).Select
End Sub


ChrisV


"dd" <dd@discussions.microsoft.com> a écrit dans le message de news:
71C4D098-1459-4C36-BA57-EFE3EE6A097D@microsoft.com...

bonjour,
J'ai un fichier excel avec 12 feuilles que j'ai appelé "janvier",
"février",
"mars" etc...
Comment faire pour que lors de l'ouverture du fichier, il s'ouvre toujours
sur la feuille du mois en cours?
merci

Salut Alain,
Désolé pour le doublon... :-(


ChrisV


"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
ugf9j$IIFHA.720@TK2MSFTNGP10.phx.gbl...

Dans le module de this Workbook :

Private Sub Workbook_Open()
Sheets(Format(Date, "mmmm")).Select
End Sub

AV

Désolé pour le doublon... :-(

Vu la difficulté, on pouvait s'y attendre
Et puis la 2° couche n'est jamais inutile
;-)
AV