Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Général VBA
Général VBA Forum général VBA . Pour les logiciels spécifiques (Access, Excel, Word, ...), postez dans les bons sous forums.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 22/01/2007, 13h58   #1
Nouveau Membre du Club
 
Avatar de lio62
 
Inscription : décembre 2006
Messages : 255
Détails du profil
Informations forums :
Inscription : décembre 2006
Messages : 255
Points : 37
Points : 37
Par défaut desactivation du menu outils option ou personnalisation

bonjour,
mçeme lorsqu'une feuille est protégée il y a toujours possiblité de remettre les onglets, barre de formule etc.. est il possible d'empécher Cela

Ne peut on pas supprimer ou le menu outil ous certains sous menu sans possiblité de les remettre
lio62 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/01/2007, 14h19   #2
Membre chevronné
 
Avatar de Theocourant
 
Inscription : janvier 2005
Messages : 618
Détails du profil
Informations personnelles :
Âge : 34
Localisation : France

Informations forums :
Inscription : janvier 2005
Messages : 618
Points : 700
Points : 700
Bonjour,

Merci de faire une recherche car une réponse est présente ici

+

Théo
__________________
Forums VB : lire la notice
La touche existe pour être utilisée
Pensez au tag
Pour ceux n'ayant pas l'aide installée :
- Aide MSDN pour VB6
- Aide MSDN pour VBA
Je ne réponds pas aux questions techniques par MP. Merci d'utiliser le forum fait pour çà.
Theocourant est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/01/2007, 14h42   #3
Nouveau Membre du Club
 
Avatar de lio62
 
Inscription : décembre 2006
Messages : 255
Détails du profil
Informations forums :
Inscription : décembre 2006
Messages : 255
Points : 37
Points : 37
j'ai mis ce code suivant dans l'auto open

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub auto_open()
 
Sheets("menu").Range("a1") = ""
'
Application.CommandBars("standard").Visible = False
Application.DisplayFormulaBar = False
Application.DisplayStatusBar = False
'Application.CommandBars("formating").Visible = False
 
For Each labarre In Application.CommandBars
labarre.Visible = False
Next
MATERIEL.Show
End Sub
mais elle plante a la ligne labarre.visible= false

de plus j'ai toujours la barre des menus avec outils options
lio62 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 18h01.


 
 
 
 
Partenaires

Hébergement Web