Masquer tous les onglets sauf mon persol onglet
Résolu/Fermé
A voir également:
- Masquer tous les onglets sauf mon persol onglet
- Rouvrir onglet fermé - Guide
- Onglet privé - Guide
- Onglet (informatique) - Guide
- Comment masquer les amis sur facebook - Guide
- Masquer conversation whatsapp - Guide
1 réponse
Mike-31
Messages postés
18350
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
28 novembre 2024
5 105
2 juin 2015 à 19:50
2 juin 2015 à 19:50
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
Modifié par delta70 le 2/06/2015 à 23:36
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
3 juin 2015 à 01:31
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">