rendre inactif le menu "Outils/Options..." dans Excel

il a quand même raison FxM en disant que sur MPFE, on apprend beaucoup...
par exemple, je ne savais pas que les broutards hurlaient à la manière
des loups et crachaient leur venin à celle des vipères...
en tous cas, qu'ils ne s'amusent pas à passer à moins de 400 m de chez
moi car l'évènement Scude pourrait bien devenir extrêmement gérable mais
difficilement digérable dans leurs panses angevines...
jps

ru-th a écrit:

Personnellement, je me trimballe dans ma version xl un objet JPS avec des
évenements ingérables
AvantQueChante, AprèsQueSaoul,Scude,Déscude.... ;-))
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"JPhL" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:1c03001c42184$e6ffa5d0$a301280a@phx.gbl...
Mais, j'étais déjà allé dans VBE... Mais, jamais fait le
rapprochement avec "This Workbook " du classeur ! Bon,
j'ai bien mis les formules suivantes dans "This Workbook"

"Sub Désactiver_macro_HG()
Application.CommandBars("Tools").FindControl
(ID:0017).Enabled = False
End Sub" et

"Sub Activation_macro_HG()
Application.CommandBars("Tools").FindControl
(ID:0017).Enabled = True
End Sub"

Et, quand j'execute, toujours pareil, valable ^pour tout
classeur que j'ouvre... Alosr là, je bloque encore...

Et encore merci pour vos lumières...

JPhL

-----Message d'origine-----
bonjour JPhL
pour mieux verstander, il faut absolument -et ce, dès

maintenant sinon

je sévis- que tu ailles faire un tour dans le VBE

(Visual Basic Editor),

ce que tu ne sembles pae encore bien connaître....
fais un chtiot coup de Alt + F11 quand tu es sur ton

classeur et regarde

l'arborescence à gauche de la fenêtre qui s'ouvre (tu

dois y voir ton

classeur avec son module ThisWorkbook) puis à droite

les modules où se

trouvent écrites les procs ; tu vérifies si ce que tu

dis avoir écrit

est bien dans le module This Workbook de ton classeur...
HTH
jps

JPhL a écrit:

Excusez moi, mais je ne comprends pas bien... Qd je

tape

ce que me propose ru-th, cad : Private Sub

Workbook_Open

()... ou Private Sub Workbook_BeforeClose(Cancel As
Boolean)..., les macros n'apparaissent pas dans le
classeur. Par contre, je ne vois pas ce que m'explique
jps... Il me semble pourtan que la macro est ben dans

le

classeur correspondant... A quoi puis-je voir cela ?

Je

ne verstande rien du tout...

Merci de m'éclairer de vos lumières...

-----Message d'origine-----
bonjour annnymous
c'est parce que ta macro n'a pas été écrite dans le

module du classeur

qui t'intéresse mais dans le classeur de macros

personnelles (alias

perso.xls)...vire-la de là et mets-la dans "ce

classeur"...

verstanden?
jps

anonymous@discussions.microsoft.com a écrit:

Merci à tous pour vos réponses qui m'ont été très
instructive. Par contre, petit pb encore :
Quand j'applque ces macros :

"application.commandbars("Tools").findcontrol
(id:R2).enabledúlse" pour les options et avec
l'id:0017, pour les macros, cela me désactive bien

ce

que je veux, mais sur l'ensemble des classeurs Excel.
Même si celui avec lequel j'ai créé les macros est
fermé ! Même si aucun classeur n'est ouvert ! Moi, ce

que

je voudrais, si c'est possible, c'est que cela ne
s'applique qu'au classeur concerné pour que, quand
qlqu'un se sert de mon classeur (classeur qui permet

de

gérer informatiquement résultats et classements d'une
compétition de Gym...), qu'il n'aille pas bidouiller

dans

les macros et autres liens pour que mon truc ne
fonctionne plus ensuite... Vous voyez ce que je veux
dire ?

