expression.ReplacementList(Index)
expression Required. An expression that returns an AutoCorrect object.
Index Optional Variant. The row index of the array of AutoCorrect replacements to be returned. The row is returned as a one-dimensional array with two elements: The first element is the text in column 1, and the second element is the text in column 2.
Remarks
Use the AddReplacement method to add an entry to the replacement list.
Example
This example searches the replacement list for "Temperature" and displays the replacement entry if it exists.
repl = Application.AutoCorrect.ReplacementList
For x = 1 To UBound(repl)
If repl(x, 1) = "Temperature" Then MsgBox repl(x, 2)
Next