While scorned by some in this forum, you can always use a macro. This one
provides a basic list of both:
Sub AutoTextAndAutoCorrectNailsMeetTheHammer()
Dim oAT As AutoTextEntry
Dim oAC As AutoCorrectEntry
ActiveDocument.Range.InsertAfter "List of AutoText Entries" & vbCr + vbCr
For Each oAT In ActiveDocument.AttachedTemplate.AutoTextEntries
ActiveDocument.Range.InsertAfter oAT.Name + vbTab + oAT.Value & vbCr
Next oAT
ActiveDocument.Range.InsertAfter "List of AutoCorrect Entries" & vbCr + vbCr
For Each oAC In AutoCorrect.Entries
ActiveDocument.Range.InsertAfter oAC.Name + vbTab + oAC.Value & vbCr
Next oAC
End Sub