Enregistrer copie sans macros

AllXVI Messages postés 14 Date d'inscription lundi 9 septembre 2013 Statut Membre Dernière intervention 22 septembre 2013 - 22 sept. 2013 à 15:45
jordane45 Messages postés 38142 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 20 avril 2024 - 23 sept. 2013 à 12:03
Bonjour,

Je travaille actuellement sur un fichier qui, à l'ouverture, exécute automatiquement une macro, effectue les opérations nécessaires puis s'enregistre sous un nom comportant la date du jour. L'idée est que cette copie permette uniquement de consulter les données traitées. Je me suis rendu compte en essayant d'ouvrir le fichier enregistré que celui ci a conservé la macro ce qui fait qu'elle s'exécute également à l'ouverture de la copie. Comment faire pour l'enregistrer tout en annulant cette exécution automatique ?

Cordialement.

2 réponses

ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 211
22 sept. 2013 à 16:44
Bonjour,
une idée toute bête etr ultra simple à mettre en oeuvre si, comme tout le donne à penser, ton classeur modèle a un nom bien défini une fois pour toutes (disons par exemple "toto") :
dans ta macro en cause :
If thisworkbook.name <> "toto" then exit sub

ultra-simple et efficace.
0
ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 211
22 sept. 2013 à 16:56
Sans compter que Excel t'offre la possibilité d'enregistrer sous un format sans macros (ex : format xlsx sous VB 2007).
0
Pour le format, cela ne fonctionne pas pour moi par contre la condition en début de macro est vraiment rusée. Cela fonctionne très bien pour moi.

Merci ucfoutu
0
jordane45 Messages postés 38142 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 20 avril 2024 344
23 sept. 2013 à 12:03
Bonjour,
Si vous souhaitez fournir votre classeur SANS les macros vous pouvez également les "supprimer"

http://silkyroad.developpez.com/VBA/VisualBasicEditor/#LIV-D


0
Rejoignez-nous