Bonjour à tous,

Voilà j'ai un classeur avec beaucoup de feuille et j'aimerai qu'à l'ouverture du fichier seule la feuille "Engagements" soit visible.
Comment puis-je procéder sans écrire plusieurs lignes de code.
Merci par avance

Voici mon code d'ouverture :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
Private Sub WorkBook_Open()
Dim cmdb As CommandBar
Dim vRep As Integer
       barre_menus_perso
              Creation_MaBarre
       depart
For Each cmdb In Application.CommandBars
Next cmdb
    UFbonj.Show
With Application
    .DisplayFullScreen = False
    .DisplayStatusBar = False
    .CommandBars("Worksheet Menu Bar").Enabled = False
    .CommandBars("Standard").Visible = False
    .CommandBars("Formatting").Visible = False
    .CommandBars("Visual Basic").Visible = False
    .DisplayFormulaBar = True
    Sheets("Détail").Visible = False
    End With
With ActiveWindow
    .DisplayHeadings = False
    .Zoom = 100
    End With
Dim msg As String
Dim insuf As Boolean
 
    Application.ScreenUpdating = False
Test1
End Sub