Discussion :

[StagiaireEnStress]

bonjour !

je cherchais à tâtons le moyen de faire ceci :

- menus Excel visibles mais désactivés ( non utilisables )
- fenêtre maximisée et non minimisable ( soit minimisée dans la barre des taches, soit plein écran mais pas ouverte sur une partie de l'écran)
- cacher les onglets des différentes feuilles du projet.

j'ai testé :
ActiveWindow.WindowState = xlMaximized
ActiveWindow.DisplayWorkbookTabs

actuellement :
- j'ai réussi a masquer les onglets des différentes feuilles
- je n'ai pas réussi a rendre inopérants le menu excel ( fichier, edition, affichage, et en dessous les menus standards et mise en forme (nouvelle page ouvrir, enregistrer ... )
- je n'ai pas réussi a empêcher l'utilisateur de ne pas maximiser la fenêtre ( désactiver le bouton entre réduire et fermer, en haut a droite )

sauriez vous quelles commandes utiliser ?

[laetitia]

bonjour StagiaireEnStress le forum a adapter

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub masquer()
Dim cb
Application.CommandBars.ActiveMenuBar.Enabled = False
For Each cb In Application.CommandBars
         If cb.Visible = True Then
  cb.Visible = False
    End If
Next cb
End Sub

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub demasquer()
Dim x
On Error Resume Next
For x = 1 To Application.CommandBars.Count
With Application.CommandBars(x)
.Reset
.Enabled = True
End With
Next x
Application.DisplayFormulaBar = True
Application.CommandBars("Standard").Visible = True
Application.CommandBars("Formatting").Visible = True
Application.CommandBars("Visual Basic").Visible = True
End Sub

[StagiaireEnStress]

merci.

j'ai voulu augmenter la sécurité des macro... pour pas qu'une certaine macroi s'éxecute a l'ouverture et...

désormais : tout mes menus sont cachés et mes macros ne s'exécutent plus a cause de la sécurité ... et je ne peux plus changer le menu de sécurité parceque les menus sont invisibles.

comment sortir de cette impasse ?

[laetitia]

re, effectivement si tu as changer le le niveau de sécurite ca va plus marcher tu as plus la "main " nulle part
la restauration du systeme a une date ultérieur ne changera rien!!
reparer excel non plus !!!
le mieux c'est de desinstaller office puis reinstaller
je suis désole j' avais pas pense a cette possibilitée

[laetitia]

re, je viens de faire la manipulation desinstaller office puis reinstaller toujours bloque???
la seule solution a mon avis pour pas formater puis tous reinstaller c'est passer par la base de registre
pour acceder
clic sur demarrer
executer

puis tu ecris regedit
une fenetre s'ouvre
sur le panneau de gauche tu cherches
HKEY_CURRENT_USER
puis tu deroules
Software\Microsoft\Office\11.0\excel\Security
sur le panneau de droite tu va trouver 3 ou4 lignes tu prends
LEVEL........REDWORD.......0X00000001..(4)
double clic sur LEVEL

tu mets 1 a la place de 4 "niveau tres faible!!" PUIS OK
jai réparer comme cela
en esperant que tu as la main sur la base de registre
si tu as pas la "main " rentrer en tant d'admistrateur
encore milles excuses

ps en complement une fois avoir fait tout cela tu as pas forcement accés a la macro pour remettre en place
j' ai mis un zip en l'ouvrant il remettra les barres en place