Masquer tous les onglets sauf mon persol onglet

Résolu
Bonjour,
Dans un modèle Excel, j'ai créé un onglet personnalisé sur le ruban. (Excel 2010)
J'aimerais masquer tous les onglets sauf mon personnel onglet sur le ruban Excel personnalisé mais je ne trouve pas le code à placer dans le fichier XML.

Merci d'avance pour votre réponse.

Excellente soirée à tous !
Cordialement

1 réponse

  1. Bonsoir,
    possible seule en VBA, un code pour masquer tous les onglets sauf l'onglet nommé mon personnel
    et un code pour afficher tous les onglets

    Option Explicit

    Sub Masquer()
    Dim Compteur As Byte
    Application.ScreenUpdating = 0
    For Compteur = 1 To Worksheets.Count
    If Sheets(Compteur).Name <> "mon personnel" Then
    Sheets(Compteur).Visible = False
    End If
    Next
    End Sub

    Sub Afficher()
    Dim Compteur As Byte
    Application.ScreenUpdating = 0
    For Compteur = 1 To Worksheets.Count
    Sheets(Compteur).Visible = True
    Next
    End Sub

    0
    1. Merci Mike
      Mais mon problème est les onglets du ruban pas les feuilles. (les onglets prédéfinis sont "Accueil" , "Insertion" , "Mise en page" ...)
      https://www.cjoint.com/c/EFcvKuXpKnG
      0
    2. @Utilisateur anonymeBonsoir
      J"ai trouvé la solution
      L'attribut "startFromScratch true ou false " .La valeur "true" masque les onglets prédéfinis du ruban et quelques éléments du bouton "Office". La valeur "false" (donnée pas défaut) affiche les onglets prédéfinis.
      XML
      <customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
      <ribbon startFromScratch="true">
      0