P papycaen XLDnaute Nouveau 21 Mars 2008 #1 Bonjour, J'ai un classeur avec 9 feuilles de calcul, je voudrais qu'à l'ouverture du classeur, la feuille 9, s'affiche toujours en 1er. je ne sais pas comment faire. Merci pour votre aide. Cordialement
Bonjour, J'ai un classeur avec 9 feuilles de calcul, je voudrais qu'à l'ouverture du classeur, la feuille 9, s'affiche toujours en 1er. je ne sais pas comment faire. Merci pour votre aide. Cordialement
Pierrot93 XLDnaute Barbatruc 21 Mars 2008 #2 Re : Ouverture d'une feuille Bonsoir Papycaen regarde le code ci dessous, à placer dans le module "thisworkbook", se déclenche à l'ouverture du classeur : Code: Private Sub Workbook_Open() Sheets("Feuil9").Select End Sub ou Feuil9 est le nom de la feuille en question... bonne soirée @+ Vote positif 0 Vote négatif
Re : Ouverture d'une feuille Bonsoir Papycaen regarde le code ci dessous, à placer dans le module "thisworkbook", se déclenche à l'ouverture du classeur : Code: Private Sub Workbook_Open() Sheets("Feuil9").Select End Sub ou Feuil9 est le nom de la feuille en question... bonne soirée @+
P papycaen XLDnaute Nouveau 21 Mars 2008 #3 Re : Ouverture d'une feuille Pierrot93 à dit: Bonsoir Papycaen regarde le code ci dessous, à placer dans le module "thisworkbook", se déclenche à l'ouverture du classeur : Code: Private Sub Workbook_Open() Sheets("Feuil9").Select End Sub ou Feuil9 est le nom de la feuille en question... bonne soirée @+ Cliquez pour agrandir... Bonjour Pierrot93, Merci de m'avoir répondu, le code fonctionne très bien. Cordialement Vote positif 0 Vote négatif
Re : Ouverture d'une feuille Pierrot93 à dit: Bonsoir Papycaen regarde le code ci dessous, à placer dans le module "thisworkbook", se déclenche à l'ouverture du classeur : Code: Private Sub Workbook_Open() Sheets("Feuil9").Select End Sub ou Feuil9 est le nom de la feuille en question... bonne soirée @+ Cliquez pour agrandir... Bonjour Pierrot93, Merci de m'avoir répondu, le code fonctionne très bien. Cordialement
M mercant76 XLDnaute Impliqué 22 Mars 2008 #4 Re : Ouverture d'une feuille bonjour à tous une solution toute simple est de sélectionner la feuille 9 avant de sauvegarder. à l'ouverture la feuille 9 est en premier @+ Vote positif 0 Vote négatif
Re : Ouverture d'une feuille bonjour à tous une solution toute simple est de sélectionner la feuille 9 avant de sauvegarder. à l'ouverture la feuille 9 est en premier @+
Dull XLDnaute Barbatruc 22 Mars 2008 #5 Re : Ouverture d'une feuille Salut Papycaen, Pierrot , Mercant76, le Forum Juste une petite précision Si c'est la dernière feuille que tu doit activer à l'ouverture (Ajout éventuel de Feuille) regarde ce Code a mettre dans le Module ThisWorkbook Code: Private Sub Workbook_BeforeClose(Cancel As Boolean) Sheets(Sheets.Count).Activate ThisWorkbook.Close SaveChanges:=True End Sub Ce sera toujours la dernière feuille du fichier qui sera activée ou Code: Private Sub Workbook_Open() Sheets(Sheets.Count).Activate End Sub A L'ouverture du fichier c'est comme tu veut Bonne Journée Dernière édition: 22 Mars 2008 Vote positif 0 Vote négatif
Re : Ouverture d'une feuille Salut Papycaen, Pierrot , Mercant76, le Forum Juste une petite précision Si c'est la dernière feuille que tu doit activer à l'ouverture (Ajout éventuel de Feuille) regarde ce Code a mettre dans le Module ThisWorkbook Code: Private Sub Workbook_BeforeClose(Cancel As Boolean) Sheets(Sheets.Count).Activate ThisWorkbook.Close SaveChanges:=True End Sub Ce sera toujours la dernière feuille du fichier qui sera activée ou Code: Private Sub Workbook_Open() Sheets(Sheets.Count).Activate End Sub A L'ouverture du fichier c'est comme tu veut Bonne Journée