-----Message d'origine-----
oui, tu as misé juste, nicolas
j'avais, par je ne sais quel hasard I = 0 et (ce qui

est

juste) J = 1 ;

j'ai donc créé un I = 1 mais voilà-t-y pas que je

bogue

maintenant sur

For Each Ctrl In CmdB.Controls

avec une erreur d'exécution : la méthode "Controls"

de

l'objet

"CommandBarPopup" a échoué....

mais qu'est ce qu'il a fichu encore ce charlot de

LL?

l'a pas testé, je

suis certain, sûr de lui comme il était ce lâcheur...
jps

Nicolas B. a écrit:

Qu'est-ce que tu as comme valeurs de I et J quand

ça

plante ?

Si les valeurs sont 1 et 1, alors l'erreur ne vient

pas de ces variables.

.

.

.

Bon alors, comme j'aime bien toujours aller plus loin
dans mes recherches, comme je vous l'ai dit, c'est un
petit programme pour gérer les compétitions de Gym au
niveau scolaire. Il y a une page d'accueil en html qui
ouvre par trois liens trois classeurs pour 3 catégories
différentes. Quand je lance chacun es classeurs pour la
1ère fois, il y a un message de sécurité pour les macros
qui s'affichent. Y a-t-il un moyen pour que, sur ce
classeur uniquement, le niveau de sécurité soit au mini
pour qu'il n'y ai plus de message qui s'affiche ???

Encore merci pour votre aide... ;-)

-----Message d'origine-----
re-

dans l'éditeur VBE, double clic sur thisworkbbok dans la
petite fenêtre en

haut à gauche
dans la fenêtre centrale, haut dessus, tu as Général
(cela empire) et

déclarations (de bonnes intentions)
dans la combobox (ou liste déroulante, et
non "déroulette" comme le général)

tu sélectionnes non pas général mais workbook
Apparaît alors comme par magie dans l'autre combobox
(rien à voir avec

"boite de jolis demeurés" ) l'évenement open
et dans la fenêtre centrale (ou la "grande baie") le
squelette de la

procédure associée à l'évenement open
Private Sub Workbook_Open() (quoi de plus normal, que de
vouloir ouvrir dans

la fenêtre !)
la deuxième combo (bien que pas très jolie), liste les
évenements associés à

l'objet : le ThisWorkbook ici
il te suffira de choisir à bon escient en fonction de
l'objet, l'évenement

adéquat.

Personnellement, je me trimballe dans ma version xl un
objet JPS avec des

évenements ingérables
AvantQueChante, AprèsQueSaoul,Scude,Déscude.... ;-))
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"JPhL" <anonymous@discussions.microsoft.com> a écrit
dans le message de

news:1c03001c42184$e6ffa5d0$a301280a@phx.gbl...
Mais, j'étais déjà allé dans VBE... Mais, jamais fait le
rapprochement avec "This Workbook " du classeur ! Bon,
j'ai bien mis les formules suivantes dans "This Workbook"

"Sub Désactiver_macro_HG()
Application.CommandBars("Tools").FindControl
(ID:=30017).Enabled = False
End Sub" et

"Sub Activation_macro_HG()
Application.CommandBars("Tools").FindControl
(ID:=30017).Enabled = True
End Sub"

Et, quand j'execute, toujours pareil, valable ^pour tout
classeur que j'ouvre... Alosr là, je bloque encore...

Et encore merci pour vos lumières...

JPhL

-----Message d'origine-----
bonjour JPhL
pour mieux verstander, il faut absolument -et ce, dès
maintenant sinon

je sévis- que tu ailles faire un tour dans le VBE
(Visual Basic Editor),

ce que tu ne sembles pae encore bien connaître....
fais un chtiot coup de Alt + F11 quand tu es sur ton
classeur et regarde

l'arborescence à gauche de la fenêtre qui s'ouvre (tu
dois y voir ton

classeur avec son module ThisWorkbook) puis à droite
les modules où se

trouvent écrites les procs ; tu vérifies si ce que tu
dis avoir écrit

