Style.Type (Word)
Renvoie le type de style. Les valeurs de retour possibles sont wdStyleTypeCharacter - Style de caractères du corps de texte, wdStyleTypeLinked, wdStyleTypeList - Style Liste, wdStyleTypeParagraph - Style Paragraphe, wdStyleTypeParagraphOnly, wdStyleTypeTable - Style Tableau.
If ActiveDocument.Styles("SubTitle").Type = _
wdStyleTypeParagraph Then
MsgBox "Paragraph style"
ElseIf ActiveDocument.Styles("SubTitle").Type = _
wdStyleTypeCharacter Then
MsgBox "Character style"
End If