Changement intempestif format cellule Excel

Nous utilisons un service de traduction pour assister nos utilisateurs. Veuillez nous excuser pour les éventuelles erreurs grammaticales.

Bonjour, merci de m'avoir contacté. Je suis Ace, l'un des conseillers indépendants. Je comprends votre inquiétude et ne vous inquiétez pas, je suis là pour vous aider.

Le problème que vous rencontrez lorsqu'Excel modifie inopinément votre format monétaire personnalisé est souvent dû à l'application ou à la conservation par Excel de styles personnalisés qui remplacent votre mise en forme à la réouverture du fichier. Même si vous supprimez manuellement le format indésirable, Excel peut le réintroduire s'il est intégré aux définitions de style du classeur ou si le style Normal a été modifié par inadvertance. Ce comportement est particulièrement fréquent dans les classeurs modifiés sur différents systèmes ou versions d'Excel. L'incohérence de mise en forme entre les cellules et les colonnes suggère que certains de ces styles sont appliqués de manière sélective ou hérités de mises en forme précédentes. Pour résoudre ce problème, la méthode la plus efficace consiste à supprimer tous les styles non intégrés du classeur à l'aide d'une simple macro VBA. Cela supprime tous les styles personnalisés persistants susceptibles de forcer le format monétaire indésirable. Après avoir exécuté la macro, vous pouvez réappliquer votre mise en forme préférée et enregistrer le fichier.

Voici comment :

Appuyez sur Alt + F11 pour ouvrir l’éditeur Visual Basic pour Applications.

Insérez un nouveau module (Insertion > Module) et collez le code suivant ci-dessous

Sous-SupprimerCustomStyles()
Style sombre comme style
Pour chaque style dans ce classeur.Styles
Si ce n'est pas sty.BuiltIn alors sty.Delete
Suivant
Fin du sous-titrage

Exécutez ensuite la macro en appuyant sur F5 lorsque le curseur est dans le code. Cela supprimera tous les styles personnalisés du classeur, y compris celui qui réapplique sans cesse le format de devise indésirable. Ensuite, réappliquez manuellement votre format préféré et enregistrez le fichier.

Faites-moi savoir si cette méthode fonctionne Sido.

Merci!

Nous utilisons un service de traduction pour assister nos utilisateurs. Veuillez nous excuser pour les éventuelles erreurs grammaticales.

Bonjour Sido, peux-tu me dire ce qui s'est passé afin que je puisse te proposer des options alternatives ?

Merci AceRobertT,

Je souhaite utiliser la macro que vous proposez.

Malheureusement elle est traduite en français de façon incompréhensive par VBA.

Pourriez-vous me donner le texte de la macro en langage VBA SVP ?

Merci d'avance de ne pas utiliser le traducteur automatique.

Nous utilisons un service de traduction pour assister nos utilisateurs. Veuillez nous excuser pour les éventuelles erreurs grammaticales.

Bonjour Sido, mes excuses pour avoir oublié cette partie, voici le guide pour le faire :

Appuyez sur Alt + F11 pour ouvrir l’éditeur Visual Basic pour Applications.

Insérez un nouveau module (Insertion > Module) et collez le code suivant ci-dessous :

Sub DeleteCustomStyles()
Dim sty As Style
For Each sty In ThisWorkbook.Styles
If Not sty.BuiltIn Then sty.Delete
Next
End Sub

Exécutez ensuite la macro en appuyant sur F5 lorsque le curseur est dans le code. Cela supprimera tous les styles personnalisés du classeur, y compris celui qui réapplique sans cesse le format de devise indésirable. Ensuite, réappliquez manuellement votre format préféré et enregistrez le fichier.

-----------------------

Note de la modérationNous sommes sur un forum francophone, on y parle couramment le français. Merci d'écrire en français, ça simplifie la compréhension pour tous (et aussi un peu le travail des modérateurs). 😉