est bien dans le module This Workbook de ton classeur...
HTH
jps

JPhL a écrit:

Excusez moi, mais je ne comprends pas bien... Qd je
tape

ce que me propose ru-th, cad : Private Sub
Workbook_Open

()... ou Private Sub Workbook_BeforeClose(Cancel As
Boolean)..., les macros n'apparaissent pas dans le
classeur. Par contre, je ne vois pas ce que m'explique
jps... Il me semble pourtan que la macro est ben dans
le

classeur correspondant... A quoi puis-je voir cela ?
Je

ne verstande rien du tout...

Merci de m'éclairer de vos lumières...

-----Message d'origine-----
bonjour annnymous
c'est parce que ta macro n'a pas été écrite dans le

module du classeur

qui t'intéresse mais dans le classeur de macros

personnelles (alias

perso.xls)...vire-la de là et mets-la dans "ce

classeur"...

verstanden?
jps

anonymous@discussions.microsoft.com a écrit:

Merci à tous pour vos réponses qui m'ont été très
instructive. Par contre, petit pb encore :
Quand j'applque ces macros :

"application.commandbars("Tools").findcontrol
(id:=522).enabled=false" pour les options et avec
l'id:=30017, pour les macros, cela me désactive bien

ce

que je veux, mais sur l'ensemble des classeurs Excel.
Même si celui avec lequel j'ai créé les macros est
fermé ! Même si aucun classeur n'est ouvert ! Moi, ce

que

je voudrais, si c'est possible, c'est que cela ne
s'applique qu'au classeur concerné pour que, quand
qlqu'un se sert de mon classeur (classeur qui permet

de

gérer informatiquement résultats et classements d'une
compétition de Gym...), qu'il n'aille pas bidouiller

dans

les macros et autres liens pour que mon truc ne
fonctionne plus ensuite... Vous voyez ce que je veux
dire ?

-----Message d'origine-----
oui, tu as misé juste, nicolas
j'avais, par je ne sais quel hasard I = 0 et (ce qui

est

juste) J = 1 ;

j'ai donc créé un I = 1 mais voilà-t-y pas que je

bogue

maintenant sur

For Each Ctrl In CmdB.Controls

avec une erreur d'exécution : la méthode "Controls"
de

l'objet

"CommandBarPopup" a échoué....

mais qu'est ce qu'il a fichu encore ce charlot de
LL?

l'a pas testé, je

suis certain, sûr de lui comme il était ce
lâcheur...

jps

Nicolas B. a écrit:

Qu'est-ce que tu as comme valeurs de I et J quand
ça

plante ?

Si les valeurs sont 1 et 1, alors l'erreur ne vient

pas de ces variables.

.

.

.

.

:-))))))
c'était avec plaisir...philippe
jps

Philippe.R a écrit:

Merci Jean Paul, c'est avec le plus grand plaisir que je constate comment tu soignes mon image !

"sabatier" <jpsabatdelaile@wanadoo.fr> a écrit dans le message de news:407C530C.7070809@wanadoo.fr...

attends-toi à ce que philippe R réponde à tes mercis, JPhL : il adore,
surtout quand il n'est pour rien dans la réussite du demandeur....
jps
PS j'ai fait une recherche sur Google : j'ai trouvé 14729 posts où
philippe répond "C'était avec plaisir" et 23456 avec seulement "Avec
plaisir"


JPhL a écrit:

Un immense merci à tout le monde car, les réponses ont
fusées dans tous les sens et ca a été efficace...

Un grand merci !

-----Message d'origine-----
j'oubliais, la commande est rendu INdisponible à

l'ouverture du classeur

par la macro événementiel
Private Sub Workbook_Open()

et rétablie lors de fermeture du fichier par la macro

événementiel

Private Sub Workbook_BeforeClose

donc tu peux en déduire que cette effet n'est valable

que sur ce

classeur et non sur les autres.

isabelle

Mais, j'étais déjà allé dans VBE... Mais, jamais fait

le

