Masquer certains onglets

[Lighter]

Bonjour le forum,

Je cherche à savoir comment ne pas afficher tous les onglets d'une feuille Excel. Par exemple, j'aimerai cacher les onglets 1,3 et 4 et ne montrer que le 2. Quel code puis-je utiliser !
D'avance merci à vous tou(te)s pour votre aide précieuse.
Bonne journée

 

[mth]

Re : Masquer certains onglets

Bonjour,

Pour cacher un onglet, tu peux essayer ceci par exemple pour l'onglet Feuil1:

 Sheets("Feuil1").Visible = False

et pour le remettre:

Sheets("Feuil1").Visible = True

Tu peux également utiliser l'enregistreur de macros pour connaître le code.

Bonne journée,

mth

Edit: 🙂 Bonjour Pierrot 🙂
ma réponse est effectivement un peu vague 😱
Bonne journée à toi 🙂
m

 

[Pierrot93]

Re : Masquer certains onglets

Bonjour,

essaye peut être ainsi, code à utiliser dans le module "thisworkbook" :

Option Explicit
Private Sub Workbook_Open()
Dim i As Byte
For i = 1 To Worksheets.Count
    If Worksheets(i).Index <> 2 Then Worksheets(i).Visible = xlSheetHidden
Next i
End Sub

bonne journée
@+

Edition : bonjour Mireille🙂