XL 2010 Masquer le menu excel

[Usine à gaz]

Bonsoir à toutes et à tous,

Me voilà de nouveau à vous solliciter, mes essais et recherches étant infructueuses.

Toujours dans mon "chef d'oeuvre" ou plutôt "votre chef d'oeuvre", je souhaite masquer la barre des menus afin que mes intervenants ne puissent pas faire autre chose que saisir des informations et cliquer sur les boutons des macros.

Après pas mal de recherches, j'ai trouvé sur un site (je ne sais plus où) un fichier remplissant cette fonction.
Et ça marche bien ..... Le voici en pièce jointe.

Quand j'intègre les codes pourtant très courts dans mon fichier de travail, ça ne va plus et il m'affiche une erreur de compilation - variable non définie.
je joins la photo de l'erreur.

Auriez-vous la solution ?

J'ai une seconde question LOL
Même si le fichier joint fonctionne bien, il est facile de tout ré-afficher en cluquant sur Maj+Echappt.
Est-il possible de neutraliser ?

Avec mes remerciements,
Je vous souhaite à toutes et à tous une bonne fin de journée,
Amicalement,
Lionel,

 

[Usine à gaz]

LOL, je pense avoir échappé à la fessée ..... quoi que, si c'est une jolie dame qui s'exécute, je veux bien

 

[cathodique]

Je l'attends avec impatience ce fichier. Sinon désolé, mais t'as affaire à un vieux bouc endurci.
Imagine un peu la fessée

 

[Usine à gaz]

ça fera deux vieux boucs LOL

 

[cathodique]

Bonjour Arthour973,

Je me suis intéressé un peu plus à ton fichier.
Et ce matin, je me suis aperçu que même le menu contextuel ne fonctionne pas (clic droit).
Est-ce normal?

 

[Usine à gaz]

Bonjour Cathodique, Le Forum,

OUI, pour mon utilisation, c'est normal car je ne veux pas qu'on fasse de copier/coller.
Mon fichier est particulier et de plus en plus complet. Il serait trop long de vous expliquer LOL
Amicalement,
Lionel,

 

[cathodique]

Dans ces conditions, tant mieux pour toi et tant pis pour moi.triple Lol.

 

[Usine à gaz]

Pkoi tant pis pour toi ?
Je peux faire en sortes que tu puisses utiliser le clic droit ... enfin je crois LOL

 

[cathodique]

Pkoi tant pis pour toi ?
Je peux faire en sortes que tu puisses utiliser le clic droit ... enfin je crois LOL

Trop gentil de ta part, c'est avec un très grand plaisir d'avoir le clic droit.

 

[JCGL]

Bonjour à tous,

Si tu veux avoir le clic droit :

Private Sub Workbook_WindowActivate(ByVal Wn As Window)
' Active ce classeur, met en plein écran
' Application.DisplayFullScreen = True
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
    Application.CommandBars("Formatting").Enabled = False
    'Application.CommandBars("Cell").Enabled = False
End Sub

A+ à tous

 

[cathodique]

Bonjour JCGL

Très gentil de ta part mais toujours pas de clic-droit avec ce code.

Private Sub Workbook_WindowActivate(ByVal Wn As Window)
'    '--- active ce classeur, met en plein écran ---
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
Application.CommandBars("Formatting").Enabled = False
End Sub

Merci.

 

[JCGL]

Bonjour à tous,

Peux-tu tester ce fichier ?

Tu as bien compris que le code s'active à l'activation de la fenètre donc il faut jouer avec deux classeurs ouverts.

A+ à tous

 

[cathodique]

Tu as bien compris que le code s'active à l'activation de la fenêtre donc il faut jouer avec deux classeurs ouverts.

Pour être honnête, je n'ai vu que du feu. Il y a des jours où je n'ai plus de matière grise.

Entre-temps, j'ai retéléchargé le fichier d'Arthour. à la première ouverture, il n'y a pas de plein écran mais à la seconde si. Pas compris pourquoi, alors que c'est l'unique fichier ouvert.

Comme, je n'ouvre qu'un seul fichier je vais utiliser les évènements open et beforeclose.

Ton fichier fonctionne parfaitement. Merci beaucoup.

 

[TooFatBoy]

Bonjour,

OUI, pour mon utilisation, c'est normal car je ne veux pas qu'on fasse de copier/coller.

Tu crois vraiment que les gens s'embêtent à utiliser le menu contextuel pour faire un simple copier/coller ? LOL

A moins que le bloquage de l'affichage du menu contextuel permette en même temps de désactiver le <Ctrl> + <Ins> et le <Shift> + <Ins> ?

 

[Usine à gaz]

Bonjour JCgl,
Bonjour Marcel,
Bonjour Cathodique,
Bonjour le Forum,

Marcel : Tu as raison mais pour moi, c'est très important.
Voici une version avec clic droit pour Cathodique.
Bonne journée à toutes et à tous,
Amicalement,
Lionel,

 

[cathodique]

Bonjour la compagnie,

Merci beaucoup pour ton retour. Je testerai ton fichier.
Car entretemps, j'ai fouiné de mon côté et suis parvenu à ce que je voulais aboutir.

Bonne journée.