rapprochement avec "This Workbook " du classeur ! Bon,
j'ai bien mis les formules suivantes dans "This

Workbook"

"Sub Désactiver_macro_HG()
Application.CommandBars("Tools").FindControl
(ID:0017).Enabled = False
End Sub" et

"Sub Activation_macro_HG()
Application.CommandBars("Tools").FindControl
(ID:0017).Enabled = True
End Sub"

Et, quand j'execute, toujours pareil, valable ^pour

tout

classeur que j'ouvre... Alosr là, je bloque encore...

Et encore merci pour vos lumières...

JPhL

-----Message d'origine-----
bonjour JPhL
pour mieux verstander, il faut absolument -et ce, dès

maintenant sinon

je sévis- que tu ailles faire un tour dans le VBE

(Visual Basic Editor),

ce que tu ne sembles pae encore bien connaître....
fais un chtiot coup de Alt + F11 quand tu es sur ton

classeur et regarde

l'arborescence à gauche de la fenêtre qui s'ouvre (tu

dois y voir ton

classeur avec son module ThisWorkbook) puis à droite

les modules où se

trouvent écrites les procs ; tu vérifies si ce que tu

dis avoir écrit

est bien dans le module This Workbook de ton

classeur...

HTH
jps

JPhL a écrit:

Excusez moi, mais je ne comprends pas bien... Qd je

tape

ce que me propose ru-th, cad : Private Sub

Workbook_Open

()... ou Private Sub Workbook_BeforeClose(Cancel As
Boolean)..., les macros n'apparaissent pas dans le
classeur. Par contre, je ne vois pas ce que

m'explique

jps... Il me semble pourtan que la macro est ben

dans

le

classeur correspondant... A quoi puis-je voir cela ?

Je

ne verstande rien du tout...

Merci de m'éclairer de vos lumières...

-----Message d'origine-----
bonjour annnymous
c'est parce que ta macro n'a pas été écrite dans le

module du classeur

qui t'intéresse mais dans le classeur de macros

personnelles (alias

perso.xls)...vire-la de là et mets-la dans "ce

classeur"...

verstanden?
jps

anonymous@discussions.microsoft.com a écrit:

Merci à tous pour vos réponses qui m'ont été très
instructive. Par contre, petit pb encore :
Quand j'applque ces macros :

"application.commandbars("Tools").findcontrol
(id:R2).enabledúlse" pour les options et avec
l'id:0017, pour les macros, cela me désactive

bien

ce

que je veux, mais sur l'ensemble des classeurs

Excel.

Même si celui avec lequel j'ai créé les macros est
fermé ! Même si aucun classeur n'est ouvert ! Moi,

ce

que

je voudrais, si c'est possible, c'est que cela ne
s'applique qu'au classeur concerné pour que, quand
qlqu'un se sert de mon classeur (classeur qui

permet

de

gérer informatiquement résultats et classements

d'une

compétition de Gym...), qu'il n'aille pas

bidouiller

dans

les macros et autres liens pour que mon truc ne
fonctionne plus ensuite... Vous voyez ce que je

veux

dire ?

-----Message d'origine-----
oui, tu as misé juste, nicolas
j'avais, par je ne sais quel hasard I = 0 et (ce

qui

est

juste) J = 1 ;

j'ai donc créé un I = 1 mais voilà-t-y pas que je

bogue

maintenant sur

For Each Ctrl In CmdB.Controls

avec une erreur d'exécution : la

méthode "Controls"

de

l'objet

"CommandBarPopup" a échoué....

mais qu'est ce qu'il a fichu encore ce charlot de

LL?

l'a pas testé, je

suis certain, sûr de lui comme il était ce

lâcheur...

jps

Nicolas B. a écrit:

Qu'est-ce que tu as comme valeurs de I et J quand

ça

plante ?

Si les valeurs sont 1 et 1, alors l'erreur ne

vient

pas de ces variables.

.

.

.

.

Salut

