Ouvrir un fichier Excel sur une feuille précise

Bonjour le forum,

J'ai un fichier Excel *.xlsm qui contient plusieurs feuilles et je souhaiterais pouvoir intégrer une macro qui lorsque l'on ouvre le fichier qu'il s'ouvre automatiquement sur une feuille précise (Menu en l'occurrence), que le curseur se positionne sur la cellule A1 avec un zoom à 110.

En fait, ce fichier est utilisé par plusieurs utilisateurs qui lorsqu'ils quittent et sauvegardent le fichier en question, ils le quittent dans une feuille qui n'est pas nécessairement pas le menu, ce que je ne souhaite pas !

J'espère avoir été claire et je remercie déjà la personne qui pourra me donner un p'tit coup de macro dont je ne maîtrise pas "encore" les bénéfices.

Belle journée et cordiales salutations.

La mademon

Bonjour et bienvenue sur le forum

A mettre dans la feuille VBA "ThisWorkbook'' :

Private Sub Workbook_Open()
    Sheets("Menu").Activate
End Sub

Bye !

Bonjour le forum,

Private Sub Workbook_Open()
Sheets("Menu").Select
Range("a1").Select

End Sub

Rebonjour le Forum,

En fait, il faudrait que je puisse intégrer au code ci-après, un zoom fixe à 110, la sélection de la cellule A1, puis l'ouverture sur le fichier "Menu" à chaque réouverture du fichier en question, car sinon, si je copie le code donné, j'ai un message d'erreur !

Private Sub Workbook_Open()

Dim sht As Worksheet

For Each sht In Worksheets

With sht

.Protect Password:="blablabla", UserInterfaceOnly:=True, AllowFiltering:=True

End With

Next sht

End Sub

@+ et MERCI pour la réponse !

Et pour le zoom :

ActiveWindow.Zoom = 110

Oups ! Ou faut-il mettre ce code et celui qui ramène le curseur dans la cellule A1?

Lamademon a écrit :

Oups ! Ou faut-il mettre ce code et celui qui ramène le curseur dans la cellule A1?

Private Sub Workbook_Open()

Sheets("Menu").Select
Range("a1").Select
ActiveWindow.Zoom = 110
End Sub

La réponse est indiquée à la première ligne du code.

Bonjour,

Une seule procédure WorkbookOpen !

Tu mets donc le code à ajouter dans la même procédure à la suite.

Cordialement.

Yes !

C'est SUPER ! C'est exactement ce que je cherchais !

Un grand MERCI à toi/vous et une toute belle journée !

Avec mes plus cordiales salutations.