En choisissant la commande Outils-Options de correction automatique, on aboutit à une boîte de dialogue dans laquelle l'onglet Correction automatique présente une liste à double entrée : le mot à remplacer et le mot de remplacement.
Word et Excel utilisent la même liste de corrections automatiques.
Une petite macro insère les données de la liste dans une feuille de calcul Excel et une autre réinjecte les données Excel dans la liste d'origine. Les voici :

Sub LireCorrections()
Dim vCorrections
vCorrections = Application.AutoCorrect.ReplacementList
Sheets("corrections").Select
[A1].Resize(UBound(vCorrections, 1), 2) = vCorrections
End Sub
Sub EnregistrerCorrections()
Sheets("corrections").Select
Application.AutoCorrect.ReplacementList = [A1].CurrentRegion.Value
End Sub

Comment installer les macros ?
- Lancez Excel et nommez l'une des feuilles corrections.
- Choisissez la commande Outils-Macro-Visual Basic Editor. La fenêtre de l'éditeur Visual Basic s'affiche.
- Dans la fenêtre des projets, sélectionnez celui qui correspond au nom du classeur.
- Choisissez la commande Insertion-Module. Un petit dossier Modules apparaît dans la fenêtre des projets. Il contient un module nommé Module1. La page blanche du nouveau module s'affiche dans le volet principal.
- Copiez dans le Presse-papiers les deux macros ci-dessus.
- Collez-les dans la page blanche de l'éditeur Visual Basic.
- Fermez la fenêtre de l'éditeur Visual Basic

Comment utiliser les macros ?
- Choisissez la commande Outils-Macro-Macros.
- Sélectionnez LireCorrections et cliquez sur Exécuter.
- Modifiez les données et lancez ensuite la routine EnregistrerCorrections.