"simply place the cursor at the insertion point, "

This is redundant, as the cursor IS the insertion point. You can not really place the cursor at the insertion point, as again, it IS the insertion point. You can place the cursor (the insertion point) where you want to insert something.

"change the style to "Dans Autotext" and it will limit the list to just those entries. "

should be:

change the style to "Dans Autotext" and it will limit the list to just those existing entries that use that style.

However, unfortunately it is directional. AutoText can detect a style within the autotext entries, but selecting a style means ONLY that. A style is selected. You can do something like this though.

A userform that has a ListBox and a Commandbutton. You can have the userform display from a button on the toolbar (or shortcut key, or whatever).

When the userform is started, have it populate the listbox with all AutoText names that use your style (Dans List).

User selects an item in the list, selects the button, and THAT AutoText is inserted at the Selection (the insertion point).[vba]

Private Sub UserForm_Initialize()
Dim atEntry As AutoTextEntry

For Each atEntry In ActiveDocument.AttachedTemplate.AutoTextEntries
If atEntry.StyleName = "Dans List" Then
ListBox1.AddItem atEntry.Name
End If
Next
End Sub

Private Sub cmdInsert_Click()
Dim strAT_Name As String
strAT_Name = ListBox1.Value
If Selection.Style = "Dans List" Then
Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.AttachedTemplate.AutoTextEntries(strAT_Name).Insert _
Where:=Selection.Range
Else
MsgBox "The style at the selection does not " & _
"the style of the selected AutoText."
End If
Unload Me
End Sub

[/vba]

Note: There is an error trap in the commandbutton code that checks to see if the style at the Selection is, in fact, the same style as the AutoText. If not, it displays a message and exits.

This could be adjusted a number of ways.

1. You could have the userform populate the listbox with autotext that matches the current selection.style. The code above hard-codes "Dans List".

2. You could change the selection.style to match.

Otherwise, if the autotext is inserted - even though the AutoText has Dans List as the style - the inserted AutoText may not be that style. Although this depends greatly on whether the AutoText entry did, or did not, contain a terminating paragraph mark.