Ce petit utilitaire (fait pas moi-même avec l'aide de ChatGPT) va sauvegarder le contenu de chaque cellule contenant une formule ainsi que tous les codes VBA d'un classeur dans un fichier .txt (WorkbookExport.txt) qui se trouve dans le répertoire du classeur. Macro : "ExportWorkbookContent"
Au cas où une formule était effacée par inadvertance, une autre macro ("RestoreFormula") permet de récupérer la formule effacée (pour autant qu'on aie d'abord exécuter "ExportWorkbookContent" et qui se trouve dans le fichier .txt.
Dans le fichier d'exemple en annexe, pour tester ::
1. Exécuter "ExportWorkbookContent" (Bouton de commande)
2. Effacer la formule en B1 ou D1
3. Se positionner sur la cellule effacée et exécuter la macro "RestoreFormula"
Au cas où une formule était effacée par inadvertance, une autre macro ("RestoreFormula") permet de récupérer la formule effacée (pour autant qu'on aie d'abord exécuter "ExportWorkbookContent" et qui se trouve dans le fichier .txt.
Dans le fichier d'exemple en annexe, pour tester ::
1. Exécuter "ExportWorkbookContent" (Bouton de commande)
2. Effacer la formule en B1 ou D1
3. Se positionner sur la cellule effacée et exécuter la macro "RestoreFormula"
- Auteur
- Marc Vanlindt & ChatGpt