Range.Bold (Word)

True si la plage est en gras.

Renvoie la valeur true, false ou wdUndefined (combinaison de true et false).

If Selection.Type = wdSelectionNormal Then 
 Selection.Range.Bold = wdToggle 
End If