si tu en xl2k ou +, le mieux est de créer un certificat (de complaisance ou
sabatéen) avec un utilitaire que tu trouveras sur ton disque dur et
répondant au doux nom de selfcert.exe, une fois que ton certificat est créé
(ce qui suit n'est valable que si tu n'as pas choisir le terme comme
siganture de "Jps" qui fait planter toutes applications, même sous Mac). Tu
signes ton projet VBa, dans l'éditeur VBE, outils signature électronique, Ok
tu enregistres et fermes ton classeur
à la réouverture, encore un message d'alerte, mais un chouia différents,
avec une case à cocher "Faire toujours confiance à cette source", on coches,
on ferme et on réouvre, plus de message d'alerte macro !

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"JPhL" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:194cc01c4219c$25ecb0a0$a601280a@phx.gbl...
Bon alors, comme j'aime bien toujours aller plus loin
dans mes recherches, comme je vous l'ai dit, c'est un
petit programme pour gérer les compétitions de Gym au
niveau scolaire. Il y a une page d'accueil en html qui
ouvre par trois liens trois classeurs pour 3 catégories
différentes. Quand je lance chacun es classeurs pour la
1ère fois, il y a un message de sécurité pour les macros
qui s'affichent. Y a-t-il un moyen pour que, sur ce
classeur uniquement, le niveau de sécurité soit au mini
pour qu'il n'y ai plus de message qui s'affiche ???

Encore merci pour votre aide... ;-)

-----Message d'origine-----
re-

dans l'éditeur VBE, double clic sur thisworkbbok dans la
petite fenêtre en

haut à gauche
dans la fenêtre centrale, haut dessus, tu as Général
(cela empire) et

déclarations (de bonnes intentions)
dans la combobox (ou liste déroulante, et
non "déroulette" comme le général)

tu sélectionnes non pas général mais workbook
Apparaît alors comme par magie dans l'autre combobox
(rien à voir avec

"boite de jolis demeurés" ) l'évenement open
et dans la fenêtre centrale (ou la "grande baie") le
squelette de la

procédure associée à l'évenement open
Private Sub Workbook_Open() (quoi de plus normal, que de
vouloir ouvrir dans

la fenêtre !)
la deuxième combo (bien que pas très jolie), liste les
évenements associés à

l'objet : le ThisWorkbook ici
il te suffira de choisir à bon escient en fonction de
l'objet, l'évenement

adéquat.

Personnellement, je me trimballe dans ma version xl un
objet JPS avec des

évenements ingérables
AvantQueChante, AprèsQueSaoul,Scude,Déscude.... ;-))
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"JPhL" <anonymous@discussions.microsoft.com> a écrit
dans le message de

news:1c03001c42184$e6ffa5d0$a301280a@phx.gbl...
Mais, j'étais déjà allé dans VBE... Mais, jamais fait le
rapprochement avec "This Workbook " du classeur ! Bon,
j'ai bien mis les formules suivantes dans "This Workbook"

"Sub Désactiver_macro_HG()
Application.CommandBars("Tools").FindControl
(ID:0017).Enabled = False
End Sub" et

"Sub Activation_macro_HG()
Application.CommandBars("Tools").FindControl
(ID:0017).Enabled = True
End Sub"

Et, quand j'execute, toujours pareil, valable ^pour tout
classeur que j'ouvre... Alosr là, je bloque encore...

Et encore merci pour vos lumières...

JPhL

-----Message d'origine-----
bonjour JPhL
pour mieux verstander, il faut absolument -et ce, dès
maintenant sinon

je sévis- que tu ailles faire un tour dans le VBE
(Visual Basic Editor),

ce que tu ne sembles pae encore bien connaître....
fais un chtiot coup de Alt + F11 quand tu es sur ton
classeur et regarde

l'arborescence à gauche de la fenêtre qui s'ouvre (tu
dois y voir ton

classeur avec son module ThisWorkbook) puis à droite
les modules où se

trouvent écrites les procs ; tu vérifies si ce que tu
dis avoir écrit

