Masquer tous les onglets sauf mon persol onglet
Résolu
Utilisateur anonyme
-
Utilisateur anonyme -
Utilisateur anonyme -
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
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
A voir également:
- Masquer tous les onglets sauf mon persol onglet
- Raccourci rouvrir onglet fermé - Guide
- Comment masquer les amis sur facebook - Guide
- Masquer conversation whatsapp - Guide
- Edge nouvel onglet google - Forum Microsoft Edge / Internet Explorer
- Zut, l’onglet a planté… ✓ - Forum Mozilla Firefox
1 réponse
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
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
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
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">