suppression de la demende d'acceptation des macros

[jpierre]

Bonjour à tous,


est'il possible d'empecher l'apparition de la demande d'acceptation des macros sans reduire le degré de sécurité de l'antivirus?????

Ex: mon fichier, à l'ouverture enleve les barre d'outils et passe en plein ecran si on accepte les macros

par contre si on desactive les macros, les barres d'outils reste fonctionnelles

merci par avance

JPIERRE

 

[Didier]

Bonjour JPIERRE et le Forum

Allez à Outils/Macros/sécurité et mettre au niveau sécurité bas

A+
Didier

 

[jpierre]

bonjour
et merci a didier pour sa reponse

mais je cherche le code VBA pour changer ce niveau de sécurité ???

Merci par avance

JPIERRE

 

[Cathy]

Salut Jean-Pierre

Ah non, ne fais pas ça, tu ne pourras plus lancer tes macros!

C@thy

 

[Cathy]

Sorry, G rien dit, je m'été trompée!!!

Je fatigue, j'avais lu haut au lieu de bas, faut ke j'change de lunettes ou k'j'arrête la boisson (hi hi hi, j'ai de l'eau minérale dans ma bouteille!) ou l'ordi!

@+

C@thy

 

[jpierre]

Bonjour a didier et cathy

merci a vous,

Je viens de trouver le code pour forcer l'ouverture des macros


a+

Jpierre

 

[@+Thierry]

Salut Jpierre Miss Cathy et Didier,

Ben alors fais en profiter le Forum alors Mr Jpierre... Car je n'ai jamais trouvé ce genre de code pour ma part...

Merci d'avance
@+Thierry

 

[dIDIER 2]

salut jpieree
ton code m'interresse aussi

crdlmt
Dídíer2

 

[jpierre]

Salut a tous,

Le probleme de mettre un mot de passe n'est pas entierement viable , car il suffit que je desactive les macros et j'accede à tou tes les feuilles.

J'ai résolu le probleme en contournant cette demande d'acceptation

Si la personne n'accepte pas les macro, elle est dirigé vers un feuille qui qui lui demande d'accepter les macros pour avoir accés aux diverses feuilles.

Sheets(1).Visible = True (feuille avec demande acceptation macro)

Autres feuilles : Sheets(i).Visible = xlVeryHidden

de plus, je desactive les commandes et passe en mode plein ecran
'Application.CommandBars(1).Enabled = False
'Application.DisplayFullScreen = True

jpierre

Désolé pour le retard, mais j'étais en déplacement
Alors j'avais plus d'accès vers ce fabuleux forum plein d'astuces!!!!!!

 

[Didier]

Salut à tous
Je me permets de rajouté de ne pas oublié de remettre à la fermeture
Application.commandbars(1).enabled = true
Je me suis fais avoir
Bonne journée
Didier