est bien dans le module This Workbook de ton classeur...
HTH
jps

JPhL a écrit:

Excusez moi, mais je ne comprends pas bien... Qd je
tape

ce que me propose ru-th, cad : Private Sub
Workbook_Open

()... ou Private Sub Workbook_BeforeClose(Cancel As
Boolean)..., les macros n'apparaissent pas dans le
classeur. Par contre, je ne vois pas ce que m'explique
jps... Il me semble pourtan que la macro est ben dans
le

classeur correspondant... A quoi puis-je voir cela ?
Je

ne verstande rien du tout...

Merci de m'éclairer de vos lumières...

-----Message d'origine-----
bonjour annnymous
c'est parce que ta macro n'a pas été écrite dans le

module du classeur

qui t'intéresse mais dans le classeur de macros

personnelles (alias

perso.xls)...vire-la de là et mets-la dans "ce

classeur"...

verstanden?
jps

anonymous@discussions.microsoft.com a écrit:

Merci à tous pour vos réponses qui m'ont été très
instructive. Par contre, petit pb encore :
Quand j'applque ces macros :

"application.commandbars("Tools").findcontrol
(id:R2).enabledúlse" pour les options et avec
l'id:0017, pour les macros, cela me désactive bien

ce

que je veux, mais sur l'ensemble des classeurs Excel.
Même si celui avec lequel j'ai créé les macros est
fermé ! Même si aucun classeur n'est ouvert ! Moi, ce

que

je voudrais, si c'est possible, c'est que cela ne
s'applique qu'au classeur concerné pour que, quand
qlqu'un se sert de mon classeur (classeur qui permet

de

gérer informatiquement résultats et classements d'une
compétition de Gym...), qu'il n'aille pas bidouiller

dans

les macros et autres liens pour que mon truc ne
fonctionne plus ensuite... Vous voyez ce que je veux
dire ?

-----Message d'origine-----
oui, tu as misé juste, nicolas
j'avais, par je ne sais quel hasard I = 0 et (ce qui

est

juste) J = 1 ;

j'ai donc créé un I = 1 mais voilà-t-y pas que je

bogue

maintenant sur

For Each Ctrl In CmdB.Controls

avec une erreur d'exécution : la méthode "Controls"
de

l'objet

"CommandBarPopup" a échoué....

mais qu'est ce qu'il a fichu encore ce charlot de
LL?

l'a pas testé, je

suis certain, sûr de lui comme il était ce
lâcheur...

jps

Nicolas B. a écrit:

Qu'est-ce que tu as comme valeurs de I et J quand
ça

plante ?

Si les valeurs sont 1 et 1, alors l'erreur ne vient

pas de ces variables.

.

.

.

.

:-))))))))))))

"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de
news:uaTr2tZIEHA.2164@TK2MSFTNGP12.phx.gbl...

Merci Jean Paul, c'est avec le plus grand plaisir que je constate
comment tu soignes mon image !

"sabatier" <jpsabatdelaile@wanadoo.fr> a écrit dans le message de
news:407C530C.7070809@wanadoo.fr...

attends-toi à ce que philippe R réponde à tes mercis, JPhL : il
adore,

surtout quand il n'est pour rien dans la réussite du demandeur....
jps
PS j'ai fait une recherche sur Google : j'ai trouvé 14729 posts où
philippe répond "C'était avec plaisir" et 23456 avec seulement
"Avec

plaisir"


JPhL a écrit:

Un immense merci à tout le monde car, les réponses ont
fusées dans tous les sens et ca a été efficace...

Un grand merci !

-----Message d'origine-----
j'oubliais, la commande est rendu INdisponible à

l'ouverture du classeur

par la macro événementiel
Private Sub Workbook_Open()

et rétablie lors de fermeture du fichier par la macro

événementiel

Private Sub Workbook_BeforeClose

donc tu peux en déduire que cette effet n'est valable

que sur ce

classeur et non sur les autres.

isabelle

