Range.ListStyle (Word)

Renvoie une valeur de type Variant qui représente le style utilisé pour mettre en forme une liste à puces ou une liste numérotée.

Dim strListStyle As String
strListStyle = ActiveDocument.Range.ListStyle