Masquer le ruban du menu sur tous les classeurs en VBA sur Excel 2013

- - Dernière réponse : cs_Le Pivert
Messages postés
6425
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
8 décembre 2019
- 28 nov. 2019 à 13:38
Bonjour à tous.
J'ai besoin d'aide pour masquer le ruban du menu sur tous les classeurs d'un fichier par une programmation en VBA sur Excel 2013, de façon qu'aucun autre utilisateur du fichier ne puisse y accéder

Merci d'avance pour votre aide
Afficher la suite 

3 réponses

Messages postés
6425
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
8 décembre 2019
420
0
Merci
Bonjour,

en vba:

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)" 'masquer
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)" ' afficher



Commenter la réponse de cs_Le Pivert
0
Merci
Bonsoir cs_le Pivert,
Merci pour l'aide, mais en rentrant le code et lançant le débogage, il me renvoi le msg suivant :
Erreur d'exécution 438
Propriété ou méthode non gérée par cet objet.
cs_Le Pivert
Messages postés
6425
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
8 décembre 2019
420 -
A mettre dans ThisWorkbook:

Option Explicit
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False 'rétablir
End Sub
Private Sub Workbook_Open()
Application.DisplayFullScreen = True 'masquer
End Sub


celui-ci l'utilisateur peut le modifier

tu peux mettre cela à la place, l'utilisateur ne peut pas le modifier à part dans la macro

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)" 'masquer
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)" ' afficher


voilà

@+ Le Pivert
Commenter la réponse de kingsarky
0
Merci
Merci, encore
Celui-ci :
Option Explicit
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False 'rétablir
End Sub
Private Sub Workbook_Open()
Application.DisplayFullScreen = True 'masquer
End Sub
Fonctionne bien comparativement au premier.
Mais tu dis qu'un utilisateur peut le modifier, justement je ne le veux pas.
Comment faire pour empêcher sa modification par un utilisateur ?
> cs_Le Pivert
Messages postés
6425
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
8 décembre 2019
-
Bonjour,
J'ai regardé le site, il ne solutionne pas mon problème, le menu reste réactivable avec le bouton droit, ce que je ne veux pas.
> cs_Le Pivert
Messages postés
6425
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
8 décembre 2019
-
Re bonjour,
J'ai trouvé ce code qui empêche l'utilisation du click droit, mais dès qu'on réduit la fenêtre, le ruban du menu réapparaît, donc toujours pas de solution satisfaisante !

Private Sub
Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
Cancel = True
End Sub
cs_Le Pivert
Messages postés
6425
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
8 décembre 2019
420 -
Et le classeur, cela donne quoi?
> cs_Le Pivert
Messages postés
6425
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
8 décembre 2019
-
Je ne comprends pas ta question, il s'agissait d'empêcher la présentation du ruban di menu sur toutes les feuilles du classeur.
Dès qu'on minimise la fenêtre du classeur le Ruban réapparaît, donc pas de solution viable pour le moment.
cs_Le Pivert
Messages postés
6425
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
8 décembre 2019
420 -
Dans le classeur que j'ai posté, chez moi en Excel 2007 on ne peut pas minimiser la fenêtre!
Commenter la réponse de kingsarky