In diesem Beispiel wird das Wort "Temp." für das Wort "Temperature" in die Matrix der AutoKorrektur-Ersetzungen eingefügt.
With Application.AutoCorrect .AddReplacement "Temperature", "Temp." End With