Mais, j'étais déjà allé dans VBE... Mais, jamais fait

le

rapprochement avec "This Workbook " du classeur ! Bon,
j'ai bien mis les formules suivantes dans "This

Workbook"

"Sub Désactiver_macro_HG()
Application.CommandBars("Tools").FindControl
(ID:0017).Enabled = False
End Sub" et

"Sub Activation_macro_HG()
Application.CommandBars("Tools").FindControl
(ID:0017).Enabled = True
End Sub"

Et, quand j'execute, toujours pareil, valable ^pour

tout

classeur que j'ouvre... Alosr là, je bloque encore...

Et encore merci pour vos lumières...

JPhL

-----Message d'origine-----
bonjour JPhL
pour mieux verstander, il faut absolument -et ce, dès

maintenant sinon

je sévis- que tu ailles faire un tour dans le VBE

(Visual Basic Editor),

ce que tu ne sembles pae encore bien connaître....
fais un chtiot coup de Alt + F11 quand tu es sur ton

classeur et regarde

l'arborescence à gauche de la fenêtre qui s'ouvre (tu

dois y voir ton

classeur avec son module ThisWorkbook) puis à droite

les modules où se

trouvent écrites les procs ; tu vérifies si ce que tu

dis avoir écrit

est bien dans le module This Workbook de ton

classeur...

HTH
jps

JPhL a écrit:

Excusez moi, mais je ne comprends pas bien... Qd je

tape

ce que me propose ru-th, cad : Private Sub

Workbook_Open

()... ou Private Sub Workbook_BeforeClose(Cancel As
Boolean)..., les macros n'apparaissent pas dans le
classeur. Par contre, je ne vois pas ce que

m'explique

jps... Il me semble pourtan que la macro est ben

dans

le

classeur correspondant... A quoi puis-je voir cela ?

Je

ne verstande rien du tout...

Merci de m'éclairer de vos lumières...

-----Message d'origine-----
bonjour annnymous
c'est parce que ta macro n'a pas été écrite dans le

module du classeur

qui t'intéresse mais dans le classeur de macros

personnelles (alias

perso.xls)...vire-la de là et mets-la dans "ce

classeur"...

verstanden?
jps

anonymous@discussions.microsoft.com a écrit:

Merci à tous pour vos réponses qui m'ont été très
instructive. Par contre, petit pb encore :
Quand j'applque ces macros :

"application.commandbars("Tools").findcontrol
(id:R2).enabledúlse" pour les options et avec
l'id:0017, pour les macros, cela me désactive

bien

ce

que je veux, mais sur l'ensemble des classeurs

Excel.

Même si celui avec lequel j'ai créé les macros est
fermé ! Même si aucun classeur n'est ouvert ! Moi,

ce

que

je voudrais, si c'est possible, c'est que cela ne
s'applique qu'au classeur concerné pour que, quand
qlqu'un se sert de mon classeur (classeur qui

permet

de

gérer informatiquement résultats et classements

d'une

compétition de Gym...), qu'il n'aille pas

bidouiller

dans

les macros et autres liens pour que mon truc ne
fonctionne plus ensuite... Vous voyez ce que je

veux

dire ?

-----Message d'origine-----
oui, tu as misé juste, nicolas
j'avais, par je ne sais quel hasard I = 0 et (ce

qui

est

juste) J = 1 ;

j'ai donc créé un I = 1 mais voilà-t-y pas que je

bogue

maintenant sur

For Each Ctrl In CmdB.Controls

avec une erreur d'exécution : la

méthode "Controls"

de

l'objet

"CommandBarPopup" a échoué....

mais qu'est ce qu'il a fichu encore ce charlot de

LL?

l'a pas testé, je

suis certain, sûr de lui comme il était ce

lâcheur...

jps

Nicolas B. a écrit:

Qu'est-ce que tu as comme valeurs de I et J quand

ça

plante ?

Si les valeurs sont 1 et 1, alors l'erreur ne

vient

pas de ces variables.

.

.

.

.