supprimer la barre d'outils et le menu "Fichier Edition

[Brigitte]

Bonsoir le Forum, Bonsoir les fondus d'Excel,

Je viens de terminer un programme qui fait des additons
pour une enfant de 6 ans. Je me suis aperçu que la ptite
allée fouiner sur la barre d'outils.

Comment supprimer la barre d'outils et le menu "Fichier Edition etc..."

et comment rétablir le tout quand je ferme ce fichier.

Merci

@Brigitte@
Ps: Vraiment super le programme Post VL, merci Vériland et l'équipes.

 

[@+Thierry]

Bonjour Brigitte

C'est Simple, dans l'intruction du bouton de sortie :

Application.Quit
ThisWorkBook.Close False


Attention, sauver ton fichier avant d'essayer ce code, car il ne sera donc pas sauvé puisque le paramètre est à False.

Bonne Journée au Soleil ! (ici aussi !!)
@+Thierry

 

[@Christophe@]

Bonjour Thierry, presque syncro, mais je me suis planté

Il faut remplacer AcitveDocument par ThisWorkbook

RRRRrrrrr le VBA sous Word prends le decu, ben oui, je fais du VBA dans Word aussi maintenant, quelque document template avec Userform, alors je me mêle un peux les pinceau.

Dsl

Bonne journée a tous

@Christophe@

 

[@+Thierry]

Bonjour @Xtof@ et le Forum

Message Croisé !!

Heuh oui faut pas se mélanger les pinceaux avec Word (moi, je n'y touche pas d'ailleurs).

J'ai mis aussi application.quit vu que Brigitte dit "comment quitter Excel sans sauvegarder", donc on ferme Excel aussi.

Bon Dimanche
@+Thierry

 

[@Christophe@]

Thanks Thierry

Alors comme cela, Word tu n'y touche pas, ben alors je vais devenir bientot meilleur que toi en VBA Word uniquement, rire

Si je suis sur VBA Word, c'est pour le boulot, j'ai des document officiel sous Word et j'aimerai les simplifié, avec des userform.

Bon Dimanche a toi et au forum

@Christophe@

 

[Brigitte]

Bonsoir Christophe, bonsoir Thierry, Bonsoir le forum,

Voilà, aprés une belle journée ensoleillé, me revoilà

Cette fois le fichier est fini fini, je n'ai plus à surveiller la petite, j'ai la conscience tranquille.

Merci à tous.

A+

@

rigitte@