patrol
XLDnaute Occasionnel
tous d'abord slut a tous , car je suis nouveau sur le site
voila maquestion
j'ai crée une macro avec bien du mal ouf! qui m'enleve les barres de menu et d'outil sur une feuille excel ceci dans le but d'empecher les mal veillants de trafiquer cette macro ain que les autres d'ailleur bref
le probleme est que cette macro m'affiche egalemement d'autre classeur en plein ecran , donc plus d'acces aubouton , et je ne trouve pas de sulution
quelqu'un peut m'aider
voici cette macro
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 03/07/2008 par NOEL Philippe
'"Suppression" (je mets des guillemets !) :
Dim CmdB As CommandBar
For Each CmdB In Application.CommandBars
CmdB.Enabled = False
Next CmdB
'
End Sub
Sub Macro2()
'
' Macro2 Macro
' Macro enregistrée le 03/07/2008 par NOEL Philippe
'Résurrection :
Dim CmdB As CommandBar
For Each CmdB In Application.CommandBars
CmdB.Enabled = True
Next CmdB
'
End Sub
amitié a tous
patrol
voila maquestion
j'ai crée une macro avec bien du mal ouf! qui m'enleve les barres de menu et d'outil sur une feuille excel ceci dans le but d'empecher les mal veillants de trafiquer cette macro ain que les autres d'ailleur bref
le probleme est que cette macro m'affiche egalemement d'autre classeur en plein ecran , donc plus d'acces aubouton , et je ne trouve pas de sulution
quelqu'un peut m'aider
voici cette macro
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 03/07/2008 par NOEL Philippe
'"Suppression" (je mets des guillemets !) :
Dim CmdB As CommandBar
For Each CmdB In Application.CommandBars
CmdB.Enabled = False
Next CmdB
'
End Sub
Sub Macro2()
'
' Macro2 Macro
' Macro enregistrée le 03/07/2008 par NOEL Philippe
'Résurrection :
Dim CmdB As CommandBar
For Each CmdB In Application.CommandBars
CmdB.Enabled = True
Next CmdB
'
End Sub
amitié a tous
patrol