Ouvrir un fichier à un onglet précis

Bonjour,

J'aimerais savoir comment faire en sorte que mon fichier s'ouvre à un onglet précis .

Merci beaucoup

Bonsoir à tous,

Dans le ThisWorkbook

ici à l'ouverture, on active la feuille "Accueil" et on se positionne en "A1"

Private Sub Workbook_Open()
    With Sheets("Accueil")
        .Activate
        .Range("a1").Activate
    End With
End Sub

Amicalement

Claude

Merci beaucoup, ca marche très bien.

Et comment masquer les autres ?

J'ai bien essayé

With Sheets ("aaa")

. Visible = False

End with

mais cela ne marche pas ...

CDT

re,

çà devrait marcher !

ici on masque "Feuil1", "Feuil2" et "Feuil3"

Private Sub Workbook_Open()
Dim Sh
    For Each Sh In Array("Feuil1", "Feuil2", "Feuil3")
        Sheets(Sh).Visible = False
    Next Sh

    With Sheets("Accueil")
        .Activate
        .Range("a1").Activate
    End With
End Sub

Claude

Ca marche parfaitement !!

Merci !!

Bonjour,

J'ai utiliser ce codeet maintenant quand je reviens sur mon fichier excel après avoir consulter un autre fichier excel il repart à la page somaire. Y aurait il une astuce pour contourner cela?

Merci