Hi kae0088,
I don't know if this helps or not, but I did a very simple routine in order to return the font name of each paragraph in the document (code is below). For the first paragraph, I formatted "Calibri (Body)" and the second paragraph was just "Calibri". When I ran the code, the font returned was "Calibri" for both paragraphs.
Perhaps, there is no difference?
Roy
Code:
Sub findme2()
Dim oParagraph As Paragraph
For Each oParagraph In ActiveDocument.Paragraphs
MsgBox oParagraph.Range.Font.Name
Next
End Sub